Уперся "рогом" !

[Lotse]

Вот простой текст кода в Delphi:

procedure TForm1.Button1Click(Sender: TObject);
begin

Label1.Caption:='Read chip';
sleep(5000);
end;

sleep(5000) - замена некоего цикла, который длится примерно это время. Не могу решить вопрос - почему при нажатии на волшебный кнопк буттон сначала выполняется sleep(5000), а затем Label1.Caption... ???

[russian-stalker]

procedure TForm1.Button1Click(Sender: TObject);
begin
Label1.Caption:='Read chip';
Application.ProcessMessage();
sleep(5000);
end;

[Lotse]

Спасибо ! Ну, век живи - век учись ! Хотя где это описано ? Много литературы прочитал, но такие "мелочи" не знал. Может посоветуете толковую литературу ? Мне в данном случае надо оформить в божеский (хотя-бы) вид программу для записи и чтения программируемых микросхем. В остальном все работает

[russian-stalker]

Так вы занимаете основной потом своим ивентом, а сообщения начинают накапливаться в буфере. Соответственно, надпись обновится только по завершению вашего ивента.
Application.ProcessMessage(); - заставляет обработать все накопленные в буфере сообщения.

[Lotse]

Дааа... Pascal, где ты родимый... Спасибо russian-stalker ! Приходится осваивать новые рубежи - 32-х разрядные