读书人

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

发布时间: 2012-03-27 13:44:24 作者: rapoo

Tedit丢失焦点的问题 大家来看下。。。。。。。。
一个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;

[解决办法]
好像是Delphi的设置parent的bug,把form.Parent := panel;换成windows.setParent(form.Handle, panel.Handle);看看
[解决办法]
同意楼上,用API:SetParent就行了。

读书人网 >.NET

热点推荐