| |
| |
|
E.T. | given: Explorer-Window with many Datei'n (Images in Miniaturansicht). this Window becomes through XProfan-Program opened. D&D of Explorer-Window to that XProfan-Window functions first once (with einzelner File)
now would like I but in the Explorer-Window several Files by
<Strg> + <klick> confusion , d.h. not in the Order, How these in the Explorer-Window stand, Mark and then The marrow. Files by D&D the XProfan-Prog-Window transfer. working too, only come in the XProfan-Window The Files not in the Order on, How I these in the Explorer-Window select have (means confusion).
now ought to one Yes really in the XProfan-Program The eingegangenen Files in the Order work out (can), How these in the . Develop the row to select get.
very on it scheitere I to Time  |
|
| |
| 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... | 04/24/12 ▲ |
|
| |
|
|
 | Öhm, postest fix whom betreffenden View source?  |
|
| |
| |
| |
|
|
Thomas
Freier | still another code found
'Drag and Drop with the Explorer release
$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"
Declare end%,i%,Anzahl&,PFilename#,FileName$
Dim PFileName#,461
Cls
Window Title "Drag&Drop-example - terminate with rechtem Mausklick"
DragAcceptFiles(%hwnd,1)
User Messages ~WM_DROPFILES'563
WhileNot end%
WaitInput
IF %UMessage =~WM_DROPFILES
anzahl&= DragQueryFile(&WParam,$FFFFFFFF,PFilename#,461);
i%=0
While Lt(i%,anzahl&)
DragQueryFile(&WParam,i%,PFilename#,261);
Let filename$=String $(PFilename#,0)' caution, max 255 characters
AddStrings filename$
Inc i%
Wend
DragFinish(&WParam);
Listbox$(Add$(Str $(anzahl&)," Drag&Drop-File(en) empfangen"),2)
Clearlist
Elseif Equ(%mousekey,2)
Let end%=1
EndIf
Wend
Dispose PFileName#
DragAcceptFiles(%hwnd,0)
End
|
|
| |
| Gruß Thomas
Windows XP SP2, XProfan X2 | 04/24/12 ▲ |
|
| |
|
|
Thomas
Freier | I ought to well something accurate hinschauen.
working too, only come in the XProfan-Window The Files not in the Order on, How I these in the Explorer-Window select have (means confusion).
The Order your selection becomes well nowhere stored. with of/ one nachfolgenden action becomes certainly only to marked Lines sought. |
|
| |
| Gruß Thomas
Windows XP SP2, XProfan X2 | 04/24/12 ▲ |
|
| |
|
|
E.T. | will be well or ill the Explorer-Window not for benefit can, there itself this The Order not observes 
must hold time after a Possibility look, this Ausgangsfenster in the own Progg To release. then ought to the "merken" the selection-Order machbar his. |
|
| |
| 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... | 04/28/12 ▲ |
|
| |
|
(445)
Deutsch
English
Français
Español
Italia