Difference between revisions of "TPADelete"

From SCAR Divi Manual
Jump to: navigation, search
Line 21: Line 21:
 
   TPA := [Point(0, 0), Point(2, 2), Point(5, 10)];
 
   TPA := [Point(0, 0), Point(2, 2), Point(5, 10)];
 
   TPADelete(TPA, 1);
 
   TPADelete(TPA, 1);
   WriteLn('TPointArray: ' + TPAToStr(TPA));
+
   WriteLn(TPAToStr(TPA));
 
end.
 
end.
 
</source>
 
</source>
  
 
Output:
 
Output:
  TPointArray: (0,0);(5,10)
+
  (0,0);(5,10)
  
 
==See Also==
 
==See Also==

Revision as of 11:32, 24 October 2011

Definition

procedure TPADelete(var TPA: TPointArray; const Index: Integer);

Availability

SCAR Divi 3.28 > Current

Aliases

  • TPARemove (SCAR Divi 3.26 > SCAR Divi 3.27)

Description

Deletes the coordinate at a given position Index in a given TPointArray TPA. If the index is outside of the array bounds, nothing happens.

Example

var
  TPA: TPointArray;

begin
  TPA := [Point(0, 0), Point(2, 2), Point(5, 10)];
  TPADelete(TPA, 1);
  WriteLn(TPAToStr(TPA));
end.

Output:

(0,0);(5,10)

See Also