Zitat von
quendolineDD:
Schau dir mal Canvas.TextHeight() an
Edit:
Sieht dann ungefähr so aus:
Delphi-Quellcode:
procedure TForm4.StringGrid1GetEditText(Sender: TObject; ACol, ARow: Integer;
var Value: string);
begin
if StringGrid1.Cells[ACol, ARow] <> '' then
StringGrid1.RowHeights[ARow] := Canvas.TextHeight(StringGrid1.Cells[ACol, ARow]);
end;
Ich brauch nicht die Höhe sondern die "weite" logischerweise
Allerdings klappt
StringGridKunden.ColWidths[2] := canvas.TextWidth(StringGridKunden.Cells[2,i+1]);
nicht.
Um genau zu sein wird trotzdem der letzte Buchstabe nicht angezeigt, wie kann das sein?