StrToTPA

From SCAR Divi Manual
Revision as of 12:05, 1 July 2011 by Freddy (talk | contribs) (Created page with "==Definition== <source lang="scar" lines="false"> function StrToTPA(const Str: AnsiString): TPointArray; </source> ==Availability== SCAR Divi 3.25 > Current ==Description== Con...")
(diff) ← Older revision | Latest revision (diff) | Newer revision → (diff)
Jump to: navigation, search

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