Automatisches Drag&Drop von JvRichEdit überschreiben / deakt

[Flocke]

1. Der RichEdit-Fensterklasse kannst du das eigenständige OLE Drag&Drop verbieten, indem du das Fensterstil-Bit ES_NOOLEDRAGDROP setzt.

Überschreibe dazu in deiner abgeleiteten Klasse die Routine "CreateParams":

Delphi-Quellcode:

TMyRichEdit.CreateParams(var Params: TCreateParams);
begin
  inherited;
  Params.Style := Params.Style or ES_NOOLEDRAGDROP;
end;

2. Normalerweise geht auch der von dir gewünschte Weg ohne Probleme. Hast du auch an alles gedacht, z.B. das DragAcceptFiles (am besten in in CreateWindowHandle)?

Delphi-Quellcode:

TMyRichEdit.CreateWindowHandle(const Params: TCreateParams);
begin
  inherited;
  if HandleAllocated then
    DragAcceptFiles(Handle, True);
end;