Delphi Bir Stringde Tam Sayılar Dışındaki Karakterleri Kaldırma Örneği
"Delphi" Programlama dilinde "Bir Stringde Tam Sayılar Dışındaki Karakterleri Kaldırma Örneği" ile ilgili kod örneği aşağıda belirtilmiştir.
program Main;
{$APPTYPE CONSOLE}
uses
SysUtils, RegularExpressions;
var
str1, res: string;
pattern: TRegEx;
begin
str1 := 'Ben 30 yaşındayım ve 10 yıldır yazılım sektöründeyim';
WriteLn('Orjinal string : ', str1);
pattern := TRegEx.Create('\D+');
res := pattern.Replace(str1, '');
WriteLn(res);
end.