Registriert seit: 9. Feb 2006
Ort: Stolberg (Rhld)
4.144 Beiträge
Delphi 10.3 Rio
|
AW: Firemonkey TEdit mit Autosize?
15. Dez 2014, 22:57
Delphi-Quellcode:
ACompo := AOwner; // Form suchen
while ACompo.HasParent do begin
ACompo := ACompo.GetParentComponent;
end;
Width := TForm (ACompo).Canvas.textwidth (Text) + 6;
Das ist so der VCL weg... Aber ein TEdit kann ja einen eigenen Style haben und der kann sich vom Form unterscheiden...
Mavarik
|