Форум: "Начинающим";
Текущий архив: 2006.04.16;
Скачать: [xml.tar.bz2];
Вниз
Есть не большой вопрос Найти похожие ветки
← →
qqpp (2006-03-29 17:44) [0]Как сделать паузу между двумя действиями
......
begin
Label12.Visible := true ;
Sleep(2000);
Label12.Visible := false ;
end
Если делать так,
то если в Лейбле есть текст сперва идет пауза, а затем пустая лейбл и не гаснет.
← →
Palladin © (2006-03-29 17:54) [1]если хочешь сделать мигание то используй TTimer
иначе можешь сделать
begin
Label12.Visible := true ;
Application.ProcessMessages;
Sleep(2000);
Label12.Visible := false ;
end
← →
oldman © (2006-03-29 18:15) [2]Label12.Visible := true ;
for i=1 to 10000000000000...скоканада do ;
Label12.Visible := false ;
← →
Rial (2006-03-29 19:02) [3]
begin
Label12.Visible:=True;
Label12.Repaint;
For i:=0 to 19 do begin
Sleep(100);
Application.ProcessMessages;
end;
Label12.Visible:=False;
← →
qqpp (2006-03-29 19:28) [4]Мне просто на чтоб нажал на кнопку высветилась надись на 3 сеунды и исчезла, этим (описанным выше) способом выводится только пустой лейбл, и едит тоже
← →
Rial © (2006-03-29 19:51) [5]А про Edit я что то только сейчас услышал.
Может, попробовать Label12.Caption:="Я не пустой" ?
← →
Kolan © (2006-03-29 21:28) [6]Мне просто на чтоб нажал на кнопку высветилась надись на 3 сеунды и исчезла, этим (описанным выше) способом выводится только пустой лейбл, и едит тоже
procedure TForm1.BitBtn1Click(Sender: TObject);
begin
Label1.Caption := "Íàäïèñü";
Application.ProcessMessages;
Sleep(3000);
Label1.Caption := "";
end;
Чувствую сделуюшим будет вопрос: Как сделать чтобы окно не подвисало :)
← →
sniknik © (2006-03-29 21:52) [7]oldman © (29.03.06 18:15) [2]
> Label12.Visible := true ;
> for i=1 to 10000000000000...скоканада do ;
> Label12.Visible := false ;
лишить зарплаты на три месяца за саботаж! если это конечно не шутка, и такой код реально используется.
← →
qqpp (2006-03-30 00:21) [8]Всем огромное спасибо!!!
Application.ProcessMessages; обьясните что эта строка значит буду очень благодарен, вставил ее и все заработало....
← →
Германн © (2006-03-30 02:13) [9]Application.ProcessMessages принуждает твою программу выбирать сообщения из очереди сообщений не выходя из данной функции.
← →
qqpp (2006-03-30 08:58) [10]Спасибо примерно так я и понял по хелпу
PS.
Отличный форум!!!!!!!
Страницы: 1 вся ветка
Форум: "Начинающим";
Текущий архив: 2006.04.16;
Скачать: [xml.tar.bz2];
Память: 0.46 MB
Время: 0.041 c
