24-06-2013, 07:14 PM
استخدام الوحدة:
كود :
uses StrUtils;كود :
Edit1.Text := ReverseString(Edit1.Text);
و لرب نازلة يضيق لها الفتى ذرعا و عند الله منها المخرج
ضاقت فلما استحكمت حلقاتها فرجت و كنت اضنها لا تفرج
ضاقت فلما استحكمت حلقاتها فرجت و كنت اضنها لا تفرج


![[-]](https://delphi4arab.net/forum/D4A2020/collapse.png)