Delphi打开窗体不能输入了
procedure TForm2.ShowForm(aform:TForm;aformClass:TFormClass);
begin
if assigned(self.ActiveForm) then self.ActiveForm.Destroy;
aform:= aformClass.Create(owner);
aform.Parent:= self.Panel1;
aform.Top:=0;
aform.Left:=0;
aform.Show;
self.ActiveForm:= aform;
end;
procedure TForm2.TreeView1DblClick(Sender: TObject);
var
form: TForm2;
begin
if TreeView1.Selected = nil then Exit;
if TreeView1.Selected.Text='注册' then
begin
ShowForm(form,TForm5);
end;
end;
我打开窗体后不能输入。但是可以进行操作。高手帮忙看看
...全文
相关推荐
delphi自动弹出式提示窗体
通过以上这些步骤,你就能在Delphi中创建出类似QQ的自动弹出式提示窗体了。记得在编写代码时注重可读性和维护性,同时考虑不同场景下的用户体验。
delphi 悬浮窗体
通过深入理解Delphi的窗体管理和图形操作,你可以创建更加复杂和功能丰富的悬浮窗体应用。
Delphi软键盘(支持中文输入)
总的来说,Delphi软键盘项目展示了如何利用Delphi的强大力量来开发一款实用的触摸屏输入工具,尤其是在支持中文输入方面,它为我们提供了一个很好的实例,帮助我们理解软键盘设计的各个方面。
delphi 记录体类型妙用
这个主题,"delphi 记录体类型妙用",涵盖了如何有效地利用记录类型来提升代码的可读性、效率和灵活性。下面将详细讨论记录类型的特性、使用场景以及一些高级技巧。1.
delphi edit只能输入英文
### Delphi Edit 控件仅允许输入英文字符的实现方法在Delphi开发环境中,经常会遇到需要控制用户输入的情况,比如只允许用户输入英文字符。


