- السلام علكيم :
- اذا كان لدي اثنان من المكون ميو (Memo) و كان بها الأولى جملة مثلاً (I'm Muslim) كيف يمكنني حرف هذه الجملة في متغر من النوع (String) وذلك بجعل جميع الاحرف في حالة (small letter) ...(i'm muslim).....ثم وضع محتوي هذا المتغير في الميو الثانية ...
- هذا الكود بارك الله في الاخ (Mohammad Alsadek) قد اعطاني ايها ... فهلا لكم بعض التعديل عليه :
var
str : TStringList ;
i, j : integer ;
begin
str := TStringList.Create ;
ExtractStrings([' '], [], PChar(Memo1.Text), str);
Memo2.Clear;
For i := 0 to str.Count - 1 Do
Memo2.Lines.Add(str.Strings + ' ') ;
End;
- مع خالص الشكر....
