Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2005.06.14;
Скачать: [xml.tar.bz2];

Вниз

Закрытие модальной формы   Найти похожие ветки 

 
NQ34   (2005-05-31 01:01) [0]

Я в Form1 даю команду покать Form2 модальной, но вот на форме 2 у меня есть кнопочка закрыть, которая должна по идее закрывать Form2 и переходить к Form1, но вот как это сделать я уже всё препробовал!!!
Если кто знает напишите код.
...
procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word;
 Shift: TShiftState);
begin
if Key = VK_RETURN then begin
Form2 := TForm2.Create(Application);
Form2.ShowModal;
Form2.Free;
end;
end;


 
Marser ©   (2005-05-31 01:07) [1]


> на форме 2 у меня есть кнопочка закрыть, которая
> должна по идее закрывать Form2 и переходить к Form1,
> но вот как это сделать я уже всё препробовал!!!

TButton.ModalResult


 
Anatoly Podgoretsky ©   (2005-05-31 09:03) [2]

Кнопку надо нажать.


 
Ega23 ©   (2005-05-31 09:42) [3]

TButton.ModalResult

Или

procedure TForm1.ButtonClick(Sender : TObject);
begin
ModalResult:=mrCancel;
end;



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

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

Наверх




Память: 0.44 MB
Время: 0.039 c
1-1116719790
scrazy
2005-05-22 03:56
2005.06.14
7 и 8 Преобразования грамматик.


6-1111755937
Radgar
2005-03-25 16:05
2005.06.14
Ограничение посылки SendText в ServerSocket


4-1114077383
lpVoid
2005-04-21 13:56
2005.06.14
Как сохранить ресурс в файл?


14-1116784402
Vulko
2005-05-22 21:53
2005.06.14
Как сделать div на c++ ?


6-1108259709
Seha_To
2005-02-13 04:55
2005.06.14
Сервер-клиент tapi на Delphi7?





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский