Forum: Win32/Win64 API (native code)
Delphi
by hanspeter,
24. Mär 2009
Interessant,
wenn ich den Parent in der Kommandozeile übergebe und die gleiche Sequenz auf der Plugin-Seite
abarbeite, dann geht es.
Jetzt auf der Clientseite.
procedure SetClientParent(wnd, Parent: THandle);
var
WPM : TWindowPlacement;
w,h : integer;
Forum: Win32/Win64 API (native code)
Delphi
by hanspeter,
24. Mär 2009
Hallo,
ich hänge bei meinem Plugin-System mal wieder an einer Kleinigkeit.
Mit nachfolgender Sequenz weise ich einer gestarteten Exe ein Panel als Parent zu.
Wnd := MainWindowHandle(ExeName);
if Wnd <>0 then
begin
Windows.SetParent(Wnd,aParent.Handle);
SetWindowLong(wnd,GWL_STYLE,(GetWindowLong(wnd,GWL_STYLE) AND NOT WS_CAPTION) or WS_CHILD);
WPM.Length:=SizeOf(WPM);