Hi,
wie kann ich gemischt einfach- und doppelthohe Zeilen in einem Stringgrid realisieren ? Geht das überhaupt ? Ich habe mal folgendes probiert :
Delphi-Quellcode:
procedure TForm1.StringGrid1DrawCell(Sender: TObject; ACol, ARow: Integer;
Rect: TRect; State: TGridDrawState);
begin
if (StringGrid1.Row mod 2 = 0) then begin
StringGrid1.RowHeights [ARow] := StringGrid1.DefaultRowHeight*2;
StringGrid1.Cells [2,StringGrid1.Row] := 'doppelt hoch';
end
else begin
StringGrid1.RowHeights [ARow] := StringGrid1.DefaultRowHeight;
StringGrid1.Cells [2,StringGrid1.Row] := 'einfach hoch';
end;
StringGrid1.RowCount:=StringGrid1.RowCount+1;
end;
Das wirkt sich allerdings auf das gesamte Grid aus. Es werden also alle Zeilen neu gezeichnet, abwechselnd einfach und doppeltt hoch. 8)