Ausrichtung eines Textes in einer StringGrid Zelle

[Piro]

Moin

ich hoffe es kann mir einer helfen. Irgendwie finde nichts zum Ausrichten einer Zelle in SringGrid.

Ich möchte gerne das die Texteinträge zentriert sind.

Danke im Vorfeld.

[Tpercon]

Da wirst du wohl kaum um das OnDrawCell Ereignis herum kommen.

Hier mal nen Beispiel auf die Schnelle:

Delphi-Quellcode:

procedure TForm1.StringGrid1DrawCell(Sender: TObject; ACol, ARow: Integer;
  Rect: TRect; State: TGridDrawState);
var s: string;
begin
  s := StringGrid1.Cells[ACol, ARow];
  StringGrid1.Canvas.FillRect(Rect);
  DrawText(StringGrid1.Canvas.Handle, PChar(s), Length(s), Rect, DT_Center);
end;

[Piro]

danke für die schnelle Antwort.

[Tpercon]

Ersetze das obige DrawText mal durch das hier:

Delphi-Quellcode:

  DrawText(StringGrid1.Canvas.Handle, PChar(s), Length(s), Rect, DT_SINGLELINE or DT_CENTER or DT_VCENTER);