Question:
Do you have method to prevent user pasting something to my memo?

Answer:
You can detect keypress and clear the clipboard.



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;



7 Responses so far.

  1. daspeac says:

    I have heard about another way of exchange server recovery. Besides, you can visit my blogs at: http://daspeac.livejournal.com/ or http://daspeac.blogspot.com/ where I’m trying to share my experience with regard to data corruption issues.

  2. Anonymous says:

    daspeac you are a tosser

Post a Comment

Thank you for your comment.

Any request and idea are welcome.

CLICK TO REGISTER