Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Как закрыть модальное окно?


Страницы:   1 2 3

PZ ©   (2006-12-25 12:51:00) 

У меня модальная форма без заголовка:
BorderStyle = bsNone
KeyPreviw = True

Всю площадь формы закрывает компонент Bevel1, а его
полностью закрывает метка Label1
Пробую два варианта закрыть форму - не закрывается.
Как же её можно закрыть? Подскажите, пожалуйста.

procedure TForm1.FormDblClick(Sender: TObject);
begin
 Form1.Close;
end;

procedure TForm1.Label1DblClick(Sender: TObject);
begin
 Form1.Close;
end;


Anatoly Podgoretsky   (2006-12-25 13:23:00) [41]

> PZ  (25.12.2006 13:14:03)  [3]

Чем докажешь?


PZ   (2006-12-25 13:21:00) [42]

> [2] novill ©   (25.12.06 13:12)

У меня почему-то не работает. Проверю еще раз.


Ega23   (2006-12-25 13:16:00) [43]


> Form1 - это  та самая модальная форма, которую пытаюсь закрыть
>


МодалРезулт:=мрОК


PZ   (2006-12-25 13:14:00) [44]

>  [1] Anatoly Podgoretsky ©   (25.12.06 13:06)

Form1 - это  та самая модальная форма, которую пытаюсь закрыть


novill   (2006-12-25 13:12:00) [45]

[0] PZ   (25.12.06 12:51)
второй вариант работает.


Anatoly Podgoretsky   (2006-12-25 13:06:00) [46]

> PZ  (25.12.2006 12:51:00)  [0]

А чей у тебя Form1 ?


Страницы:   1 2 3

Наверх

Титульная страница Поиск, карта сайта Написать письмо