CheckBox: Länge des Textes

[Helmi]

Hallo,

ich hoffe der Titel ist für jeden zufriedenstellend.

Aber erstmal zu meinem Problem:

Weiss jemand, wie man die Länge des Textes einer CheckBox ermitteln kann?

Kurze Erklärung:
In einer Komponente wird der Text des CheckBox-Textes verändert.
Die CheckBox liegt auf einer Form und soll immer mittig angezeigt werden.
Dazu brauche ich aber die Länge der gesamten CheckBox, inkl. des neuen
Textes.

Weiss jemand wie das geht?

mfg
Helmi

[kiar]

so

Delphi-Quellcode:

var
   s:string;
begin
     s:='   checkbox1  ';
     checkbox1.Caption:=s;
     sleep (1000);
     Showmessage(inttostr(length(checkbox1.caption)));
end;

[Steve]

Pixels := Form.Canvas.TextWidth(CheckBox.Caption); oder so ähnlich

[kiar]

natürlich war das blödsinn was ich oben geschrieben habe. erst richtig lesen und dann schreiben.

ausgehend davon das eine checkbox quadratisch ist:I:=checkBox1.height + length(CheckBox1.caption)* font.size; edit : kut tastatur

[Muetze1]

Moin!

Da der Font nicht immer proportional ist, folgendes Beispiel dazu im Anhang.

MfG
Muetze1

[Helmi]

Vielen Dank für die ganzen Hilfen!!

Hat wunderbar funktioniert!