Procedure TFORM1.BT1Click (Sender: TOBJECT);
VAR
Wint, WINM: Integer;
Begin
WINM: = FindWindow (NIL, 'mad at me ");
Wint: = FindWindowEx (WINM, 0, NIL, 'See you can't listen to ");
Windows.SetParent (Wint, Self.handle);
EnableWindow (WINT, TRUE);
Windows.SetParent (Wint, WINM);
END;
As for why I use setParent. . The answer is to find it yourself. What is the difference between removal and not going.
