29-02-2016, 11:34 AM
(آخر تعديل لهذه المشاركة: 29-02-2016, 11:35 AM بواسطة محمد عبد العزيز.)
وعليكم السلام ورحمة الله وبركاته
ما الهدف من الامر ؟ اوضح حتى يمكن توجيه الاجابة الى الاصح
حسب وصفك يكفي شيئ مثل
ما الهدف من الامر ؟ اوضح حتى يمكن توجيه الاجابة الى الاصح
حسب وصفك يكفي شيئ مثل
كود :
var
i:Integer;
procedure TForm1.Timer1Timer(Sender: TObject);
begin
if i>Memo1.Lines.Count-1 then Exit;
edit1.Text:=Memo1.Lines[i];Inc(i);
Application.ProcessMessages;
end;
رَبَّنَا اغْفِرْ لِي وَلِوَالِدَيَّ وَلِلْمُؤْمِنِينَ يَوْمَ يَقُومُ الْحِسَابُ