procedure TForm1.FormActivate(Sender: TObject);
begin
ActiveControl :=nil;end;
begin
ActiveControl :=nil;end;
解决方案 »
- 挥泪求解决这个方程式的问题,计算机能较短的时间内计算出结果~~~~
- 求一个自来水公司总分表的算法
- 用分换D版人气. 哎, 没有人气.
- 请教各位!哪里有Delphi 8.0 下载的地址?
- 从数据库取出图片在Image中显示的问题。
- 能不能实现一个程序在运行时完成自身复制?
- StringGrid
- 关于adocommand中写restore database first,遇到错误信息'the RAID set for database 'first' is missing member number 1
- 还是formshow的问题
- 想深入学习Delphi那些书比较合适?
- 菜鸟问题!help!谢谢!
- INI文件可否在某一个小节中又有几个小节?
begin
SendMessage(Edit1.handle,WM_KILLFOCUS,0,0);
end;但是Edit1的taborder 需要设为 0,也就是给taborder=0的控件发一个sendmessage