怎么把button1设置为系统缺省的按钮? procedure TForm1.Memo1KeyDown(Sender: TObject; var Key: Word; Shift: TShiftState);beginif key=13 thenself.Close;end; 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 在MEMO1的ONKEYDOWN中加入IF KEY=vk_enter THEN BUTTON1.CLICK; 有个属性default :=True就行了 只要将button1的属性Default设为True既可!!! Button1.Default := True;Button1.ModalResult := mrOk;这样做一句代码都不用写. 获取webbroeser1中网页的句柄 delphi+FastReport2.5如何解决标点在句首的问题? TGroupBox组件的边框怎么不显示? 如何把做好的delphi程序写成文件.ini 兄弟们近来看看,如何解决DBGridEh中的问题 地址框的问题,高手请进! 如何按回车打开combobox菜单呢? SQL & Access 连接Delphi时有何不同? SQL数据库问题,上午出贴仍,未解决[70分] 在ListView中如何根据单元格的值来显示单元格的背景色? 很菜的问题,怎样取得listbox的值? 各位我这样清空数据库中Ole字段?
IF KEY=vk_enter THEN
BUTTON1.CLICK;
default :=True就行了
Button1.ModalResult := mrOk;
这样做一句代码都不用写.