Z zm30 Unregistered / Unconfirmed GUEST, unregistred user! 2002-02-22 #2 将form的keypreview设为true 在form的keydown事件中写以下代码: if (key = 13) and (ssCtrl in Shift) then begin ; .... end;
将form的keypreview设为true 在form的keydown事件中写以下代码: if (key = 13) and (ssCtrl in Shift) then begin ; .... end;
H HunterTeam Unregistered / Unconfirmed GUEST, unregistred user! 2002-02-22 #3 楼上那位说的稍有偏差,在keydown事件应按如下写法: ; if Shift=[ssCtrl] then if key=13 then ...; ssCtrl in shift 会导致如按CTRL+ALT+SHIFT+ENTER时也执行。
楼上那位说的稍有偏差,在keydown事件应按如下写法: ; if Shift=[ssCtrl] then if key=13 then ...; ssCtrl in shift 会导致如按CTRL+ALT+SHIFT+ENTER时也执行。
L laohe Unregistered / Unconfirmed GUEST, unregistred user! 2002-02-23 #4 感谢两位的支持,我的分数不多,所以5分你们分一下 改天有分数在呈上