Как прикрепить свою форму к другому приложению?
Для этого Вам понадобится переопределить процедуру 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
;
Шкафы-купе за 10 тысяч рублей:
купить угловой шкаф купе
.