how to forbid all itemtype insert into the cell except text?
Posted: Thu Nov 25, 2010 3:20 pm
I have some cells in table. user can insert, modify the cell text, but don't allow insert other item type into it.
how to do?
how to do?
To prevent inserting non-text items by drag&drop, you can assign rve.AcceptDragDropFormat := [rvddText, rvddUnicodeText]. Or you can forbid accepting drag&drop by assigning rve.AcceptDragDropFormat := [].
As for pasting, you can use OnPaste event. This code allows pasting only a plain text:
Code: Select all
procedure TForm1.rvePaste(Sender: TCustomRichViewEdit;
var DoDefault: Boolean);
var s: String;
begin
if Clipboard.HasFormat(CF_TEXT) then begin
s := Clipboard.AsText;
rve.InsertText(s, False);
end;
DoDefault := False;
end;