Как прикрепить свою форму к другому приложению

Delphi , Программа и Интерфейс , Приложения чужие

Для этого Вам понадобится переопределить процедуру CreateParams у желаемой формы. А в ней установить params.WndParent в дескриптор окна, к которому Вы хотите прикрепить форму.

... = class(TForm)
  ...
  protected
    procedure CreateParams(var params: TCreateParams); override;
  ...

procedure TForm2.Createparams(var params: TCreateParams);
var
  aHWnd: HWND;
begin
  inherited;
  {как-нибудь получаем существующий дескриптор}
  ahWnd := GetForegroundWindow;
  {а теперь:}
  params.WndParent := ahWnd;
end;

Статья Как прикрепить свою форму к другому приложению раздела Программа и Интерфейс Приложения чужие может быть полезна для разработчиков на Delphi и FreePascal.

Комментарии и вопросы

:: Главная :: Приложения чужие ::