- type tkoord=record
- x,y : Float;
- end;
- type TElement=record
- p0, // Startpunkt
- p1 : TKoord; // Endpunkt
- Selected : Boolean; // Linie ausgewählt?
- end;
- pElement : ^TElement;
- ...
- var
- ElementListe : TList;
- Element : pElement;
Linienverfolgung...Moderator: DGL-Team
|