Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Christian Seehase,
25. Nov 2004
Moin Hansa,
na sicher geht das.
Angenommen Du willst drei verschiedene Zeilenhöhen in Abhängigkeit des Wertes der ersten Spalte (mögliche Werte 1, 2 oder 3):
procedure TForm1.StringGrid1DrawCell(Sender: TObject; ACol, ARow: Integer; Rect: TRect; State: TGridDrawState);
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Christian Seehase,
25. Nov 2004
Moin Hansa,
wieso, geht doch:
procedure TForm1.StringGrid1DrawCell(Sender: TObject; ACol, ARow: Integer;
Rect: TRect; State: TGridDrawState);
begin
if ARow mod 2 = 0 then begin
StringGrid1.RowHeights := StringGrid1.DefaultRowHeight*2;
end else begin