|
#1
|
|||
|
|||
помогите с паузой
немогу понять как прописыветь команду ontime чтобы кпримеру текст на экране в окне сперве выскочила буква а а потом через 1 секунду б
|
#2
|
|||
|
|||
На форме Edit (без текста), Timer (Enabled=false) и кнопка.
Код:
procedure TForm1.Button1Click(Sender: TObject); begin Edit1.Text:= 'a'; Timer1.Enabled:= true; end; procedure TForm1.Timer1Timer(Sender: TObject); begin Timer1.Enabled:= false; Edit1.Text:= Edit1.Text + 'b'; end; |