Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.01.21;
Скачать: CL | DM;

Вниз

выполнение модуля   Найти похожие ветки 

 
Анатолий   (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



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

Текущий архив: 2002.01.21;
Скачать: CL | DM;

Наверх




Память: 0.46 MB
Время: 0.009 c
3-66208
Vygantas
2001-12-18 13:10
2002.01.21
MySQL и D6


6-66328
evgen32
2001-10-29 08:56
2002.01.21
дата и время


1-66238
~(;_;)~
2001-12-28 14:48
2002.01.21
Как сделать какой-то файл, скажем – «C: Test.cnf» заблокированным?!


1-66252
Gol2000
2002-01-02 08:43
2002.01.21
Как в TRichEdit у отдельных строк поменять цвет фона (цвет бумаги) ?


6-66325
jk
2001-10-29 11:46
2002.01.21
Как програмно поменять default gateway в WinNT/2K