...
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; |
...
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; |