Советы по Delphi
Показ окна без главной формы
Как сделать форму видимой без главной формы.
Как мне сделать так, чтобы видимой была только выбранная форма? (то есть без главной формы)
Попробуйте этот код в любом вторичном окне, которое вы НЕ хотите сопровождать главным окном:
|
...
private {Это включается в объявления формы.}
{ Private declarations }
procedure CreateParams(VAR Params: TCreateParams); override;
...
procedure TForm2.CreateParams(VAR Params: TCreateParams); begin Inherited CreateParams(Params); Params.WndParent := GetDesktopWindow; end; |
Присваивая дескриптор окна родительской формы Рабочему столу, вы удаляете ту связь, которая, в нормальной ситуации, при выводе окна на самый верхний уровень, заставляет переместиться туда также целиком все приложение.
[000835]
