procedure ****.***KeyDown(Sender: TObject; var Key: Word; Shift: TShiftState); begin if ((Key = 67) or (Key = 99)) and (ssCtrl in Shift) then begin //Exit;解决不了问题 Abort;//可以 end; end;
时间: 2024-10-13 15:32:02
procedure ****.***KeyDown(Sender: TObject; var Key: Word; Shift: TShiftState); begin if ((Key = 67) or (Key = 99)) and (ssCtrl in Shift) then begin //Exit;解决不了问题 Abort;//可以 end; end;