delphi4arab منتديات دلفي للعرب

السلام عليكم ورحمة الله وبركاته

اتذكر انه توجد إجرائية تقوم بحدف المسافة من الامام و الخلف لكن نسيتها .:confused:
ماهي هاته الاجرائية ؟
مثلا :

PHP كود :
'  delphi4arab'
' delphi4arab ' 

تصبح هكذا :

PHP كود :
'delphi4arab' 

بارك الله فيكم

السلام عليكم و رحمة الله و بركاته

PHP كود :
function Trim(const S: string): string;
var
  I, L: Integer;
begin
  L := Length(S);
  I := 1;
  while (I <= L) and (S[I] <= ' ') do Inc(I);
  if I > L then Result := '' else
  begin
    while S[L] <= ' ' do Dec(L);
    Result := Copy(S, I, L - I + 1);
  end;
end;

//Or
Uses
 SysUtils;
...
 Trim('  delphi4arab'); 

بالتوفيق,,

بارك الله فيك اخي و أستاذي TF6M

حلت المشكلة .
هذاماكنت ابحث عليه :

PHP كود :
Trim('  delphi4arab'); 

abdelmalek

TF6M

abdelmalek