как вернуть всё в первичное состояние

[m1zantrop]

Сообщение от s-andriano

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

если можно, то как?

[s-andriano]

Прибить поток.

[m1zantrop]

Сообщение от s-andriano

Прибить поток.

хорошо начали

[GunSmoker]

А в чём проблема закрыть/открыть форму? Выйти из процедуры и зайти снова?

[m1zantrop]

Сообщение от GunSmoker

А в чём проблема закрыть/открыть форму? Выйти из процедуры и зайти снова?

мне показалось это тупо, каждый раз перезапускать программу

[GunSmoker]

Кто говорит про перезапуск программы?

http://www.gunsmoker.ru/2008/10/x-y-z.html

[m1zantrop]

Сообщение от GunSmoker

Кто говорит про перезапуск программы?

http://www.gunsmoker.ru/2008/10/x-y-z.html

у меня все действия происходят на одной форме) спасибо, интересно.

[GunSmoker]

(вздох)

По-моему, ты ничего не понял.

Ссылку тебе привели по той причине, что предлагают тебе подробно описать, что ты хочешь сделать. Потому что народ в недоумении от твоих оригинальных (tm) трактовок типа "обнулить процедуру". С таким подходом "как-сделать-то-хрен-кто-поймёт-что" ты решение сто лет будешь искать. Нет бы нормально обрисовать ситуацию: "имею такую программу, вот тут у меня вводится что-то-там, тут я вычисляю, здесь использую, а теперь нужно, чтобы вот тут было вот это".

[m1zantrop]

Сообщение от GunSmoker

(вздох)

По-моему, ты ничего не понял.

Ссылку тебе привели по той причине, что предлагают тебе подробно описать, что ты хочешь сделать. Потому что народ в недоумении от твоих оригинальных (tm) трактовок типа "обнулить процедуру". С таким подходом "как-сделать-то-хрен-кто-поймёт-что" ты решение сто лет будешь искать. Нет бы нормально обрисовать ситуацию: "имею такую программу, вот тут у меня вводится что-то-там, тут я вычисляю, здесь использую, а теперь нужно, чтобы вот тут было вот это".

я понял с какой целью кидалась ссылка.

у меня имеется программа тестирования. по ходу самого тестирования. переменные меняются, и все другие свойства. получается так. тестирование пройдено. результаты вносятся в базу данных. но когда открываешь окно тестирования снова, там появляется тоже самое окно, что было при окончаниее тестирования. т.е прогресс бар загружен, груп и комбо боксы забиты, переменные не нулевые. цель вопроса было узнать, можно как нибудь сбросить эти настройке не придаваясь бональному обнулению всего по отдельности? т.е избежать этого:

Form1.TestBox.Enabled:=false;
Form1.Timer1.Enabled:=false;
Form1.Button1.Enabled:=false;

Form1.AnswerGroup.Items.Clear;
Form1.Question.Caption:='';
Form1.Label1.Caption:='';

Form1.ProgressBar1.Min:=0;
Form1.ProgressBar1.Visible:=false;
Form1.Caption:='Программа тестирования учащихся';

Form1.ball:=0;
Form1.s:=nil;
Form1.i:=0;
Form1.t:= 0;
Form1.p:=0;
Form1.N:=0;
Form1.now:=0;

[phomm]

Вынести логику из формы в класс, на время теста создавать класс, он пусть хранит все данные и при изменении этих данных форма просто их отображает (при начале работает также), по окончании теста класс убивать.

Заметьте, я советую не то что Вы просите, а говорю, что Вам надо избавиться от каши из всего кода, остальные бонусы сами по себе появятся.