Einzelnen Beitrag anzeigen

SimStar001

Registriert seit: 18. Jan 2008
594 Beiträge
 
#1

Problem beim färben von Stringgrid

  Alt 1. Mai 2008, 14:30
hallo ich habe hier folgenden code:

Delphi-Quellcode:
procedure TForm1.StringGrid1DrawCell(Sender: TObject; ACol, ARow: Integer;
  Rect: TRect; State: TGridDrawState);
begin
  if StringGrid1.cells[acol,arow] = 'Nthen
    begin
    StringGrid1.Canvas.Brush.Color := clwhite;

    StringGrid1.Canvas.FillRect(Rect);
    StringGrid1.Canvas.font.Color := clred;
    StringGrid1.canvas.TextOut(acol,arow, StringGrid1.cells[Acol,Arow]);
    end;
end;

wenn das grid gezeichet wird sind zwar die fleder rot, aber der TEXT steht in der linken oberen ecke des grids! wieso!!????
Marco Tröger
  Mit Zitat antworten Zitat