...
Procedure: NewPoint(ItemPath: String; X, Y: Double);
API Call:
Code Block | ||||||||
---|---|---|---|---|---|---|---|---|
| ||||||||
StartCount := PointCount(ItemPath); NewPoint(ItemPath, 100, 125); StopCount := PointCount(ItemPath); if StopCount > StartCount then begin Result := TRUE; end else begin Result := FALSE; end; |