Форум: "Основная";
Текущий архив: 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. Может какие-то изменения нужны в событиях?
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2002.01.21;
Скачать: [xml.tar.bz2];
Память: 0.43 MB
Время: 0.003 c