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

Вниз

Немодальную форму сделать модальной?   Найти похожие ветки 

 
Ерик   (2002-10-21 11:22) [0]

Возмолжно ли сделать субж?


 
Skier   (2002-10-21 11:24) [1]

ShowModal ? :)


 
Игорь Шевченко   (2002-10-21 11:29) [2]

Возможно


 
Ерик   (2002-10-21 11:44) [3]

Игорь Шевченко © (21.10.02 11:29):
begin
Form2 := TForm2.Create(Application);
Form2.Show;
...
ХочуМодальнуюФорму(Form2);
Form2.Free();
end;

Как релизовать процедуру ХочуМодальнуюФорму ?


 
Игорь Шевченко   (2002-10-21 11:45) [4]

Посмотреть в Program Files/Borland/Delphi/Source/VCL/Forms.pas реализацию ShowModal


 
Skier   (2002-10-21 11:47) [5]

>Ерик

begin
Form2 := TForm2.Create(Application);
try
Form2.ShowModal;
finally
FreeAndNil(Form2);
end; //try
end;


 
Ерик   (2002-10-21 12:03) [6]

Skier © (21.10.02 11:47):
Вроде, я ясно написал:
begin
Form2 := TForm2.Create(Application);
Form2.Show; // Имеем немодальную
... //Выполняем некоторый код...
ХочуМодальнуюФорму(Form2); //Теперь нужно чтобы Form2 стала модальной того чтобы ее закрыть
Form2.Free();
end;

Можно сделать так

begin
Form2 := TForm2.Create(Application);
Form2.Show;
... //Выполняем некоторый код...
Form2.Hide();
Form2.ShowModal;
Form2.Free();
end;

Но хотелось бы без закрытия.

Игорь Шевченко © (21.10.02 11:45):
Попытаюсь. Thanks.


 
REA   (2002-10-21 12:09) [7]

А зачем такой изврат? Передай параметры нужные в форму и все. Код можно перебросить в форму или отдельный модуль. В конце концов можно передать Callback.
А ты уверен что за то время пока ты выполняешь "некоторый код" пользователь не произведет какие-то действия?


 
Bis   (2002-10-21 13:17) [8]

для того, чтобы закрыть, не обязательно делать модальной
просто вызови при нажатии определенной кнопки метод Close
А чтобы поймать например нажатие Enter, можно сделать обработчик на форму.
Способов много.



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

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

Наверх





Память: 0.46 MB
Время: 0.014 c
1-101258
pirat
2002-10-21 15:16
2002.10.31
А как вставить BMP в hint ?


8-101379
AndyU
2002-07-01 12:53
2002.10.31
DirectX


1-101290
dimonf
2002-10-22 16:55
2002.10.31
Как вытащить данные из документа Microsoft Word.


3-101134
Lola
2002-10-09 14:58
2002.10.31
Создание альяса базы в ODBC в Inno Setup


7-101533
Flying Bird
2002-08-26 00:40
2002.10.31
Как получить (изменить) атрибуты файла?





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский