Лидеры
Популярный контент
Показан контент с высокой репутацией 11.03.2019 в Сообщения
-
Можно так procedure TForm1.Button1Click(Sender: TObject); begin Label1.Text := '2'; tthread.CreateAnonymousThread( procedure begin sleep(1000); tthread.Synchronize( tthread.Currentthread, procedure begin Label1.Text := '3'; end); end). Start; end;1 балл
Эта таблица лидеров рассчитана в Москва/GMT+03:00