delphi 当ese按下时timer1变为不可用
delphi 当ese按下时timer1变为不可用
procedure TForm1.FormKeyUp(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
if VK_ESCAPE=Key then
begin
timer1.Enabled:=false;
timer2.Enabled:=false;
end;
end;
我写的这句 为什么没有效果
设置窗体的KeyPreview=True试试
FORM上应该有个KeyPreview属性，把它设成TRUE也许就管用
我建议还是用快捷键吧，方便多了，keypress事件前提时必须要有焦点
要设置窗体的属性 KeyPreview=True
如需要阅读该回复，请登录或注册CSDN!
相关问答：
Delphi 像亡国的南宋，试问这语言还有前途吗？
Win32开发不如C#；
面像对像开发不如JAVA；
系统开发不如VC++6.0；
能用性不如VB6.0；
不支持Web开发。。。
出个Delphi 2010免费一年会有人用吗？
......
就是一个服务端和一个客户端，里边有一些共用单元 ，我在 工程的SEARCH PATH里设置的路径，
里边有个结构体，我在服务端打开，加了成员，但是我在客户端其他单元访问不到我新加的，我在客户端打开那个单元，确实加� ......
Delphi(Pascal) code:
procedure Tpaigon.N2Click(Sender: TObject);
var
j,col:integer;
filename:string;
MSExcel,xlsheet,xlBook:Variant; //ole ComObj
begin
IF DBGrid1.Fields[0].AsString=' ......
Embarcadero在8月26日正式发布了RAD Studio 2010(就是大家常用的Delphi 2010)，本人花了大概四个小时来安装和体验Delphi2010，现将体验结果向大家做个简单汇报。
一.优点:
1.IDE
1.1经� ......
谁能给我发些Delphi的新手源码
我才学基础 （类以前）
希望在看些代码源码
希望朋友们给我发下
第一次来这个论坛希望大家多多帮助
谢谢了
发：281346230@qq.com
demo里也有一些
我没找到一� ......
