怎样才可以发生按DELETE的事件呀?为什么按设置KEY=
财务软件版1楼: 怎样才可以发生按DELETE的事件呀?为什么按设置KEY=#127后按DELETE没有反应!
我在prekress里写入代码:
if key=#127 then
begin
showmessage(''DELETE触发'');
end;
总是行不通!
Shift: TShiftState);
begin
if key=46 then //
end;
你的键值写错了。
我在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楼: 接受答案了.