用KeyPress事件,判键值
if key=以下值
VK_UP VK_DOWN VK_LEFT ...
then
Key:=0
if key=以下值
VK_UP VK_DOWN VK_LEFT ...
then
Key:=0
解决方案 »
- delphi中关于打开文件、读、写的
- 在dll中的mdi子窗口没法create,报Cannot create form. no MDI forms are currently active
- 怎样向操作系统注册OCX控件???
- 50分在线等.高手来.SaveToStream使用方法?
- 有没有谁在线啊?qq上帮帮忙好不好?
- 哪位高手知道如何操作注册表隐藏桌面所有的图表,急等!
- 怎让窗口保持在最前?
- 用delphi 开发 jabber客户端
- delphi xe5下控件安装,高人 集中指点一下啊
- 如何閱讀以.rar為擴展名的文件?
- 初学DELPHI,关于三层应用的疑问?
- 请问一下压缩文件的原理是什么啊(比如winzip的原理)!
应用OnKeyDown
procedure TForm1.Memo1KeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
if key=vk_up then
key:=0;
end;