我遇到一小麻烦。 放一个按钮,设置VISIBLE:=FALSE;ONKEYDOWM()BEGIN BUTTON.CLICK;END;或者sendmessage(handle,WM_CLOSE,1,0); 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word; Shift: TShiftState);begin case Key of VK_RETURN: Close; end;end;procedure TForm1.FormCreate(Sender: TObject);begin KeyPreview := True;end; 缺少更新或刷新的键列信息 大家看看我下面的程序有什么问题,是关于自定义提示窗口的 如何截获指定控件的消息 有什么可以代替Close和Open刷新数据集? 如何将onKeyDown中的代码移植到onKeyPress中 DBLookupCombobox问题 难题:如何在A程序中获得B程序的MDI子窗的句柄? 高手请进,问题绝不会让你失望!!!!! 登陆密码问题,请教 初学者提问:为什么应用无法关闭 写了组件,不知有没用,各位看看.(TSocketConnectionEx for D6) 如何将TQUERY查询出的数据项导入一个表
Shift: TShiftState);
begin
case Key of
VK_RETURN: Close;
end;
end;procedure TForm1.FormCreate(Sender: TObject);
begin
KeyPreview := True;
end;