Drag & Drop auf Button

[Mandi Nice]

Hallöchen

Habe leider nichts gefunden was mir weiterhilft. daher fange ich einen neuen Thread an.

Ich möchte mittels Drag& Drop eine Textdatei auf einen Button ziehen.
Hintergrund :
---------------
Der Anwender soll eine Datei auf den Button ziehen können.
Der Link zur Datei wird dann in einer Datenbank gespeichert der Dateiname am Button angezeigt.
Wenn er nun auf den Button klickt soll die Datei automatisch geöffnet werden.



Mit DragAcceptFiles (Button1.Handle,True);
und bearbeiten der Message WM_DROPFILES sollte es eigentlich funktionieren.

Tut es aber leider nicht. Der Cursor ändert sich zwar wie erwartet.
Aber die Message kommt nicht.

Habe dann eine Listbox verwendet. Und da funktionierts.
Der Mauscursor blendet um wenn die Maus das Listview erreicht und wenn ich die Maustaste auslasse wird die Message DROPFILES empfangen.

Also mein Code sollte daher funktioneren.
Aber warum geht es nur mir der Listbox und nicht mit dem Button ?
Habs auch mit einem Memo versucht. Geht auch nicht :-(


Vielen Dank für Eure Hilfe

hmg
Mandi

[bttb930]

ich weiß ja nicht wie du das lösen willst, aber scheinbar gehst du nicht den standardweg.

der wäre:

OnDragOver und OnDragDrop überschreiben.

Dann gehts auch mit einem button.

[Mandi Nice]

Hallöchen

OnDragOver und OnDragDrop geht leider nur von einem Delphi-Objekt zum Anderen.

Ich meine Drag&Drop von ausserhalb von Delphi zu einem Button.
Also eine Datei aus dem Explorer in meine Andwendung ziehen !!.

hmg
Mandi