StrToTPA

Definition

function StrToTPA(const Str: AnsiString): TPointArray;

Availability

SCAR Divi 3.25 > Current

Description

Converts a string matching the regex (?:(?:\()?\s*\d+\s*,\s*\d+\s*(?:\))?\s*;\s*)*(?:\()?\s*\d+\s*,\s*\d+\s*(?:\))? to a TPointArray. The regex allows for a lot of flexibility when it comes to the format of the entered string. The TPointArray can be converted back to a string with TPAToStr.

Example

begin
  WriteLn(TPAToStr(StrToTPA('(1,2);(3,4);(5,6)')));
  WriteLn(TPAToStr(StrToTPA('Hello(1,2);(3,4);(5,6)World')));
  WriteLn(TPAToStr(StrToTPA('(1   ,2) ;(  3 ,4 );(5  ,6)')));
  WriteLn(TPAToStr(StrToTPA('1,2;(3,4);(5,6)')));
  WriteLn(TPAToStr(StrToTPA('   1, 2;3,   4;5, 6')));
end.

Output:

(1,2);(3,4);(5,6)
(1,2);(3,4);(5,6)
(1,2);(3,4);(5,6)
(1,2);(3,4);(5,6)
(1,2);(3,4);(5,6)

See Also

• TPAToStr