Скачать: CL | DM;

Приостановление выполнения процедуры до нажатия кнопки "Далее"!   Найти похожие ветки 

← →
JOnyto   (2004-10-29 09:24) [0]

Уважаемые Мастера, интересное решение такой задачи.
Создана процедура "Быстрой сортировки"(рекурсивный алгоритм).Нужно модернизировать ее так, чтобы впроцессе выполниения она приостанавливалась и выводила промежуточные значения временных переменных для просмотра пользователя.После просмотра пользователь должен нажатеть кнопку "Далее". Процедура должна продолжаться. Все это в цикле.Помогите, Плиззззз!!!!!!

---

← →
JOnyto   (2004-10-29 09:26) [1]

Помогите пожалуйста, очень нужно.

---

← →
Vit@ly ©   (2004-10-29 09:32) [2]

Application.ProcessMessages;
+
модальная форма

---

← →
JOnyto   (2004-10-29 09:36) [3]

Извените но модальная форма не приемлема в данном случае. Можно как либо по другому.

---

← →
JOnyto   (2004-10-29 09:43) [4]

В дальнейшем планируется для тестирования пользователя приостанавливать процедуру запращивать значение переменных и если они не совпадают с текущими выдавать ошибку.

---

← →
Vit@ly ©   (2004-10-29 09:44) [5]

модальная форма для вывода на нее промежуточных результатов.
И интересно почему
> модальная форма не приемлема в данном случае
?

---

← →
JOnyto   (2004-10-29 09:46) [6]

Такова постановка задача.

---

← →
Sandman25 ©   (2004-10-29 09:49) [7]

Тогда флаг использовать.

...
IsButtonDown := False;
while not IsButtonDown do
 Application.ProcessMessages;
...
IsButtonDown := False;
while not IsButtonDown do
 Application.ProcessMessages;
...

А в OnClick кнопки
IsButtonDown := True;

---

← →
JOnyto   (2004-10-29 09:52) [8]

Sandman25 Большое спасибо!

---

← →
JOnyto   (2004-10-29 09:54) [9]

Может кто знает как еще. Может API использовать, научить буду благодарен.

---

← →
Плохиш ©   (2004-10-29 10:20) [10]

> JOnyto   (29.10.04 09:46) [6]
> Такова постановка задача.

Интересная постановка задачи :-( "Вырежте гланды, но через ж..."

---

← →
Ozone ©   (2004-10-29 13:40) [11]

Можно с потоком поиграться.

---

← →
panov ©   (2004-10-29 14:02) [12]

http://delphimaster.net/view/15-1098979399/

---

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

Скачать: CL | DM;



Память: 0.47 MB
Время: 0.024 c