![]() |
|
|
Регистрация Восстановить пароль |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
![]() |
|
Опции темы
![]() |
Поиск в этой теме
![]() |
![]() |
#1 |
Пользователь
Регистрация: 27.04.2008
Сообщений: 17
|
![]()
Как сделать так, чтобы при форма обновилась, то есть допустим у меня есть ресурсоемкие задачи, которые стопорят полностью форму, но они запущены в цикле, так вот мне нужно, чтобы по окончании цикла форма обновлялась.
Например: В мемо появляются надписи при выполнении программы, если выдать showmessage в конце каждого цикла, то будет видно обновление мемо, но при этом нужно еще на кнопку ок клацать(showmessage), так вот вопрос в том как сделать такое обновление не используя showmessage и иже с ними. Заранее спасибо, объяснил надеюсь доходчиво)) P.S form.refresh пробовал, не то. |
![]() |
![]() |
![]() |
#2 |
Участник клуба
Регистрация: 01.11.2006
Сообщений: 1,051
|
![]()
Попробуйте еще
Код:
|
![]() |
![]() |
![]() |
#3 |
Пользователь
Регистрация: 27.04.2008
Сообщений: 17
|
![]()
Гениально! Спасибо! Ура!!
|
![]() |
![]() |
![]() |
#4 |
Регистрация: 03.05.2012
Сообщений: 4
|
![]()
полный листинг программы можете написать
|
![]() |
![]() |
![]() |
#5 |
Форумчанин
Регистрация: 08.12.2008
Сообщений: 156
|
![]()
еще вариант application.ProcessMessages
|
![]() |
![]() |
![]() |
#6 |
МегаМодератор
СуперМодератор
Регистрация: 09.11.2010
Сообщений: 7,429
|
![]()
Ресурсоемкие задачи положено выносить в отдельные потоки
![]() http://www.delphi-manual.ru/threads.php http://www.delphi-manual.ru/synchronize.php С помощью synchronize меняйте содержание memo. ПС Да простят меня модераторы за некропост - не сразу заметил дату топикстарта
Пишите язык программирования - это форум программистов, а не экстрасенсов. (<= это подпись
![]() |
![]() |
![]() |
![]() |
#7 |
Новичок
Джуниор
Регистрация: 18.02.2013
Сообщений: 2
|
![]()
первая форма
procedure TForm1.FormActivate(Sender: TObject); begin Form1.Refresh; end; .......... вторая форма procedure TForm2.sBitBtn1Click(Sender: TObject); begin //какое-то действие. в конце. Form1.FormActivate(Form1); end; |
![]() |
![]() |
![]() |
![]() |
||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Одну и ту же форму использовать как MDI-child форму и как модальную форму? | PrimaryPro | Общие вопросы Delphi | 2 | 10.03.2010 20:52 |
Обновить Directorylistbox? | Leo20 | Общие вопросы Delphi | 2 | 06.12.2009 14:50 |
Обновить Timage | ScorpioN_T | Компоненты Delphi | 8 | 15.05.2009 02:26 |
Как изменить стандартную форму на форму любой сложности | QwErEn | Общие вопросы Delphi | 9 | 08.06.2007 11:44 |
Обновить Memo | VDLab | Win Api | 7 | 02.06.2007 01:43 |