Länge eines Textes in Pixel ermitteln

[Bummi]

@ASM

Zitat:

allein schon deshalb, weil nicht alle beschriftbaren Objekte ein Canvas haben (wie z.B. Labels).

Nicht public oder published heißt nicht daß es nicht da wäre

Delphi-Quellcode:

type
  THackGraphicControl=Class(Controls.TGraphicControl)
     public
     Property Canvas;
  End;
.....

procedure TForm1.Button1Click(Sender: TObject);
begin
 THackGraphicControl(Label1).Canvas.Ellipse(0,0,10,10);
end;