Q&A

  • F1Book에서 특정Cell의 Color 값 구하기
F1Book에서 특정Cell의 Color 값을 구하고 싶은데요...
가능한지요...그렇다면 방법 좀...감사합니다
1  COMMENTS
  • Profile
    한하눌 2002.07.09 03:24

    아래의 예제를 실행해보시면 참고가 되실려나요...?
    procedure TForm1.Button1Click(Sender: TObject);
    var
       tmpPattern : smallint;
       tmpfg,tmpBg: tcolor;
    begin
       with F1Book1 do
       begin
          row := 2;
          col := 2;
          text := '123';
          SetPattern(1,clyellow,clwhite);
          getPattern(tmppattern,tmpfg,tmpbg);
          if tmpfg = clyellow then begin
             showmessage('yes');
          end;
       end;
    end;