Package DragDrop Nutzen [gelöst]

[corpsman]

Hallo Zusammen,

ich habe mir schon vor Ewigkeiten einen Plattformunabhängigen Suchendialog gebastelt. Dieser Listet mir Dateien auf meinem System auf

Da war es dann auch Möglich im Suchergebnis (TListbox) einzelne Zeilen zu Markieren und dann in ein anderes Programm zu draggen, z.B. nach Notepad++ oder via Filecopy in ein anderes Verzeichnis

Doch meine "NativeDragDrop" Komponente die ich von unbekannt her hatte geht nun nicht mehr Compiliert mit irgendwelchen Abstrusen meldungen nicht mehr unter dem neuesten lazaurs.

Der Online package Manager schlägt mit das Packet "DragDrop" vor, das habe ich mal fix installiert und da gibt es auch eine TDropFileSource, doch irgendwie finde ich keine Examples,
Kann mir hier jemand einen Tipp geben wo ich da was finden kann, google will mir diesmal irgendwie nicht helfen und im package ist keine HP hinterlegt...

[fliegermichl]

Hallo,

Bei der Package Beschreibung steht "Allows COM based Drag Drop and integrate App in Windows clipboard"
Da vermute ich mal eine Windows only Lösung. Die COM based Drag and Drop Integration ist auch beim VirtualTreeview integriert. Vielleicht findet sich da ein Beispiel.

Gruß
Michael

[corpsman]

Ja ich hatte befürchtet das es Windows Only ist, damit für mich eh gestorben.

Kennt jemand ne Variante die unter Win und Linux funktioniert ?

[wp_xyz]

da gibt es auch eine TDropFileSource, doch irgendwie finde ich keine Examples,

Auch wenn es für dich nicht mehr aktuell ist: Solange du den OPM nicht speziell konfiguriert hast (Options > Folders), speichert OPM seine Downloads und Installationen in dein Lazarus-Konfigurations-Verzeichnis, das kannst du im Lazarus über "View" > "IDE Internals" > "About IDE" beim Eintrag zu "Primary Config Directory" abfragen, und dort findest du dann auch einige Beispiele zu DragDrop.

Ich hab's mit Laz 2.0.10 ausprobiert, bin aber nicht weit gekommen: Beim DragAndDrop auf den Explorer kommt es zu einer Exception tief aus dem System. Vielleicht liest six1 das, der Melanders DragAndDropSuite auf Lazarus portiert hat (https://forum.lazarus.freepascal.org/in ... 64283.html).

[corpsman]

hehe,

ich hab mir nun mal meine drag&drop komponente genauer angesehen und "ergoogelt"

die Stammt von hier: https://github.com/prof7bit/NativeDragDrop

hab nun auch den fehler "fixen" können und ein PullRequest gemacht (zum ersten mal ) bin mal gespannt was draus wird.

[wp_xyz]

Die COM based Drag and Drop Integration ist auch beim VirtualTreeview integriert. Vielleicht findet sich da ein Beispiel.

Bist du sicher? Der Inhalt der DragAndDrop Methode von TBaseVitualTree ist mit einem {$IFDEF Windows} versehen. Und das Include-File "olemethods.inc" führt bei Nicht-Windows-Betriebssystemen zu einer Datei "dummyolemethods.inc", in der alles leer ist. Genauso beim Include "vtdragmanager.inc".

[fliegermichl]

Ich meinte OLE Drag and Drop. Bei VirtualTreeview ist unter Demos ein Drag and Drop Beispiel. Damit konnte ich auch eine Datei aus dem Windows Explorer in den Tree ziehen.
Allerdings zeigt er bei dem Eintrag dann "Unknown Source Control""

[six1]

zu "Fork of Melanders Drag&Drop Suite":
ich habe Melanders Komponenten damals für Lazarus angepasst.
https://forum.lazarus.freepascal.org/in ... #msg264283

Die sind NUR WINDOWS!

[wp_xyz]

@six1: Hast du die Komponenten kürzlich mit einem aktuellen Lazarus 2.0.10 / FPC 3.2.0 getestet? Stürzen bei dir die Demoprogramme, die auf dem Explorer droppen, ab, genauso wie bei mir? Es wäre schön, wenn du das beheben könntest, denn immerhin wird das Package über den OPM verteilt.

[six1]

Hi wp_xyz,
ich habe den Bug gefunden.
Werde die Änderung an GetMem weitergeben, so dass er das in OPM aktualisiert.

Ändere bitte in Zeile 921 DropSource.pas in:
DropResult := DoDragDrop(Self, Self, AllowedEffects, lpdword(@DropEffect));

Rufe danach das Paket DragDropLazarus auf und kompiliere es neu.
Damit läuft es dann.

Du kannst dir das gefixte Pake auch hier herunterladen: http://www.mediafire.com/file/6qsx6uhb0 ... p.zip/file
Ich habe das "Mixed Demo" gleich noch für LCL Scaling angepasst.
Das Paket ging auch an GetMem, der es im Download des OPM aktualisieren wird.

[wp_xyz]

Danke, funktioniert nun.

[six1]

GetMem hat mich gerade darüber informiert, dass er OPM Update durchgeführt hat.