Question:
I want to disable keyboard shortcut for paste!

Answer:
No problem, I have example for disabling CTL-V for TMemo.
Here it is ...

{
Prevent users from pasting text in your Memo.
}

uses Clipbrd;
...

procedure TForm1.Memo1KeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
if ((Key=Ord('V'))and(ssCtrl in Shift)) then
begin
Clipboard.Clear;
Memo1.SelText:='Delphi tricks rules!';
Key:=0;
end;
end;

2 Responses so far.

Post a Comment

Thank you for your comment.

Any request and idea are welcome.

CLICK TO REGISTER