Оригинальный DVD-ROM: eXeL@B DVD !
eXeL@B ВИДЕОКУРС !

ВИДЕОКУРС ВЗЛОМ
выпущен 3 октября!


УЗНАТЬ БОЛЬШЕ >>
Домой | Статьи | RAR-cтатьи | FAQ | Форум | Скачать | Видеокурс
Новичку | Ссылки | Программирование | Интервью | Архив | Связь

БОЛЬШОЙ FAQ ПО DELPHI



Показ окна без главной формы

Как мне сделать так, чтобы видимой была только выбранная форма? (то есть без главной формы)

Попробуйте этот код в любом вторичном окне, которое вы НЕ хотите сопровождать главным окном:


 ...
 private {Это включается в объявления формы.}
   { Private declarations }
   procedure CreateParams(VAR Params: TCreateParams); override;
 ...
 
 procedure TForm2.CreateParams(VAR Params: TCreateParams);
 begin
   Inherited CreateParams(Params);
   Params.WndParent := GetDesktopWindow;
 end;
 

Присваивая дескриптор окна родительской формы Рабочему столу, вы удаляете ту связь, которая, в нормальной ситуации, при выводе окна на самый верхний уровень, заставляет переместиться туда также целиком все приложение.




<< ВЕРНУТЬСЯ В ОГЛАВЛЕНИЕ



Материалы находятся на сайте https://exelab.ru/pro/



Оригинальный DVD-ROM: eXeL@B DVD !


Вы находитесь на EXELAB.rU
Проект ReactOS