在OnKeyDown 事件中写如下程序即可
Case KEY Of
VK_F2 : btAppendClick(Self); // F2 : 新增
VK_F4 : btEditClick(Self); // F4 : 修改 ;
VK_F3 : btDeleteClick(self); // F3 : 删除
vk_F5 : btLocateUpClick(Self); //F5 :查询
$55 : if (Shift = [ssCtrl]) then BtnCancelClick(Self); // ^U : 取消
$57 : if (Shift = [ssCtrl]) then btConfirmClick(Self); // ^W : 储存
VK_ESCAPE: begin // ESC : 离开
KEY := 0;
btCloseClick(Self);
end;
VK_RETURN:
end;
