Forum: Object-Pascal / Delphi-Language
by DeddyH,
6. Jul 2012
Der Verständlichkeit halber würde ich den Record wohl so deklarieren:
type
TLine = record
StartPoint,
EndPoint: TPoint;
end;
Wenn Du nun die Richtung wechselst, erweiterst Du Dein Array um ein Element und setzt EndPoint des vorher letzten Elements und StartPoint des nun letzten auf die aktuelle Position relativ zur Paintbox. Nach meinem Dafürhalten sollte das eigentlich...
Forum: Object-Pascal / Delphi-Language
by DeddyH,
6. Jul 2012
SetLength(a, Length(a) + 1);
finde ich persönlich verständlicher.
Forum: Object-Pascal / Delphi-Language
by DeddyH,
6. Jul 2012
High() gibt bei einem leeren Array -1 zurück, ein High() von 0 entspricht ja einem Element.