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