Внешний вид сайта:

Как привязать форму к другому окну

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

Привязка формы к чужому окну

В примере мы прикрепляем нашу форму к окну программы Калькулятор. Теперь форма становится дочерней по отношению к окну Калькулятор.

protected
   procedure CreateParams( var params: TCreateParams ); override;

{ ... }

procedure TForm1.CreateParams(var params: TCreateParams);
var
   aHWnd : HWND;
begin
   inherited;
{Любым способом получаем правильный дескриптор; можно так:}
   ahWnd := FindWindow(nil, 'Калькулятор');
{и теперь:}
   params.WndParent := ahWnd;
end;

Таким образом, можно прикрепить нашу форму к любому окну, нужно знать только HWND этого окна.

Комментарии

Нет комментариев. Ваш будет первым!