( S : [[String]StringZ];
dim P1 : [[String]StringZ];
dim P2 : [[String]StringZ];
Sep : Char)
Procedura StrExtract slouží k rozdělování řetězce S do dvou řetězců podle oddělovače Sep. Do proměnné P1 se uloží první část řetězce a do P2 zbytek.
Typ vracených parametrů P1 a P2 určuje parametr S. Jestliže bude typu StringZ, budou P1 a P2 vraceny jako StringZ. Jinak budou vraceny jako String.
Podívejte se na: Řetězce
Příklad:
dim S, P1 : String;
S := "ABCDEF|56819||xyz|009";
StrExtract(S, P1, S, "|"); { P1 = "ABCDEF", S = "56819||xyz|009" }
StrExtract(S, P1, S, "|"); { P1 = "56819", S = "|xyz|009" }
StrExtract(S, P1, S, "|"); { P1 = "", S = "xyz|009" }
StrExtract(S, P1, S, "|"); { P1 = "xyz", S = "009" }
StrExtract(S, P1, S, "|"); { P1 = "009", S = "" }