| |
|
|
E.T. | Gegeben: Explorer-la fenêtre avec vielen Datei'n (Bilder dans Miniaturansicht). cet la fenêtre wird par XProfan-Programme ouvert. D&D vom Explorer-la fenêtre zum XProfan-la fenêtre funktioniert seulement einmal (avec einzelner Dossier) maintenant voudrais je mais im Explorer-la fenêtre plusieurs Datein per <Strg> + <klick> durcheinander , d.h. pas dans qui Reihenfolge, comment cet im Explorer-la fenêtre stehen, markieren et ensuite qui mark. Datein per D&D dem XProfan-Prog-la fenêtre transfert. Funzt aussi, seulement venons im XProfan-la fenêtre qui Datein pas dans qui Reihenfolge à, comment je cet im Explorer-la fenêtre ausgewählt habe (alors durcheinander).
maintenant sollte on oui eigentlich im XProfan-Programme qui eingegangenen Datein dans qui Reihenfolge abarbeiten (peut), comment cet im anderen la fenêtre qui Reihe pour ausgewählt wurden.
oui c'est ca daran scheitere je zur Zeit |
|
|
| XProfan X2Grüße aus Sachsen... Mario WinXP, Win7 (64 Bit),Win8(.1),Win10, Win 11, Profan 6 - X4, XPSE, und 'nen schwarzes, blinkendes Dingens, wo ich das alles reinschütte... | 24.04.2012 ▲ |
|
|
|
|
| Öhm, postest fix den betreffenden Voir le texte source? |
|
|
| |
|
|
|
Thomas Freier | Doch encore un Code trouvé
'Drag et Drop avec dem Explorer realisieren
$H windows.ph
$H structs.ph
$H messages.ph
$H shellapi.ph
$H commctrl.ph
$I PROFALT.INC
Def DragAcceptFiles(2) !"SHELL32","DragAcceptFiles"
Def DragFinish(1) !"SHELL32","DragFinish"
Def DragQueryFile(4) !"SHELL32","DragQueryFileA"
Def Sleep(1) !"KERNEL32","Sleep"
Déclarer ende%,i%,Anzahl&,PFilename#,FileName$
Faible PFileName#,461
Cls
Titre de la fenêtre "Drag&Drop-Beispiel - finissons avec rechtem Mausklick"
DragAcceptFiles(%hwnd,1)
Utilisateur Messages ~WM_DROPFILES'563
WhileNot ende%
WaitInput
IF %UMessage =~WM_DROPFILES
anzahl&= DragQueryFile(&WParam,$FFFFFFFF,PFilename#,461);
i%=0
Tandis que Lt(i%,anzahl&)
DragQueryFile(&WParam,i%,PFilename#,261);
Laisser filename$=String$(PFilename#,0)' attention, max 255 marque
AddStrings filename$
Inc i%
Wend
DragFinish(&WParam);
Listbox$(Ajouter$(Str$(anzahl&)," Drag&Drop-Dossier(en) empfangen"),2)
Clearlist
Elseif Equ(%mousekey,2)
Laisser ende%=1
EndIf
Wend
Dispose PFileName#
DragAcceptFiles(%hwnd,0)
Fin
|
|
|
| |
|
|
|
Thomas Freier | je sollte wohl quelque chose genauer hinschauen.
Funzt aussi, seulement venons im XProfan-la fenêtre qui Datein pas dans qui Reihenfolge à, comment je cet im Explorer-la fenêtre ausgewählt habe (alors durcheinander).
qui Reihenfolge deiner sélection wird wohl nirgens gespeichert. chez einer nachfolgenden Aktion wird bestimmt seulement pour markierten Zeilen gesucht. |
|
|
| |
|
|
|
E.T. | Werde wohl ou bien übel cela Explorer-la fenêtre pas pour nutzen peut, là sich cette qui Reihenfolge pas merkt Muss arrêt la fois pour einer Possibilité regarder, cet Ausgangsfenster im eigenen Progg trop realisieren. ensuite sollte cela "merken" qui sélection-Reihenfolge machbar son. |
|
|
| XProfan X2Grüße aus Sachsen... Mario WinXP, Win7 (64 Bit),Win8(.1),Win10, Win 11, Profan 6 - X4, XPSE, und 'nen schwarzes, blinkendes Dingens, wo ich das alles reinschütte... | 28.04.2012 ▲ |
|
|
|