Tedit丢失焦点的问题 大家来看下。。。。。。。。

Question

一个form 上有一个panel，在这个panel又嵌套一个form，这个form上有edit和button，结果button能获得鼠标焦点，edit不行。代码如下，
var
  edit: TEdit;
  form: TForm;
  butt: TButton;
begin
  form := TForm.Create(panel);
  form.Parent := panel;
  form.Align := alClient;
  form.BringToFront;
  form.Show;
  form.SetFocus;
  edit := TEdit.Create(form);
  edit.Parent := form;  edit.Text := '2222';
  edit.SetFocus;  butt := TButton.Create(form);
  butt.Parent := form;
  butt.Caption := '33333';
  butt.Top := edit.Top + 30;

Answer 1

好像是Delphi的设置parent的bug，把form.Parent := panel;换成windows.setParent(form.Handle, panel.Handle);看看

Answer 2

同意楼上，用API：SetParent就行了。