Code:
var pf : TPointFloat;
...
pf.fX := ClientWidth / 2;
pf.fY := 0;
oVectorPoint.PointFloat := pf;
das würde funktionieren!
und das nachfolgende auch
Delphi-Quellcode:
type
TPointFloat = class
fX: Double;
fY: Double;
end;
TVectorPoint = class
private
fPoint: TPointFloat;
{ ... }
public
property PointFloat: TPointFloat read fPoint write fPoint;
{ ... }
end;
oVectorPoint.PointFloat.fX := ClientWidth / 2;
aber wenn dann kann man auch gleich ableiten
[edit=Luckie]Warum hört ihr eigentlich immer mittendrin mit den Delphi-Tags auf? Mfg, Luckie[/edit]