1
0
mirror of https://github.com/moparisthebest/Simba synced 2024-12-25 00:39:04 -05:00
Simba/Tests/PS/regex.simba
2010-09-11 14:01:33 +02:00

12 lines
190 B
Plaintext

program new;
var
x : TRegExp;
begin
x := TRegExp.create;
x.Expression := 'W?alk';
x.InputString := 'Lets talk bitch!';
Writeln(x.ExecPos(1));
writeln(x.Match[0]);
x.free;
end.