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

السلام عليكم
عندي مثلا كلمة دلفي اريد ان اقلب حروفها هكذا
delphi to hilpde

وشكرا

---

اسف تم ايجاد الحل

function Swap(A: Integer): Integer;
asm
{$IFDEF CPUX64}
MOV EAX,ECX
{$ENDIF !CPUX64}
BSWAP EAX
end;

الأمر موجود في الباسكال .. هو ReverseString و AnsiReverseString
موجود في مكتبة StrUtils .. او  System.StrUtils إذا كنت تستخدم دلفي XE وما فوق