Mittlerweile habe ich es versucht
Delphi-Quellcode:
procedure TFrmMain.Button5Click(Sender: TObject);
var
test: TBogen;
x : integer;
begin
test := TBogen.Create(zeichenfenster,100,100,100,70,clGreen) ;
x := test.LiesXPosition ;
end;
Ist das ok? Aber wo kann ich die x werte eingeben?