Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Потрепаться";
Текущий архив: 2003.04.17;
Скачать: [xml.tar.bz2];

Вниз

Как мне приостановить программу на время.   Найти похожие ветки 

 
sashas   (2003-04-01 14:37) [0]

Мне надо остановить программу до того, как User нажмет на некую кнопку. Покажите направление.


 
Игорь Шевченко   (2003-04-01 14:42) [1]

ShowMessage ("Нажми кнопку")


 
Anatoly Podgoretsky   (2003-04-01 14:43) [2]

Идеология времен однопрограммных систем, типа ДОС.

1. Убрать или запретить все остальные кнопки и заблокировать пункты меню.
2. написать консольное приложение, типа ДОС


 
Palladin   (2003-04-01 14:47) [3]


> sashas © (01.04.03 14:37)

а куда она у тебя бежит?


 
sashas   (2003-04-01 14:52) [4]

Anatoly Podgoretsky
Расскажи поподробнее как заблокировать все остальные компоненты.
Кроме как каждому установьть Enabled в false


 
Anatoly Podgoretsky   (2003-04-01 14:54) [5]

Ну что делать если ты против установки Enabled в false, ну тогда попробуй для них Visible false


 
Внук   (2003-04-01 14:56) [6]

Угу, "не доезжая до следующего светофора 300 м., поверните направо".

Нужно только угадать, когда пользователь собирается нажать кнопку, и за некоторое время до этого остановить программу :)


 
sashas   (2003-04-01 14:58) [7]

Anatoly Podgoretsky
Не проблема в том чтобы это сделать, но тогда надо где то в одном месте хранить указатели на все объекты, тогда проблем нет,
но это некрасиво...


 
sashas   (2003-04-01 15:00) [8]

Внук
Проблема не в том чтобы угадать, а в том чтобы остановить.


 
Anatoly Podgoretsky   (2003-04-01 15:01) [9]

Хранить указатели в одном месте это как раз не проблема.
Проблема в другом, в старом ДОСовском подходе.


 
Dm9   (2003-04-01 16:18) [10]

>Кроме как каждому установьть Enabled в false
А почему? Это делается просто
for i := 0 to ControlCount-1 do
Controls[i].Enabled := False;


 
Diamond Cat   (2003-04-01 16:24) [11]

while msg.message<>чему-то do dispatchmessge(..


 
panov   (2003-04-01 16:25) [12]

Мне надо остановить программу до того, как User нажмет на некую кнопку. Покажите направление.

Вопрос абсолютно непонятен...

Если ты пишешь консольную программу, которая выполняется без графического интерфейса, то отуда в программе кнопки?

Если используешь формы, то тогда у тебя событийно-управляемая программы и что-то дополнительно делать для остановки выполнения не нужно.


 
alxx   (2003-04-01 16:30) [13]

Кнопку на клавиатуре, мышке, корпусе или пейджере?


 
Phantomouse   (2003-04-01 18:37) [14]

Гораздо проще скрывать на некоторое время форму или устанавливать ее (MainForm) свойство Enabled в false по событию OnKeyDown если key=1, а по событию OnKeyDown (key=2) вновб ставить enabled в true. Хотя если программа досовская, то правда, откуда там кнопки???


 
Юрий Зотов   (2003-04-01 18:55) [15]

> надо остановить программу до того, как User нажмет на некую кнопку.

Если программу остановить, то как она сможет узнать, что юзер нажал на кнопку и пора просыпаться?

Никак. Подумайте над этим. И переформулируйте вопрос. Если, конечно, Вам действительно нужен нормальный совет.




Страницы: 1 вся ветка

Форум: "Потрепаться";
Текущий архив: 2003.04.17;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.47 MB
Время: 0.007 c
1-54587
Елена
2003-03-30 23:46
2003.04.17
TStringGrid с свойством Captions:TStrings(заголовки столбцов)


14-54863
Lucky Startik
2003-04-01 17:25
2003.04.17
Возможности DELPHI


8-54771
alois
2003-01-02 22:37
2003.04.17
Проигрывание WMA-файлов в случайном порядке


3-54412
jack128
2003-03-31 18:16
2003.04.17
Проэктирование базы


1-54671
vile
2003-04-04 14:21
2003.04.17
Перерисовка формы





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский