FixedCols [gelöst]

[Cool-Tuc]

Hallo,

gibt es eine Möglichkeit für die "Fixed Cols" die Eigenschaft Alignment (taCenter, taLeftJustify...) zu setzen? Ich habe leider nichts gefunden. Ich kann zwar die automatische Zeilennummerierung einschalten, diese wird aber immer linksbündig dargestellt...

danke

[theo]

Ich nehme an du sprichst von TStringGrid?
Es gehört zur Frage dazu, das zu erwähnen, denkt daran, das nicht die ganze Welt in euren Kopf schauen kann oder will.
Ob es was vorgefertigtes gibt, weiss ich nicht, aber du kannst immer selber painten in OnDrawCell.

z.B.

Code: Alles auswählen

procedure TForm1.StringGrid1DrawCell(Sender: TObject; aCol, aRow: Integer;
  aRect: TRect; aState: TGridDrawState);
var Style:TTextStyle;
begin
  if (aCol=0) and (ARow>0) then
   begin
     Style.Alignment:=taCenter;
     Style.Layout:=tlCenter;
     StringGrid1.Canvas.Brush.Color:=clBtnFace;
     StringGrid1.Canvas.FillRect(aRect);
     StringGrid1.Canvas.TextRect(aRect,aRect.Left,aRect.Top,Inttostr(aRow),Style);
   end;
end;

[Cool-Tuc]

Klar, TStringGrid, tschuldigung....
scheint wirklich zu funktionieren....danke...