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

[mandarin]

一个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;

[s11ss]

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

[ccrun.com]

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

[mandarin]

非常感谢

[wonder000xyz]

拜楼上大神啊，整了好几天了这玩意。