كيف أقدر أقرأ Text كلمة كلمة وكل كلمة تطبع في سطر

[NOna]

أخي hanipino
أنا مبتدئة في الدلفي
حاولي في هذا الكود لكن ما اشتغل معي أنا عملت الأتي

PHP كود :

if not OpenDialog1.Execute then Exit;
  Memo1.Clear;
  AssignFile(myfile,OpenDialog1.FileName);
  Reset(MyFile);
    while not Eof(MyFile) do
     begin
     Readln(MyFile,Text1);
.
.
.
.

 end;
     CloseFile(MyFile);
end;