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




Вниз

выполнение модуля 


Анатолий   (2002-01-01 03:51) [0]

Как прервать выполнение модуля? Необходимо открыть новую форму Form2, прервав вычисления в Unit1 формы Form1. При этом старая форма Form1 не должна быть закрыта.
Пишу:
procedure TForm6.Button1Click(Sender: TObject);
begin
if Label7.Caption="" then
begin
form32.Show;
form32.label1.Caption:="Введите последнюю цифру шифра";
form32.label1.Visible:=True;
stop:=true;
end;
Открывается новая форма Form2, но после
Stop:=true;
Обрабатываются команды дальше на старом Unit1. Может какие-то изменения нужны в событиях?



MBo   (2002-01-03 08:12) [1]

не очень понятно, что нужно, может, спасет
form32.ShowModal;



Анатолий   (2002-01-04 05:53) [2]

Спасибо за помощь. Надо было заменить form32.Show на form32.ShowModal




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




Наверх





Память: 0.72 MB
Время: 0.022 c
1-66296           kay                   2002-01-04 22:11  2002.01.21  
память


4-66406           hn                    2001-11-14 19:13  2002.01.21  
ссылка на Edit, как получить текст, если он в веден в него


7-66383           Dmitry V. Averuanov   2001-10-04 11:35  2002.01.21  
Не удается передать Tbitmap в качестве параметра...


3-66224           szap                  2001-12-03 15:47  2002.01.21  
Заполнение БД данными из Excel


7-66381           Asker                 2001-10-03 07:37  2002.01.21  
Как всё-таки изменить скорость CD-rom a