当前位置:主页>仓库管理软件> 列表

怎样才可以发生按DELETE的事件呀?为什么按设置KEY=

财务软件版1楼: 怎样才可以发生按DELETE的事件呀?为什么按设置KEY=#127后按DELETE没有反应!

我在prekress里写入代码:
if key=#127 then
begin
showmessage(''DELETE触发'');
end;

总是行不通!

2楼: 在KEYUP里写
if key=VK_delete then if Application.MessageBox(''是否真的要删除?!'',''提示'',MB_ICONERROR + MB_YESNO) = IDYes then
DeleteRow(RzStringGrid2.row);
end;java进销存管理系统

3楼: 忘记delete的键盘码了。一时想不起记哪了。如果没错那不应该啊。


用onkeydown事件试试吧。把form的keypreview属性置true。

if key=VK_DELETE then
begin
showmessage(''DELETE触发'');
end;

4楼: 首先设置窗体的 KeyPreview:= true ;下面的代码可查看按健的键盘码(delete对应46)
procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
showmessage(inttostr(key))
end;

5楼: procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word;


Shift: TShiftState);
begin
if key=46 then //
end;

你的键值写错了。

6楼: 接受答案了.