안녕하세요 수고 들 많습니다.
아래와 같이 DrawCell에서 많은 연습을 하였습니다.
제가 원하는 것은 DrawCell이 아니라
Cell에서 데이타을 입력을 할경우 Font색깔이 변하면 좋겠습니다.
[1,1]Cell에(아무 Cell 이나) 글자을 입력을 하면 글자에 색깔이
나타나며 좋겠습니다. 게시판에서 String에 색깔에 관한 내용을
찾아보았습니다.
제가 원하는 형태의 답은 없습니다.
많은 답변을 부탁 드립니다.
감사 합니다.

procedure TFmatrcode.kg2DrawCell(Sender: TObject; ACol, ARow: Integer;
  Rect: TRect; State: TGridDrawState);
begin
//많은 연습을 하였습니다.

If gdFocused in State then
    with (Sender as TKdhGrid).Canvas do begin
          font.color  := clYellow;  
          Brush.Color := clRed;
          FillRect(Rect);
          TextOut(Rect.Left, Rect.Top, TKdhGrid(Sender).Cells[ACol, ARow]);
          end;

with kg2.Canvas do
     begin
     if (kg2.SCells[2,ARow] <> '') then
        begin
        Font.Color := clRed;
        Brush.Color := RGB(253,255,240);
        FillRect(Rect);
        end
     end;  
end;