if key =char(VK_DELETE) then
key := #0;
key := #0;
解决方案 »
- 请问怎么设置所有DBEdit只读,ADOTable+DBEdit
- delphi sppcomm串口通信
- 请问 如何 改变 toolbar 控件 中 toolbarbutton 的 字体颜色 ????
- 有关从datasetA获取datasetB的问题
- 十万火急 请问大虾:如何把字符串中的数字提取出来
- 怎么用SQL语句实现以下功能?
- zbird还要吗?
- delphi 程序怎么运行后加载到Explorer进程~~
- 提一个菜鸟的问题关于地址访问
- 各位大虾,请问windows的图标文件放在何处?如何使用它?
- delphi和excel宏高手请进!!(高分!!!!!!!!!!!)
- 怎样知道listbox中选定的是哪一项?
VK_DELETE = 46;
OnKeyPress只能识别可显示的键
应该检测OnKeyDown才对
if key =VK_DELETE then
key := #0;
procedure TForm1.FormKeyPress(Sender: TObject; var Key: Char);
begin
if key =VK_DELETE then
key := #0;
end;
Shift: TShiftState);
begin
if key=VK_DELETE then
key:=0;
end;
Delphi6.0,2000下通过