Этот баннер — требование Роскомнадзора для исполнения 152 ФЗ.
«На сайте осуществляется обработка файлов cookie, необходимых для работы сайта, а также для анализа использования сайта и улучшения предоставляемых сервисов с использованием метрической программы Яндекс.Метрика. Продолжая использовать сайт, вы даёте согласие с использованием данных технологий».
Политика конфиденциальности
|
|
|
Элементарный вопрос Tbutton???
|
|||
|---|---|---|---|
|
#18+
У кнопки есть событие ОнКлик – эта процедура выполняется давольно долго....... Необходимо, чтобы дапустим в Лейбел перед началом обратки вывелось сообщение «Идет процесс загрузки», а по его заверщению вывело «Загрузка завершена».... Задача вроде элементарная, но пока немогу решить Может чего подскажите?? Заранее благодарен!!!!!!! ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 07.07.2003, 16:53 |
|
||
|
Элементарный вопрос Tbutton???
|
|||
|---|---|---|---|
|
#18+
Ну так form.repaint и application.processmessages скажи. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 07.07.2003, 17:04 |
|
||
|
Элементарный вопрос Tbutton???
|
|||
|---|---|---|---|
|
#18+
procedure Form1.Button1OnClick(sender Tobject) begin Tlabel.caption = 'Please Wait!!!' ; ....you code here .... Tlabel.Cption = 'Operation complite!!!' ; end; ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 07.07.2003, 17:21 |
|
||
|
Элементарный вопрос Tbutton???
|
|||
|---|---|---|---|
|
#18+
procedure TForm1.Button1Click(Sender: TObject); var i:integer; begin Button1.Caption := 'идет процесс'; for i:= 1 to 10000 do beep; button1.Caption := 'процесс пришел'; end; ну а если вместо фор-ту вставить код "долгого процесса" - вроде всё и получится... а? ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 07.07.2003, 17:27 |
|
||
|
Элементарный вопрос Tbutton???
|
|||
|---|---|---|---|
|
#18+
ну можно и так но можно еще прочитать про CreateProcess CreatThreade ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 07.07.2003, 17:30 |
|
||
|
Элементарный вопрос Tbutton???
|
|||
|---|---|---|---|
|
#18+
не важно кто, ты крут Application.ProcessMessages - это как раз то, что нужно Спасибо осттальные товарищи не правы, до этого я бы и сам ддошел ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 07.07.2003, 17:32 |
|
||
|
Элементарный вопрос Tbutton???
|
|||
|---|---|---|---|
|
#18+
синхронное мЫшление... мда) ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 07.07.2003, 17:34 |
|
||
|
Элементарный вопрос Tbutton???
|
|||
|---|---|---|---|
|
#18+
Ну и в догонку можно еще и Update форме сказать она и прорисуется вот только трабла будя.... если во время процесса юзерповерх твоего окна выведет другое, то она уже не перерисуется... Первый вариант, если возможно внутри процесса переодически вызывать процедуру Update а второй использовать потоки ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 09.07.2003, 06:40 |
|
||
|
Элементарный вопрос Tbutton???
|
|||
|---|---|---|---|
|
#18+
Третий вариант - в цикл все тот же application.processmessages. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 09.07.2003, 11:35 |
|
||
|
|
start [/forum/topic.php?fid=58&gotonew=1&tid=2117759]: |
0ms |
get settings: |
6ms |
get forum list: |
13ms |
check forum access: |
2ms |
check topic access: |
2ms |
track hit: |
20ms |
get topic data: |
10ms |
get first new msg: |
5ms |
get forum data: |
2ms |
get page messages: |
49ms |
get tp. blocked users: |
1ms |
| others: | 229ms |
| total: | 339ms |
| 0 / 0 |
