Memo

[mahboob]

با سلام به دوستان
من میخواهم اطلاعات داخل یک Memo را خط به خط خوانده و در یک آرایه ذخیره کنم . لطفا دستور مربوط به آن را به من تازه وارد بگوویید.
متشکر :ناراحت:

[mzjahromi]

for i:=0 o Memo1.Lines.Count-1 do
begin
s:=memo1.lines[i];
showmessage(s);
end;