информационная безопасность
без паники и всерьез
 подробно о проектеRambler's Top100
Spanning Tree Protocol: недокументированное применениеЗа кого нас держат?Сетевые кракеры и правда о деле Левина
BugTraq.Ru
Русский BugTraq
 Анализ криптографических сетевых... 
 Модель надежности двухузлового... 
 Специальные марковские модели надежности... 
 Раздача вредоносных CPU-Z и HWMonitor 
 На GitHub пугают ложными предупреждениями... 
 Атака на пользователей больших... 
главная обзор RSN блог библиотека закон бред форум dnet о проекте
bugtraq.ru / форум / programming
Имя Пароль
ФОРУМ
если вы видите этот текст, отключите в настройках форума использование JavaScript
регистрация





Легенда:
  новое сообщение
  закрытая нитка
  новое сообщение
  в закрытой нитке
  старое сообщение
  • Напоминаю, что масса вопросов по функционированию форума снимается после прочтения его описания.
  • Новичкам также крайне полезно ознакомиться с данным документом.
[Delphi] Как из одного окна вызывать другое? 31.03.02 16:00  Число просмотров: 1086
Автор: Biasha <Бяша> Статус: Member
<"чистая" ссылка>
> Включаешь в проект новую форму form2,
> потом в Unit1
> Uses
> form2
> Птом закрываем form1.Close нажатием кнопки....
> Теперь.... как после закрытия Form1 показать Form2?
Uses Unit2;
procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction);
begin
  Form2.Show;
  Action := caNone;
  Form1.Hide;
end;

---
Правда я не понял, чего при Action := caHide; закрывается приложение.
<programming>
[Delphi] Как из одного окна вызывать другое? 31.03.02 15:35  
Автор: choor Статус: Elderman
<"чистая" ссылка>
Включаешь в проект новую форму form2,
потом в Unit1
Uses
form2
Птом закрываем form1.Close нажатием кнопки....
Теперь.... как после закрытия Form1 показать Form2?
[Delphi] Как из одного окна вызывать другое? 31.03.02 16:00  
Автор: Biasha <Бяша> Статус: Member
<"чистая" ссылка>
> Включаешь в проект новую форму form2,
> потом в Unit1
> Uses
> form2
> Птом закрываем form1.Close нажатием кнопки....
> Теперь.... как после закрытия Form1 показать Form2?
Uses Unit2;
procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction);
begin
  Form2.Show;
  Action := caNone;
  Form1.Hide;
end;

---
Правда я не понял, чего при Action := caHide; закрывается приложение.
1




Rambler's Top100
Рейтинг@Mail.ru


  Copyright © 2001-2026 Dmitry Leonov   Page build time: 0 s   Design: Vadim Derkach