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.