Drag'n'Drop für ein Dialogfenster

[mz23]

Guten Morgen liebe DP Gemeinde,
ich suche und probiere an dem Drag'n'Drop herum,
um Dateien vom Windows-Explorer in meine Anwendung
zu ziehen.
Dazu verwende ich aus der Code-Library folgenden Tipp:

http://www.delphipraxis.net/126950-d...einfuegen.html

Es funktioniert wunderbar.
Aber wenn ich diesen Tipp in einem Dialog-Fenster des
Hauptformulars verwende, dann kommt nur der MausCursor
mit dem Bildchen "geht nichts zum Dropen" ins Bild.

Daraufhin habe ich verschiedenes ausprobiert:
In

Delphi-Quellcode:

procedure TDialog1.FormCreate(Sender: TObject);
begin
  DragAcceptFiles(ListBox1.Handle, True);
end;

habe ich für ListBox1.Handle alle möglichen Handles
ausprobiert:
Application.Handle, Application.DialogHandle, Handle,
HInstance.

Auch habe ich die Deklaration

Delphi-Quellcode:

private
  procedure WMDROPFILES(var Msg: TMessage); Message WM_DROPFILES;

unter public gesetzt.

Immer blieb der Maus-Cursor auf "No-Drop".

Nun meine Frage, ist es überhaupt möglich in einem
Dialogfenster das DragnDrop zu verwenden, und wenn ja,
welches Handle muß ich verwenden?

PS: Das Problem, daß ein TImage kein Handle hat und
auf einem TPanel ein zuordbares Handle erreicht ist
mir bekannt.

Schönen Dank an alle Interessierten,
und schöne Grüße aus Nürnberg von Manfred.