TLama

Untitled

May 8th, 2013
382
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Delphi 0.16 KB | None | 0 0
  1. procedure TForm1.Button1Click(Sender: TObject);
  2. begin
  3.   Windows.SetParent(ChildForm.Handle, Handle);
  4.   ChildForm.Align := alClient;
  5.   ChildForm.Show;
  6. end;
Advertisement
Add Comment
Please, Sign In to add comment