[Résolu] drag&drop compliqué (pour moi)

Vous débutez et vous avez besoin d'aide ? N'hésitez pas à poser vos questions
Avatar de l’utilisateur
SPH
Messages : 4721
Inscription : mer. 09/nov./2005 9:53

[Résolu] drag&drop compliqué (pour moi)

Message par SPH »

Salut, 8)

je bosse sur un logiciel de cryptage. J'ai choisis l'option "drag&drop" mais je n'y arrive pas.
Je voudrais cliquer/deplacer un fichier (issu de C:/ par exemple) sur la petite vignette rouge (ou verte). Cela necessite un "EnableGadgetDrop" avec 3 valeurs dont je n'ai pas la moindre idee du contenu...
Cela necessite aussi un "EventDropFiles"...

Les images sont en data. C'est pour cela qu'elles sont petites (bleu : le titre, rouge : crypt, vert : decrypt) :o

Code : Tout sélectionner

; 6 aout 2019

OpenWindow(0, 0, 0, 749, 596, "ImageGadget", #PB_Window_SystemMenu | #PB_Window_ScreenCentered)
;   Image.i = CatchImage(#PB_Any, ?Poisonicon)
;   ImageGadget(#ImageGadget, 10, 10, 150, 150, ImageID(Image.i))


;If LoadImage(0, "c:\SPH\PB\titre.bmp")    ; changez le 2ème paramètre en indiquant le chemin/fichier contenant votre image
  Image.i = CatchImage(#PB_Any, ?_1bmp_start)
  ImageGadget(0,  10, 10, 728, 53, ImageID(image.i))                      ; imagegadget standard
;EndIf

Global Repertoire$
calcul=0

ExplorerTreeGadget(1, 11, 73, 280, 280, Repertoire$, #PB_Explorer_NoFiles)
ExplorerListGadget(2, 297,73,440,280, "*.*", #PB_Explorer_NoFolders|#PB_Explorer_NoParentFolder)


;CRYPT
;ButtonGadget(8, 11,  504, 360, 80, "CRYPT")
  Image.i = CatchImage(#PB_Any, ?_2bmp_start)
  ImageGadget(8, 11,  504, 360, 80, ImageID(image.i))                      ; imagegadget standard

;DECRYPT
;  ButtonGadget(9, 377,  504, 360, 80, "DECRYPT")
  Image.i = CatchImage(#PB_Any, ?_3bmp_start)
  ImageGadget(9, 377,  504, 360, 80, ImageID(image.i))                      ; imagegadget standard
  
  
Procedure Afficher_fichiers()
  SetGadgetText(2, "")                    ; Vider la liste des fichiers
  Repertoire$ = GetGadgetText(1)          ; Voir quel est le répertoire sélectionné 
  SetGadgetText(2, Repertoire$)           ; Remplir la liste avec le répertoire
EndProcedure

; Si clic gauche sur l'arbre ou déplacement avec les flèches, alors afficher les fichiers dans la fenêtre liste fichiers
BindGadgetEvent(1, @Afficher_fichiers(), #PB_EventType_Change) ; #PB_EventType_LeftClick) 

;Repeat : Until WaitWindowEvent() = #PB_Event_CloseWindow


Repeat
  Evenement = WindowEvent()
  If Evenement = #PB_Event_Gadget
    
  
   
    window_event = WaitWindowEvent(5) ;changing the progressbar's will always cause this to catch an event
    While window_event <> 0
      If window_event = #PB_Event_CloseWindow : Break 2: EndIf
      window_event = WindowEvent()
    Wend
   
  EndIf
Delay(5)
Until Evenement = #PB_Event_CloseWindow
End

;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;
DataSection
  _1bmp_start:
    ; size : 2742 bytes
    Data.q $000000000AB64D42,$0028000000360000,$001C0000001F0000,$0000001800010000,$0B1200000A800000
    Data.q $000000000B120000,$F0F0000000000000,$CC5795D3407CC6F0,$2A66B31D5A9F5996,$41A91347AA1C52AA
    Data.q $AC0B40A90D42A90C,$1344B10638A40E42,$3CAF0634A41947B7,$AB0632A41542B40F,$0936A90F3BAE0D38
    Data.q $3BAD0C3BAD0C3AAD,$AD0C3BAD0C3BAD0C,$0C3BAD0C3BAD0C3B,$F0F00000000C3BAD,$FF90D0FA4E8ED1F0
    Data.q $3C7CBF3B7BB6B5F5,$43A8063999104393,$AF1046AC073EA30C,$093CA50739A21348,$3CAA02329E1445B1
    Data.q $AA0D3BAB1D4BBA0D,$0E3BAE123DB00B38,$3BAD0C3BAD0C3AAD,$AD0C3BAD0C3BAD0C,$0C3BAD0C3BAD0C3B
    Data.q $F0F00000000C3BAD,$FB89C9F64889CCF0,$4889C75B9BD798D9,$6ED0245DB93876C2,$9E073FA20B43A736
    Data.q $1B50B40F43A6073B,$45AF1446AD1548AF,$A90C3AA81140AD15,$0D3BAD0E3BAC0C39,$3BAD0C3BAD0C3BAD
    Data.q $AD0C3BAD0C3BAD0C,$0C3BAD0C3BAD0C3B,$F0F00000000C3BAD,$E360A0E23878C0F0,$3476B46AACEB61A2
    Data.q $90E9316CC54180CA,$990C45A41650B156,$3A70D02358B7063A,$64C94176D8295EC0,$B10B3AA50838A132
    Data.q $0B39AA0E3CAC1443,$3BAD0C3BAD0C3BAD,$AD0C3BAD0C3BAD0C,$0C3BAD0C3BAD0C3B,$F0F00000000C3BAD
    Data.q $E14283D12667B8F0,$4486CA5EA1E65697,$9AEE3975CC3677C2,$9B245CB83571CE5F,$669EEB326AC40A41
    Data.q $7CDC4E84E1396FC8,$A6113FA7083A9F48,$0533A41846B5133A,$3BAD0A39AB0837A9,$AC0C3BAD0D3CAE0C
    Data.q $0C3BAD0A39AB0B3A,$F0F00000000C3BAD,$C53F7FD53978D3F0,$599CE42365B13273,$66C01B58B168AAE1
    Data.q $AC2A65BE2C69C42A,$90CAFC4E88D81C57,$50AB2058AE83BBED,$B21848AD0433941A,$1141B01038A52049
    Data.q $3DAF0F3EB00F3FB0,$AA0B3AAC0D3CAE0E,$0C3BAD0938AA0938,$F0F00000000C3BAD,$BB4282DE5796EDF0
    Data.q $4083CE2062B62060,$54B00F4FA81E61A8,$CD2F6CC22966BF16,$A8E6FF73B0F93F7D,$65BC3772C199D4FF
    Data.q $A70732941347A32D,$1546B50A38A31041,$39AB0C3BAD0E3EAE,$AD0A39AB0938AA0A,$0C3BAD0C3BAD0C3B
    Data.q $F0F00000000C3BAD,$F44181E31957B8F0,$2B6FB83E80D462A3,$52AC1454AC11549F,$B01344951F5DB313
    Data.q $6EACEE5291DA3063,$6DC04580CC68A4EA,$A8023695053C9635,$06319F1B49B30F42,$38AA0938AA0938A9
    Data.q $AE0A39AB0938AA09,$0C3BAD0D3CAE0D3C,$F0F00000000C3BAD,$D63E7FE1498AEDF0,$2066AB1C60B2397C
    Data.q $42992767BB13579E,$C00E4E9D1354A607,$4C8CD14585CD3776,$84D44684CC82C1F7,$A0265DBB346DC249
    Data.q $093BA802369E073D,$3FB1103FB1103FB0,$AA0B3AAC0E3DAF10,$0C3BAD0736A80938,$F0F00000000C3BAD
    Data.q $DE3D7FDF1557B6F0,$3B82C20645934386,$40974081D492D9FB,$EF4484D11656A904,$4B8CCD4A8BCE67A7
    Data.q $4E9A2968AD135194,$922A5FBB68A1F413,$1A4CB91145AD012F,$37A90837A90737A7,$AD0A39AB0938AA08
    Data.q $0C3BAD0C3BAD0C3B,$F0F00000000C3BAD,$AD1C60BA3073CDF0,$71BAF4236AB0165B,$66B73E80D08CD3F9
    Data.q $C6306DBA2260B225,$2263A41C5EA03C7F,$5CA87EBDEF4D8DCF,$AF4C83DE629CE820,$1546B00A3DA3184E
    Data.q $39AA1242B31B4BBA,$AC0636A70535A60A,$0C3BAD0E3EB00B3B,$F0F00000000C3BAD,$AD165DB11A61B4F0
    Data.q $519CD9458EC5175E,$AAEA5295DF62A9EB,$CA2F70BF3F80D168,$3273BD2A6DB63C7E,$4B9A296AB44788D2
    Data.q $B03671C60944960D,$4078D71850AB1E59,$5EC52F64CA396ED1,$A90638A70938A42A,$0B3AB0083AAE0537
    Data.q $F0F00000000B3AAF,$B51961AF2066B3F0,$145FAA7EC8E91E68,$78C6579BE0458DD6,$E44285D62669B835
    Data.q $2D6EC43C7ED34F92,$51A30C479A1455AB,$A12D6FBC1759A811,$4F8ED52B6DB81456,$92EB3B75CB3B77C4
    Data.q $AC0D40AC0C389E59,$083AB30A3DB30639,$F0F0000000083AB3,$D9367FCB3579BEF0,$3783C92F7BC7428E
    Data.q $5FAB4688C6539BE5,$B93270C12467B61D,$4788CA3072C82664,$4B9F0B41974C8DDA,$AA1B5EA9185BAA0B
    Data.q $9ADCFF64A8E32163,$57AE2C64B370AFE5,$B3083CA60C43A524,$083AB5093CB20D40,$F0F0000000083AB4
    Data.q $CD4D99E3509DE0F0,$64B0F2317DC83682,$66B12F71BC327BC6,$AB1351A12265B323,$95D7FF599BE71957
    Data.q $52A60E4BA16EB0F5,$CA1E61AE0E51A010,$88CAF372B6EC4185,$368C2D65B374B3EE,$BA093BA3083B9B05
    Data.q $083AB40739AF1548,$F0F0000000083AB3,$C33883CA60ABF3F0,$216CB5317BC52F7A,$80C983C9F53680C5
    Data.q $E72F73C01054A03C,$76B9FB61A4F15699,$4C9E4989D43C80D1,$DD5398DA2368B408,$4687D064A9ED5095
    Data.q $41972964B35594DE,$B3174AB103399806,$083AB10532A61145,$F0F0000000083AB1,$B4246FB4438ED3F0
    Data.q $2B75BC1C67AC246F,$A3E680C7FD62AAF0,$DB3E83CF2D71BD5E,$5A9EEF3377C74A8F,$64B5488CD94387D9
    Data.q $B33B80C82267B420,$2668B13378C12369,$63B91F5BAB3170BB,$A50E44AA073D9B27,$083BB01243B40537
    Data.q $F0F0000000083AB0,$B16BB4EE549EE1F0,$76BFF5266FB32770,$ACF158A1E55AA3E9,$D93C84CE438AD364
    Data.q $589EED3D84D1468D,$73C21C62B14289D7,$B3327AC6175EAB2D,$62A4EF347AC52067,$8FE53E7BCC4E8CDA
    Data.q $A01148AD1951AF53,$083BAD0534A20136,$F0F0000000083AAE,$C896E0FD4D97D5F0,$4791D0357FC04791
    Data.q $73B8559EE3468FD3,$E4539BE12B74BA2A,$10559F2C74BE569E,$509E1C63B01057A3,$BF559CE960A7F409
    Data.q $2A6CB94A90DB2B73,$93E84A87D82361B0,$B602399C0C3B9856,$083BAA093CA9184D,$F0F0000000083BAC
    Data.q $F966B0E97CC6F8F0,$5BA5E42771AF83CD,$6DB12069AD72BCF4,$AC1962A71A63A824,$529AE1549DE01E67
    Data.q $57A3125AA4256DB7,$A9074E9D0044920F,$0E4F9F044A9A1259,$69BE0B45960C4594,$B10C44A4063C962D
    Data.q $0236A3083CA5164B,$F0F0000000093DAB,$D34994CC60ABE2F0,$1E69A34792CC4E99,$B5E489D3FE2E78B2
    Data.q $D32D76B9246DB16B,$6BB4EB89D2F5468F,$77C004478F1660A4,$F465ACF22C74C02F,$1758AA3278CA7EC5
    Data.q $5DB33572C41351A1,$D45188E5052F8921,$042F994D81E73D73,$F0F00000000B3FAB,$F55EA7DA6CB5E1F0
    Data.q $367EB7337BB476BE,$9BDD76C0F266B1E9,$D55AA6E4337EBF50,$56A1DC65B1E34B97,$BFF53681C43F8ACD
    Data.q $E66FB8FC549EE975,$0441931A5BAF71B8,$6ABF0943950A4898,$F95D96E63E77CC2F,$376CD24076D86CA3
    Data.q $F0F0000000164AB3,$FC67B0E4448CBFF0,$4E96CD66AEE285CE,$9EDF438FCD68B0EA,$D758A5E2509CDB53
    Data.q $337FBB519CD64E9B,$85CB2974B74D99D9,$D157A0F04D98E33A,$1255A91657AC3B80,$85D83976C62866B5
    Data.q $DC9DD6FF7FB8FA48,$376DD1548AEA487F,$F0F00000001246AD,$FB68B0E259A1D0F0,$67AEE35CA3D685CC
    Data.q $87C665B1E95CA6DD,$D14392CD2E7CBB39,$1E6BA6317DB053A2,$7AC04492D33684C1,$DD4792E13884D02D
    Data.q $175BB0347CD24791,$86D95693E14987D2,$D172ABE869A2EC49,$02389A376DCA3F76,$F0F000000004399E
    Data.q $F465ADDE6CB4E0F0,$4D95C84E96C97BC3,$93D27DCAF860AADE,$F14493CB2E7CB945,$1F6EA755A4D17CCB
    Data.q $83C83987C62776B0,$A52974C54B97E236,$377BCF1D65BD074F,$93E32660B33772C3,$D23B74CB3F79CE56
    Data.q $0B41A101318D4178,$F0F0000000053A9E,$F05AA2CF60A9D5F0,$55A0D08CD5FD7BC4,$9AD66AB7EC6FBAED
    Data.q $F956A5DC3E8BC74C,$2F7EB652A1D777C5,$CBF967B5EB3A88C2,$AE145DAF4793DE7F,$488CE0236BC41058
    Data.q $96E62D68BA4680D1,$D34881D74681D459,$0D3D9E12419D427A,$F0F0000000093EA1,$EB64AECF92DAF6F0
    Data.q $4FA0CC6FBEE179C5,$90C453A1D452A2D1,$C94F9BD3539FD642,$4E9AD6438FC94592,$C1FA529DDA4A95D5
    Data.q $B8094EA12F79C778,$1A5DB11055AD1A62,$79CC1752A42566B7,$F31E59B15694E83D,$0536980D3F9C6AA3
    Data.q $F0F00000000A3DA2,$DB57A0BE82C8DFF0,$56A9D375C7ED6CB8,$8DBD6FBDE577C9ED,$CA6DB9EE66B2E540
    Data.q $4993D32F7AB64691,$B3FC3A82CB4B94D8,$DE2A70C3458CDC6C,$589CDF4388DB4188,$43962564B4589ADE
    Data.q $FF2865BC1B4BA114,$02369900339281BA
    Data.b $9C,$35,$03,$00,$00,$00
  _1bmp_end:
  
  
  
  
  _2bmp_start:
    ; size : 1802 bytes
    Data.q $00000000070A4D42,$0028000000360000,$0017000000190000,$0000001800010000,$0B12000006D40000
    Data.q $000000000B120000,$0000000000000000,$00FF0000FF00001E,$FF0000FF0000FF00,$0000FF0000FF0000
    Data.q $A50000001E0000FF,$0001291C2B547D88,$83AEAAC1EB2B406B,$C65D7EA900113D68,$355F876287B37799
    Data.q $78A18BB7DC00254D,$FF00000F00000051,$0000FF0000FF0000,$00FF0000FF0000FF,$1E0000FF0000FF00
    Data.q $A5CA8491A7000000,$9300022900032891,$7490B8BCD5FD526B,$87AF18355D223E66,$93001D43A8C8EE6A
    Data.q $0000008AAAD04E70,$00FF0000B2000000,$FF0000FF0000FF00,$0000FF0000FF0000,$71000000420000FF
    Data.q $5E7B99B6D5F25463,$8BAF000427001838,$39657BA2B0C8EE73,$CCDEFF172B500014,$0F3202153635476B
    Data.q $65000000040B0000,$0000FF0000FF0000,$00FF0000FF0000FF,$580000FF0000FF00,$DAEE000000000000
    Data.q $22445F7CE0FEFFBD,$889FC11027470004,$012526385CA6B8DC,$3EB3C1E48694B700,$2836000003270E1B
    Data.q $00FF00002F00001F,$FF0000FF0000FF00,$0000FF0000FF0000,$00000000830000FF,$B9CBE16A78880000
    Data.q $0220142841CFE0FA,$E6CFE4FF687D9A00,$203757000323AFC6,$0A29768FAEEBFFFF,$000000A4B1C30000
    Data.q $0000FF0000B20000,$00FF0000FF0000FF,$FF0000FF0000FF00,$30380000000F0000,$72E2ECFFDCE4F92E
    Data.q $000623000C284A58,$617ED2EFFF748DAB,$FD81A4C000092542,$EFFE000F344FBBE3,$00580000000306E6
    Data.q $FF0000FF0000FF00,$0000FF0000FF0000,$00380000FF0000FF,$717E910000000000,$5A8488B3DDABC8EA
    Data.q $7F00001000031B35,$000425C2CDE16D70,$CEFBCEF5FF274C76,$00020A717D8D00AC,$0000B200000F0000
    Data.q $00FF0000FF0000FF,$FF0000FF0000FF00,$0000000000970000,$F0C4DEFF1A1E2500,$000E29A4C7F19EC5
    Data.q $DBEF000010000418,$DA000B346981A3D0,$091B00B2D4FF88AF,$0007090E3B435300,$FF0000FF00003800
    Data.q $0000FF0000FF0000,$00FF0000FF0000FF,$0000000000002F00,$D8FFB9DCFF546476,$1500041F556C8CB5
    Data.q $B8CCED5C68800001,$B6E61C3E6B102C54,$F7FFFF5F6B810094,$00000000007C818F,$00FF0000FF000065
    Data.q $FF0000FF0000FF00,$0000B20000FF0000,$9E00000000000000,$9EBADFA3C3E97588,$011C01102D000D2D
    Data.q $4899AFD69DADCE00,$BDD400A3C5F5001C,$4BEAF1FFCDD5E8AE,$8300000000003D41,$0000FF0000FF0000
    Data.q $00FF0000FF0000FF,$000000650000FF00,$6C7E000000000000,$22507096B9DBF05B,$2A385300011E0003
    Data.q $608D00073093A3C4,$80889B4D5C71003F,$555DA8AEBCE3EAFC,$0083000000000052,$FF0000FF0000FF00
    Data.q $0000FF0000FF0000,$00000000580000FF,$0000000000000000,$021C00163469849D,$8C76809900011500
    Data.q $6578000017405068,$CFC8D1E03F4B5B56,$60676DA9B3BFBCC4,$0000580000000000,$00FF0000FF0000FF
    Data.q $FF0000FF0000FF00,$00000F0000730000,$0000000000000000,$00040D0000000000,$4A5F75808C4C505A
    Data.q $384452AEBECE0038,$9CA8AFB9C3717B87,$0078838E919FAC90,$B200002600000000,$0000FF0000FF0000
    Data.q $00FF0000FF0000FF,$160000580000FF00,$0000000000000000,$0000000000000000,$E1F3000000000000
    Data.q $A32735528C9BB2D0,$303956B4BFDF7883,$3D43ACB3C28791AA,$0042000000000038,$FF0000FF0000B200
    Data.q $0000FF0000FF0000,$5CFF0000FF0000FF,$73070CA23D46AF4F,$0000970002730306,$DBEAFFABBBCB00FF
    Data.q $ABC86C7A978B99B4,$B4020E263D48649D,$263A50EFFFFF96A3,$0000000000111923,$00FF00006500002F
    Data.q $FF0000FF0000FF00,$0000FF0000FF0000,$00FF0000FF0000FF,$A0AD00FF0000FF00,$AEDAE9FFC0CFE292
    Data.q $C1D2EC7C8BA88494,$C3DB1A2C4244566E,$3A1D3654A4BDDBAF,$00000024313C1227,$00001E0000000000
    Data.q $007300004D000042,$7300007300007300,$0000730000730000,$4855666773810073,$9BB5C0D0E78A99AE
    Data.q $A8B5CAE58AA0B88A,$839ABA637B97768E,$61766A829A617898,$810000100007184C,$070B1A7574847270
    Data.q $6674617482414C5B,$134553606F838C50,$B0BF000003140005,$79000313455262A7,$8FA4BFD6EBFF5667
    Data.q $ABCFA2BDDB687F9E,$E620385C364E7293,$07192FBFD9F2AEC9,$C9E127283D00061C,$D835455C575D73CB
    Data.q $A8CEE58FB5CCA4C3,$001C2F3F60C4E3FF,$C7D3E3D1D8EB0000,$8FA50004142A3748,$69253C5CCCE2FA7D
    Data.q $AAC5F0B5CEF72C46,$EBFF4D6F9444618B,$1700021C718BA6CA,$EEF3FFADADC50000,$99AF7E9BAD727F92
    Data.q $BEA6C7E851769076,$C4DD000005297F95,$5EB9C5D5E1E9FCC0,$9AAEC7021327404D,$2B5B506790B7CBEC
    Data.q $664E72A438588913,$9CBEE12A5178113A,$142D040D2A001130,$D9C9D4E6C0C5D912,$3E637E84A7BBADC8
    Data.q $7FADB1CCF9789ABF,$81879D8A8EAB006D,$475CC6D1E3DFE7FA,$EF7A8EB1000F2B38,$5174AA7892C3AFC4
    Data.q $4774366496759ED4,$23A0BADD94BAE11B,$13182C00021C0006,$C4D7E2FCFFCED9EB,$D885A7CC82A7C2A3
    Data.q $7E960099ADE28CA8,$FFA2B7D42A40586C,$354567E5F8FFD8EB,$B5DF404E75000529,$B15075A196B3DDA2
    Data.q $A5D5FB91C1E95A87,$06194D7189B4E1FF,$D841495400031000,$B0CAE3C9D4E6C4CA,$69935E92BA86AACC
    Data.b $34,$00
  _2bmp_end:
  
  
  
  
  
  _3bmp_start:
    ; size : 1986 bytes
    Data.q $0000000007C24D42,$0028000000360000,$00170000001C0000,$0000001800010000,$0B120000078C0000
    Data.q $000000000B120000,$D6E7000000000000,$9E87A4C4ADCCE1B5,$0E22430017396078,$42001A2639314462
    Data.q $0000FF0000FF0000,$00FF0000FF0000FF,$1E0000FF0000FF00,$97AFB6C000000000,$828B925F686F8790
    Data.q $888F6C757C5E676E,$C7707980818A917F,$1D37524A6379B7C0,$3E6500123C00052B,$AC8DA0BE50688C22
    Data.q $00FF000042008D98,$FF0000FF0000FF00,$0000FF0000FF0000,$000000001E0000FF,$8A939CA5AE939BA8
    Data.q $B079828B939CA581,$A3ACB5636C759EA7,$032CA9B2BBC7D0D9,$F13C5B87000E3700,$C4E2FFC4E6FFA4C7
    Data.q $4200637385C9E3FE,$0000FF0000FF0000,$00FF0000FF0000FF,$1E0000FF0000FF00,$A78995A300000000
    Data.q $929BA49DA6AF959E,$A7B0D8E1EAADB6BF,$8B5760694A535C9E,$B5C9FB7D8DC17982,$DEFF9CBCE2ABC8F2
    Data.q $3D15334D7491AFBD,$00FF00004200192C,$FF0000FF0000FF00,$0000FF0000FF0000,$000000001E0000FF
    Data.q $B2BDA6AEB9697583,$C29FA7B2A9B1BCAA,$454D58B2BAC5AFB7,$D4FF565E69313944,$56273D62A9C4EFB5
    Data.q $0003203146632235,$42006F8295163049,$0000FF0000FF0000,$00FF0000FF0000FF,$1E0000FF0000FF00
    Data.q $BD6A758100000000,$B7BFCA9EA6B1AAB2,$C3CEAEB6C1A6AEB9,$E3A2AAB5B8C0CBBB,$527497BBE8FFD0D8
    Data.q $2440525976374866,$A1B5C6E232405B19,$00FF000042007E8D,$FF0000FF0000FF00,$0000FF0000FF0000
    Data.q $000000001E0000FF,$B4BF9FA7B2A8AFBB,$B0A4ACB79AA2ADAC,$A5ADB88F97A29DA5,$CBE28F97A2959DA8
    Data.q $733F4E637E8EA7B1,$A0B2C88293A75360,$42007D8D9FB4C9DE,$0000FF0000FF0000,$00FF0000FF0000FF
    Data.q $1E0000FF0000FF00,$B099A4AE00000000,$B0C1DBB3C5DB8E9D,$A7BD7489A48AA0B8,$9B69818D9CB2C78E
    Data.q $101E392E3E587E92,$B5CA8296AF293A54,$889CB2C79EB4C99F,$00FF000042006777,$FF0000FF0000FF00
    Data.q $0000FF0000FF0000,$000000001E0000FF,$99AE93A8B98696A0,$E5C4D8F197ABC484,$D5E7FD9CB0C8B6CA
    Data.q $001E7C8D97ACBFCD,$BDA8C3E146577500,$A3BDD4AAC8E2829F,$420065768493AEC1,$0000FF0000FF0000
    Data.q $00FF0000FF0000FF,$1E0000FF0000FF00,$BA869DA800000000,$7E94AC92ABBF90AC,$D0EAB0BFDC62768F
    Data.q $706773839AA4BDC2,$A3C2DF7287A45A64,$CCE998BEE3AED2F6,$9388A4B99FBFD8A7,$00FF000042007586
    Data.q $FF0000FF0000FF00,$0000FF0000FF0000,$000000001E0000FF,$C5D792B2BF8CAAB4,$6870819BAFC5DDA8
    Data.q $272B462027433F4A,$DDF78487964E5366,$D6A8D4F9B4E0FBB8,$688AA66087A884AE,$420096A9B898B7CC
    Data.q $0000FF0000FF0000,$00FF0000FF0000FF,$1E0000FF0000FF00,$CFA1C1CD00000000,$C7DDF5B7D4E6A2C2
    Data.q $001C101B3995A6C0,$9AADB2C55F637E00,$729BB9C5EDFF888B,$618310365D2E567A,$75C5E0FBA2C3E23D
    Data.q $00FF000042005062,$FF0000FF0000FF00,$0000FF0000FF0000,$000000001E0000FF,$ADBF9CB4C19BB0BC
    Data.q $551C2D4454687D97,$BCC4D08D99B02E3C,$68871F23287B838E,$A4001C420003254F,$D8F5FF95B3D55E7E
    Data.q $42000003155F7B95,$0000FF0000FF0000,$00FF0000FF0000FF,$1E0000FF0000FF00,$0000000000000000
    Data.q $0000000000000000,$0000000000000000,$00001E0000000000,$3338620000250083,$CFF0B9D3F89FB3D8
    Data.q $000003157B95B6B5,$00FF000073000000,$FF0000FF0000FF00,$0000FF0000FF0000,$001E0000420000FF
    Data.q $1E00001E00001E00,$00001E00001E0000,$009700004D00002F,$5D8B00FF0000FF00,$F2C0E0FFAFCAF745
    Data.q $00412A3F6B83ABCB,$FF0000FF00007024,$0000FF0000FF0000,$00FF0000FF0000FF,$FF0000FF0000FF00
    Data.q $0000FF0000FF0000,$00FF0000FF0000FF,$FF0000FF0000FF00,$0000FF0000FF0000,$8BB2D99BC0EA00FF
    Data.q $7F1C6F92B4A8CEF3,$0000FF0000FF0000,$00FF0000FF0000FF,$FF0000FF0000FF00,$0000FF0000FF0000
    Data.q $00FF0000FF0000FF,$FF0000FF0000FF00,$0000FF0000FF0000,$00FF0000FF0000FF,$BADE00FF0000FF00
    Data.q $7B89B2D287B3D68C,$001E00001600556A,$1E00001E00001E00,$00001E00001E0000,$001E00001E00001E
    Data.q $1E00001E00001E00,$00001E00001E0000,$004200004200001E,$1E00001E00004200,$6F000F00001E0000
    Data.q $B1D3F6A7CDF1676A,$93AE87A5C195B8D8,$BE99B4D099B4D078,$536C888CA5C287A3,$8EA8829AB469809B
    Data.q $3C22385390A6C178,$5064804B62790B21,$3A541A2441414E71,$791C263A3F475C31,$BCC4CBBBC3CB616B
    Data.q $8DB09FA6ACADB7B9,$8B3D507034466A79,$5A6D8B4A5D7B586B,$6683637490536480,$93505E7928375457
    Data.q $101B37444F6B6A78,$6E8BA7B0CD1A2340,$40242A4A00001E65,$444C63373E5A1A20,$CAD3CDD7E38B94A5
    Data.q $BD9FA8AD9BA6ACC0,$040D2C6C7795ADB6,$7490E2EDFF081331,$A2252F4800001C69,$494F67373F567F89
    Data.q $7992DADEF75D637B,$CF50506C00001777,$02001A13102DB3B3,$778A0F1126000016,$CED2DCE8A9AEC172
    Data.q $B7C4CD97A4ADB8C2,$465DA2AEBA919DA9,$E58D9BB518283F36,$2E3A52101F36BDCB,$001366718598A5B8
    Data.q $B5878EA030374A00,$494B601D1F349DA2,$567100001537374F,$82797B87D3D1E759,$D0D6E2B6BDC57679
    Data.q $AABA9EA7B8AEB8C4,$BA92A1B49DAABB9D,$98B4C20D293598A7,$223621354D9CB2C7,$139DAEBEB8CADE10
    Data.q $5E6A781E2E3B0003,$7888252E3D202C3A,$814F5467B9C0D271,$D4D7E8D5D7EE686D,$A6A9CDD1D2DCDFE4
    Data.q $B9B4BECAB1B8C09E,$9AA9C08692A89DA9,$617BABBBD4A7B7D0,$6E1C283E7F8DA751,$4A55698893A74F5A
    Data.q $C9DD2E394D152034,$A64A5265C0CBDFBE,$B5BCCED5DCEE8B93,$C3D1B6BCCCACB2C2,$A9AEB4B4BFC3CEBD
    Data.q $AFB3BE969B9FA6AA,$9FBC858AA0B3B9C9,$E9C2C8E88A8FAD9A
    Data.b $CC,$C5
  _3bmp_end:
EndDataSection

Dernière modification par SPH le sam. 10/août/2019 15:32, modifié 1 fois.
http://HexaScrabble.com/
!i!i!i!i!i!i!i!i!i!
!i!i!i!i!i!i!
!i!i!i!
//// Informations ////
Intel Core i7 4770 64 bits - GTX 650 Ti
Version de PB : 6.00 - 64 bits
Marc56
Messages : 2145
Inscription : sam. 08/févr./2014 15:19

Re: drag&drop compliqué (pour moi)

Message par Marc56 »

D'abord tu indiques que les images de destination peuvent recevoir un fichier

Code : Tout sélectionner

EnableGadgetDrop(8, #PB_Drop_Files, #PB_Drag_Copy)
EnableGadgetDrop(9, #PB_Drop_Files, #PB_Drag_Copy)
Elle reçoivent donc un mon de fichier, et c'est considéré comme une copie

Ensuite tu indique que le système doit démarrer un d&d si un event #PB_EventType_DragStart arrive

Code : Tout sélectionner

        Case #PB_Event_Gadget
            Select EventGadget()
                Case 2 ; Démarrer un d&d           
                    If EventType() = #PB_EventType_DragStart
                        DragFiles(GetGadgetItemText(2, GetGadgetState(2)), #PB_Drag_Copy)
                    EndIf
            EndSelect  


Enfin, si un gadget reçoit un #PB_Event_GadgetDrop, ce qu'il doit faire

Code : Tout sélectionner

        Case #PB_Event_GadgetDrop
            Select EventGadget()
                Case 8
                    Debug "À gauche : " + EventDropFiles()
                Case 9 
                    Debug "À droite : " + EventDropFiles()
            EndSelect
PS. Penser à utiliser les noms de fichiers complet, donc concaténer le répertoire (gadget 1) avec le nom du fichier (gadget 2)

Code : Tout sélectionner

; 6 aout 2019

OpenWindow(0, 0, 0, 749, 596, "ImageGadget", #PB_Window_SystemMenu | #PB_Window_ScreenCentered)
;   Image.i = CatchImage(#PB_Any, ?Poisonicon)
;   ImageGadget(#ImageGadget, 10, 10, 150, 150, ImageID(Image.i))


;If LoadImage(0, "c:\SPH\PB\titre.bmp")    ; changez le 2ème paramètre en indiquant le chemin/fichier contenant votre image
Image.i = CatchImage(#PB_Any, ?_1bmp_start)
ImageGadget(0,  10, 10, 728, 53, ImageID(image.i))                      ; imagegadget standard
                                                                        ;EndIf

Global Repertoire$
calcul=0

ExplorerTreeGadget(1, 11, 73, 280, 280, Repertoire$, #PB_Explorer_NoFiles)
ExplorerListGadget(2, 297,73,440,280, "*.*", #PB_Explorer_NoFolders|#PB_Explorer_NoParentFolder)


;CRYPT
;ButtonGadget(8, 11,  504, 360, 80, "CRYPT")
Image.i = CatchImage(#PB_Any, ?_2bmp_start)
ImageGadget(8, 11,  504, 360, 80, ImageID(image.i))                      ; imagegadget standard

;DECRYPT
;  ButtonGadget(9, 377,  504, 360, 80, "DECRYPT")
Image.i = CatchImage(#PB_Any, ?_3bmp_start)
ImageGadget(9, 377,  504, 360, 80, ImageID(image.i))                      ; imagegadget standard

; Permettre au gadget de recevoir un (nom de) fichier
EnableGadgetDrop(8, #PB_Drop_Files, #PB_Drag_Copy)
EnableGadgetDrop(9, #PB_Drop_Files, #PB_Drag_Copy)

Procedure Afficher_fichiers()
    SetGadgetText(2, "")                    ; Vider la liste des fichiers
    Repertoire$ = GetGadgetText(1)          ; Voir quel est le répertoire sélectionné
    SetGadgetText(2, Repertoire$)           ; Remplir la liste avec le répertoire
EndProcedure

Repeat
    Select WaitWindowEvent()
        Case #PB_Event_CloseWindow
            End
            
        Case #PB_Event_Gadget
            Select EventGadget()
                Case 1 ; Afficher les fichiers du répertoire sélectionné
                    If EventType() = #PB_EventType_Change 
                        Afficher_fichiers()   
                    EndIf
                Case 2 ; Démarrer un d&d           
                    If EventType() = #PB_EventType_DragStart
                        DragFiles(GetGadgetItemText(2, GetGadgetState(2)), #PB_Drag_Copy)
                    EndIf
            EndSelect     
            
        Case #PB_Event_GadgetDrop
            Select EventGadget()
                Case 8
                    Debug "À gauche : " + EventDropFiles()
                Case 9 
                    Debug "À droite : " + EventDropFiles()
            EndSelect
    EndSelect
    
Until Evenement = #PB_Event_CloseWindow
End

;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;
DataSection
    _1bmp_start:
    ; size : 2742 bytes
    Data.q $000000000AB64D42,$0028000000360000,$001C0000001F0000,$0000001800010000,$0B1200000A800000
    Data.q $000000000B120000,$F0F0000000000000,$CC5795D3407CC6F0,$2A66B31D5A9F5996,$41A91347AA1C52AA
    Data.q $AC0B40A90D42A90C,$1344B10638A40E42,$3CAF0634A41947B7,$AB0632A41542B40F,$0936A90F3BAE0D38
    Data.q $3BAD0C3BAD0C3AAD,$AD0C3BAD0C3BAD0C,$0C3BAD0C3BAD0C3B,$F0F00000000C3BAD,$FF90D0FA4E8ED1F0
    Data.q $3C7CBF3B7BB6B5F5,$43A8063999104393,$AF1046AC073EA30C,$093CA50739A21348,$3CAA02329E1445B1
    Data.q $AA0D3BAB1D4BBA0D,$0E3BAE123DB00B38,$3BAD0C3BAD0C3AAD,$AD0C3BAD0C3BAD0C,$0C3BAD0C3BAD0C3B
    Data.q $F0F00000000C3BAD,$FB89C9F64889CCF0,$4889C75B9BD798D9,$6ED0245DB93876C2,$9E073FA20B43A736
    Data.q $1B50B40F43A6073B,$45AF1446AD1548AF,$A90C3AA81140AD15,$0D3BAD0E3BAC0C39,$3BAD0C3BAD0C3BAD
    Data.q $AD0C3BAD0C3BAD0C,$0C3BAD0C3BAD0C3B,$F0F00000000C3BAD,$E360A0E23878C0F0,$3476B46AACEB61A2
    Data.q $90E9316CC54180CA,$990C45A41650B156,$3A70D02358B7063A,$64C94176D8295EC0,$B10B3AA50838A132
    Data.q $0B39AA0E3CAC1443,$3BAD0C3BAD0C3BAD,$AD0C3BAD0C3BAD0C,$0C3BAD0C3BAD0C3B,$F0F00000000C3BAD
    Data.q $E14283D12667B8F0,$4486CA5EA1E65697,$9AEE3975CC3677C2,$9B245CB83571CE5F,$669EEB326AC40A41
    Data.q $7CDC4E84E1396FC8,$A6113FA7083A9F48,$0533A41846B5133A,$3BAD0A39AB0837A9,$AC0C3BAD0D3CAE0C
    Data.q $0C3BAD0A39AB0B3A,$F0F00000000C3BAD,$C53F7FD53978D3F0,$599CE42365B13273,$66C01B58B168AAE1
    Data.q $AC2A65BE2C69C42A,$90CAFC4E88D81C57,$50AB2058AE83BBED,$B21848AD0433941A,$1141B01038A52049
    Data.q $3DAF0F3EB00F3FB0,$AA0B3AAC0D3CAE0E,$0C3BAD0938AA0938,$F0F00000000C3BAD,$BB4282DE5796EDF0
    Data.q $4083CE2062B62060,$54B00F4FA81E61A8,$CD2F6CC22966BF16,$A8E6FF73B0F93F7D,$65BC3772C199D4FF
    Data.q $A70732941347A32D,$1546B50A38A31041,$39AB0C3BAD0E3EAE,$AD0A39AB0938AA0A,$0C3BAD0C3BAD0C3B
    Data.q $F0F00000000C3BAD,$F44181E31957B8F0,$2B6FB83E80D462A3,$52AC1454AC11549F,$B01344951F5DB313
    Data.q $6EACEE5291DA3063,$6DC04580CC68A4EA,$A8023695053C9635,$06319F1B49B30F42,$38AA0938AA0938A9
    Data.q $AE0A39AB0938AA09,$0C3BAD0D3CAE0D3C,$F0F00000000C3BAD,$D63E7FE1498AEDF0,$2066AB1C60B2397C
    Data.q $42992767BB13579E,$C00E4E9D1354A607,$4C8CD14585CD3776,$84D44684CC82C1F7,$A0265DBB346DC249
    Data.q $093BA802369E073D,$3FB1103FB1103FB0,$AA0B3AAC0E3DAF10,$0C3BAD0736A80938,$F0F00000000C3BAD
    Data.q $DE3D7FDF1557B6F0,$3B82C20645934386,$40974081D492D9FB,$EF4484D11656A904,$4B8CCD4A8BCE67A7
    Data.q $4E9A2968AD135194,$922A5FBB68A1F413,$1A4CB91145AD012F,$37A90837A90737A7,$AD0A39AB0938AA08
    Data.q $0C3BAD0C3BAD0C3B,$F0F00000000C3BAD,$AD1C60BA3073CDF0,$71BAF4236AB0165B,$66B73E80D08CD3F9
    Data.q $C6306DBA2260B225,$2263A41C5EA03C7F,$5CA87EBDEF4D8DCF,$AF4C83DE629CE820,$1546B00A3DA3184E
    Data.q $39AA1242B31B4BBA,$AC0636A70535A60A,$0C3BAD0E3EB00B3B,$F0F00000000C3BAD,$AD165DB11A61B4F0
    Data.q $519CD9458EC5175E,$AAEA5295DF62A9EB,$CA2F70BF3F80D168,$3273BD2A6DB63C7E,$4B9A296AB44788D2
    Data.q $B03671C60944960D,$4078D71850AB1E59,$5EC52F64CA396ED1,$A90638A70938A42A,$0B3AB0083AAE0537
    Data.q $F0F00000000B3AAF,$B51961AF2066B3F0,$145FAA7EC8E91E68,$78C6579BE0458DD6,$E44285D62669B835
    Data.q $2D6EC43C7ED34F92,$51A30C479A1455AB,$A12D6FBC1759A811,$4F8ED52B6DB81456,$92EB3B75CB3B77C4
    Data.q $AC0D40AC0C389E59,$083AB30A3DB30639,$F0F0000000083AB3,$D9367FCB3579BEF0,$3783C92F7BC7428E
    Data.q $5FAB4688C6539BE5,$B93270C12467B61D,$4788CA3072C82664,$4B9F0B41974C8DDA,$AA1B5EA9185BAA0B
    Data.q $9ADCFF64A8E32163,$57AE2C64B370AFE5,$B3083CA60C43A524,$083AB5093CB20D40,$F0F0000000083AB4
    Data.q $CD4D99E3509DE0F0,$64B0F2317DC83682,$66B12F71BC327BC6,$AB1351A12265B323,$95D7FF599BE71957
    Data.q $52A60E4BA16EB0F5,$CA1E61AE0E51A010,$88CAF372B6EC4185,$368C2D65B374B3EE,$BA093BA3083B9B05
    Data.q $083AB40739AF1548,$F0F0000000083AB3,$C33883CA60ABF3F0,$216CB5317BC52F7A,$80C983C9F53680C5
    Data.q $E72F73C01054A03C,$76B9FB61A4F15699,$4C9E4989D43C80D1,$DD5398DA2368B408,$4687D064A9ED5095
    Data.q $41972964B35594DE,$B3174AB103399806,$083AB10532A61145,$F0F0000000083AB1,$B4246FB4438ED3F0
    Data.q $2B75BC1C67AC246F,$A3E680C7FD62AAF0,$DB3E83CF2D71BD5E,$5A9EEF3377C74A8F,$64B5488CD94387D9
    Data.q $B33B80C82267B420,$2668B13378C12369,$63B91F5BAB3170BB,$A50E44AA073D9B27,$083BB01243B40537
    Data.q $F0F0000000083AB0,$B16BB4EE549EE1F0,$76BFF5266FB32770,$ACF158A1E55AA3E9,$D93C84CE438AD364
    Data.q $589EED3D84D1468D,$73C21C62B14289D7,$B3327AC6175EAB2D,$62A4EF347AC52067,$8FE53E7BCC4E8CDA
    Data.q $A01148AD1951AF53,$083BAD0534A20136,$F0F0000000083AAE,$C896E0FD4D97D5F0,$4791D0357FC04791
    Data.q $73B8559EE3468FD3,$E4539BE12B74BA2A,$10559F2C74BE569E,$509E1C63B01057A3,$BF559CE960A7F409
    Data.q $2A6CB94A90DB2B73,$93E84A87D82361B0,$B602399C0C3B9856,$083BAA093CA9184D,$F0F0000000083BAC
    Data.q $F966B0E97CC6F8F0,$5BA5E42771AF83CD,$6DB12069AD72BCF4,$AC1962A71A63A824,$529AE1549DE01E67
    Data.q $57A3125AA4256DB7,$A9074E9D0044920F,$0E4F9F044A9A1259,$69BE0B45960C4594,$B10C44A4063C962D
    Data.q $0236A3083CA5164B,$F0F0000000093DAB,$D34994CC60ABE2F0,$1E69A34792CC4E99,$B5E489D3FE2E78B2
    Data.q $D32D76B9246DB16B,$6BB4EB89D2F5468F,$77C004478F1660A4,$F465ACF22C74C02F,$1758AA3278CA7EC5
    Data.q $5DB33572C41351A1,$D45188E5052F8921,$042F994D81E73D73,$F0F00000000B3FAB,$F55EA7DA6CB5E1F0
    Data.q $367EB7337BB476BE,$9BDD76C0F266B1E9,$D55AA6E4337EBF50,$56A1DC65B1E34B97,$BFF53681C43F8ACD
    Data.q $E66FB8FC549EE975,$0441931A5BAF71B8,$6ABF0943950A4898,$F95D96E63E77CC2F,$376CD24076D86CA3
    Data.q $F0F0000000164AB3,$FC67B0E4448CBFF0,$4E96CD66AEE285CE,$9EDF438FCD68B0EA,$D758A5E2509CDB53
    Data.q $337FBB519CD64E9B,$85CB2974B74D99D9,$D157A0F04D98E33A,$1255A91657AC3B80,$85D83976C62866B5
    Data.q $DC9DD6FF7FB8FA48,$376DD1548AEA487F,$F0F00000001246AD,$FB68B0E259A1D0F0,$67AEE35CA3D685CC
    Data.q $87C665B1E95CA6DD,$D14392CD2E7CBB39,$1E6BA6317DB053A2,$7AC04492D33684C1,$DD4792E13884D02D
    Data.q $175BB0347CD24791,$86D95693E14987D2,$D172ABE869A2EC49,$02389A376DCA3F76,$F0F000000004399E
    Data.q $F465ADDE6CB4E0F0,$4D95C84E96C97BC3,$93D27DCAF860AADE,$F14493CB2E7CB945,$1F6EA755A4D17CCB
    Data.q $83C83987C62776B0,$A52974C54B97E236,$377BCF1D65BD074F,$93E32660B33772C3,$D23B74CB3F79CE56
    Data.q $0B41A101318D4178,$F0F0000000053A9E,$F05AA2CF60A9D5F0,$55A0D08CD5FD7BC4,$9AD66AB7EC6FBAED
    Data.q $F956A5DC3E8BC74C,$2F7EB652A1D777C5,$CBF967B5EB3A88C2,$AE145DAF4793DE7F,$488CE0236BC41058
    Data.q $96E62D68BA4680D1,$D34881D74681D459,$0D3D9E12419D427A,$F0F0000000093EA1,$EB64AECF92DAF6F0
    Data.q $4FA0CC6FBEE179C5,$90C453A1D452A2D1,$C94F9BD3539FD642,$4E9AD6438FC94592,$C1FA529DDA4A95D5
    Data.q $B8094EA12F79C778,$1A5DB11055AD1A62,$79CC1752A42566B7,$F31E59B15694E83D,$0536980D3F9C6AA3
    Data.q $F0F00000000A3DA2,$DB57A0BE82C8DFF0,$56A9D375C7ED6CB8,$8DBD6FBDE577C9ED,$CA6DB9EE66B2E540
    Data.q $4993D32F7AB64691,$B3FC3A82CB4B94D8,$DE2A70C3458CDC6C,$589CDF4388DB4188,$43962564B4589ADE
    Data.q $FF2865BC1B4BA114,$02369900339281BA
    Data.b $9C,$35,$03,$00,$00,$00
    _1bmp_end:
    
    
    
    
    _2bmp_start:
    ; size : 1802 bytes
    Data.q $00000000070A4D42,$0028000000360000,$0017000000190000,$0000001800010000,$0B12000006D40000
    Data.q $000000000B120000,$0000000000000000,$00FF0000FF00001E,$FF0000FF0000FF00,$0000FF0000FF0000
    Data.q $A50000001E0000FF,$0001291C2B547D88,$83AEAAC1EB2B406B,$C65D7EA900113D68,$355F876287B37799
    Data.q $78A18BB7DC00254D,$FF00000F00000051,$0000FF0000FF0000,$00FF0000FF0000FF,$1E0000FF0000FF00
    Data.q $A5CA8491A7000000,$9300022900032891,$7490B8BCD5FD526B,$87AF18355D223E66,$93001D43A8C8EE6A
    Data.q $0000008AAAD04E70,$00FF0000B2000000,$FF0000FF0000FF00,$0000FF0000FF0000,$71000000420000FF
    Data.q $5E7B99B6D5F25463,$8BAF000427001838,$39657BA2B0C8EE73,$CCDEFF172B500014,$0F3202153635476B
    Data.q $65000000040B0000,$0000FF0000FF0000,$00FF0000FF0000FF,$580000FF0000FF00,$DAEE000000000000
    Data.q $22445F7CE0FEFFBD,$889FC11027470004,$012526385CA6B8DC,$3EB3C1E48694B700,$2836000003270E1B
    Data.q $00FF00002F00001F,$FF0000FF0000FF00,$0000FF0000FF0000,$00000000830000FF,$B9CBE16A78880000
    Data.q $0220142841CFE0FA,$E6CFE4FF687D9A00,$203757000323AFC6,$0A29768FAEEBFFFF,$000000A4B1C30000
    Data.q $0000FF0000B20000,$00FF0000FF0000FF,$FF0000FF0000FF00,$30380000000F0000,$72E2ECFFDCE4F92E
    Data.q $000623000C284A58,$617ED2EFFF748DAB,$FD81A4C000092542,$EFFE000F344FBBE3,$00580000000306E6
    Data.q $FF0000FF0000FF00,$0000FF0000FF0000,$00380000FF0000FF,$717E910000000000,$5A8488B3DDABC8EA
    Data.q $7F00001000031B35,$000425C2CDE16D70,$CEFBCEF5FF274C76,$00020A717D8D00AC,$0000B200000F0000
    Data.q $00FF0000FF0000FF,$FF0000FF0000FF00,$0000000000970000,$F0C4DEFF1A1E2500,$000E29A4C7F19EC5
    Data.q $DBEF000010000418,$DA000B346981A3D0,$091B00B2D4FF88AF,$0007090E3B435300,$FF0000FF00003800
    Data.q $0000FF0000FF0000,$00FF0000FF0000FF,$0000000000002F00,$D8FFB9DCFF546476,$1500041F556C8CB5
    Data.q $B8CCED5C68800001,$B6E61C3E6B102C54,$F7FFFF5F6B810094,$00000000007C818F,$00FF0000FF000065
    Data.q $FF0000FF0000FF00,$0000B20000FF0000,$9E00000000000000,$9EBADFA3C3E97588,$011C01102D000D2D
    Data.q $4899AFD69DADCE00,$BDD400A3C5F5001C,$4BEAF1FFCDD5E8AE,$8300000000003D41,$0000FF0000FF0000
    Data.q $00FF0000FF0000FF,$000000650000FF00,$6C7E000000000000,$22507096B9DBF05B,$2A385300011E0003
    Data.q $608D00073093A3C4,$80889B4D5C71003F,$555DA8AEBCE3EAFC,$0083000000000052,$FF0000FF0000FF00
    Data.q $0000FF0000FF0000,$00000000580000FF,$0000000000000000,$021C00163469849D,$8C76809900011500
    Data.q $6578000017405068,$CFC8D1E03F4B5B56,$60676DA9B3BFBCC4,$0000580000000000,$00FF0000FF0000FF
    Data.q $FF0000FF0000FF00,$00000F0000730000,$0000000000000000,$00040D0000000000,$4A5F75808C4C505A
    Data.q $384452AEBECE0038,$9CA8AFB9C3717B87,$0078838E919FAC90,$B200002600000000,$0000FF0000FF0000
    Data.q $00FF0000FF0000FF,$160000580000FF00,$0000000000000000,$0000000000000000,$E1F3000000000000
    Data.q $A32735528C9BB2D0,$303956B4BFDF7883,$3D43ACB3C28791AA,$0042000000000038,$FF0000FF0000B200
    Data.q $0000FF0000FF0000,$5CFF0000FF0000FF,$73070CA23D46AF4F,$0000970002730306,$DBEAFFABBBCB00FF
    Data.q $ABC86C7A978B99B4,$B4020E263D48649D,$263A50EFFFFF96A3,$0000000000111923,$00FF00006500002F
    Data.q $FF0000FF0000FF00,$0000FF0000FF0000,$00FF0000FF0000FF,$A0AD00FF0000FF00,$AEDAE9FFC0CFE292
    Data.q $C1D2EC7C8BA88494,$C3DB1A2C4244566E,$3A1D3654A4BDDBAF,$00000024313C1227,$00001E0000000000
    Data.q $007300004D000042,$7300007300007300,$0000730000730000,$4855666773810073,$9BB5C0D0E78A99AE
    Data.q $A8B5CAE58AA0B88A,$839ABA637B97768E,$61766A829A617898,$810000100007184C,$070B1A7574847270
    Data.q $6674617482414C5B,$134553606F838C50,$B0BF000003140005,$79000313455262A7,$8FA4BFD6EBFF5667
    Data.q $ABCFA2BDDB687F9E,$E620385C364E7293,$07192FBFD9F2AEC9,$C9E127283D00061C,$D835455C575D73CB
    Data.q $A8CEE58FB5CCA4C3,$001C2F3F60C4E3FF,$C7D3E3D1D8EB0000,$8FA50004142A3748,$69253C5CCCE2FA7D
    Data.q $AAC5F0B5CEF72C46,$EBFF4D6F9444618B,$1700021C718BA6CA,$EEF3FFADADC50000,$99AF7E9BAD727F92
    Data.q $BEA6C7E851769076,$C4DD000005297F95,$5EB9C5D5E1E9FCC0,$9AAEC7021327404D,$2B5B506790B7CBEC
    Data.q $664E72A438588913,$9CBEE12A5178113A,$142D040D2A001130,$D9C9D4E6C0C5D912,$3E637E84A7BBADC8
    Data.q $7FADB1CCF9789ABF,$81879D8A8EAB006D,$475CC6D1E3DFE7FA,$EF7A8EB1000F2B38,$5174AA7892C3AFC4
    Data.q $4774366496759ED4,$23A0BADD94BAE11B,$13182C00021C0006,$C4D7E2FCFFCED9EB,$D885A7CC82A7C2A3
    Data.q $7E960099ADE28CA8,$FFA2B7D42A40586C,$354567E5F8FFD8EB,$B5DF404E75000529,$B15075A196B3DDA2
    Data.q $A5D5FB91C1E95A87,$06194D7189B4E1FF,$D841495400031000,$B0CAE3C9D4E6C4CA,$69935E92BA86AACC
    Data.b $34,$00
    _2bmp_end:
    
    
    
    
    
    _3bmp_start:
    ; size : 1986 bytes
    Data.q $0000000007C24D42,$0028000000360000,$00170000001C0000,$0000001800010000,$0B120000078C0000
    Data.q $000000000B120000,$D6E7000000000000,$9E87A4C4ADCCE1B5,$0E22430017396078,$42001A2639314462
    Data.q $0000FF0000FF0000,$00FF0000FF0000FF,$1E0000FF0000FF00,$97AFB6C000000000,$828B925F686F8790
    Data.q $888F6C757C5E676E,$C7707980818A917F,$1D37524A6379B7C0,$3E6500123C00052B,$AC8DA0BE50688C22
    Data.q $00FF000042008D98,$FF0000FF0000FF00,$0000FF0000FF0000,$000000001E0000FF,$8A939CA5AE939BA8
    Data.q $B079828B939CA581,$A3ACB5636C759EA7,$032CA9B2BBC7D0D9,$F13C5B87000E3700,$C4E2FFC4E6FFA4C7
    Data.q $4200637385C9E3FE,$0000FF0000FF0000,$00FF0000FF0000FF,$1E0000FF0000FF00,$A78995A300000000
    Data.q $929BA49DA6AF959E,$A7B0D8E1EAADB6BF,$8B5760694A535C9E,$B5C9FB7D8DC17982,$DEFF9CBCE2ABC8F2
    Data.q $3D15334D7491AFBD,$00FF00004200192C,$FF0000FF0000FF00,$0000FF0000FF0000,$000000001E0000FF
    Data.q $B2BDA6AEB9697583,$C29FA7B2A9B1BCAA,$454D58B2BAC5AFB7,$D4FF565E69313944,$56273D62A9C4EFB5
    Data.q $0003203146632235,$42006F8295163049,$0000FF0000FF0000,$00FF0000FF0000FF,$1E0000FF0000FF00
    Data.q $BD6A758100000000,$B7BFCA9EA6B1AAB2,$C3CEAEB6C1A6AEB9,$E3A2AAB5B8C0CBBB,$527497BBE8FFD0D8
    Data.q $2440525976374866,$A1B5C6E232405B19,$00FF000042007E8D,$FF0000FF0000FF00,$0000FF0000FF0000
    Data.q $000000001E0000FF,$B4BF9FA7B2A8AFBB,$B0A4ACB79AA2ADAC,$A5ADB88F97A29DA5,$CBE28F97A2959DA8
    Data.q $733F4E637E8EA7B1,$A0B2C88293A75360,$42007D8D9FB4C9DE,$0000FF0000FF0000,$00FF0000FF0000FF
    Data.q $1E0000FF0000FF00,$B099A4AE00000000,$B0C1DBB3C5DB8E9D,$A7BD7489A48AA0B8,$9B69818D9CB2C78E
    Data.q $101E392E3E587E92,$B5CA8296AF293A54,$889CB2C79EB4C99F,$00FF000042006777,$FF0000FF0000FF00
    Data.q $0000FF0000FF0000,$000000001E0000FF,$99AE93A8B98696A0,$E5C4D8F197ABC484,$D5E7FD9CB0C8B6CA
    Data.q $001E7C8D97ACBFCD,$BDA8C3E146577500,$A3BDD4AAC8E2829F,$420065768493AEC1,$0000FF0000FF0000
    Data.q $00FF0000FF0000FF,$1E0000FF0000FF00,$BA869DA800000000,$7E94AC92ABBF90AC,$D0EAB0BFDC62768F
    Data.q $706773839AA4BDC2,$A3C2DF7287A45A64,$CCE998BEE3AED2F6,$9388A4B99FBFD8A7,$00FF000042007586
    Data.q $FF0000FF0000FF00,$0000FF0000FF0000,$000000001E0000FF,$C5D792B2BF8CAAB4,$6870819BAFC5DDA8
    Data.q $272B462027433F4A,$DDF78487964E5366,$D6A8D4F9B4E0FBB8,$688AA66087A884AE,$420096A9B898B7CC
    Data.q $0000FF0000FF0000,$00FF0000FF0000FF,$1E0000FF0000FF00,$CFA1C1CD00000000,$C7DDF5B7D4E6A2C2
    Data.q $001C101B3995A6C0,$9AADB2C55F637E00,$729BB9C5EDFF888B,$618310365D2E567A,$75C5E0FBA2C3E23D
    Data.q $00FF000042005062,$FF0000FF0000FF00,$0000FF0000FF0000,$000000001E0000FF,$ADBF9CB4C19BB0BC
    Data.q $551C2D4454687D97,$BCC4D08D99B02E3C,$68871F23287B838E,$A4001C420003254F,$D8F5FF95B3D55E7E
    Data.q $42000003155F7B95,$0000FF0000FF0000,$00FF0000FF0000FF,$1E0000FF0000FF00,$0000000000000000
    Data.q $0000000000000000,$0000000000000000,$00001E0000000000,$3338620000250083,$CFF0B9D3F89FB3D8
    Data.q $000003157B95B6B5,$00FF000073000000,$FF0000FF0000FF00,$0000FF0000FF0000,$001E0000420000FF
    Data.q $1E00001E00001E00,$00001E00001E0000,$009700004D00002F,$5D8B00FF0000FF00,$F2C0E0FFAFCAF745
    Data.q $00412A3F6B83ABCB,$FF0000FF00007024,$0000FF0000FF0000,$00FF0000FF0000FF,$FF0000FF0000FF00
    Data.q $0000FF0000FF0000,$00FF0000FF0000FF,$FF0000FF0000FF00,$0000FF0000FF0000,$8BB2D99BC0EA00FF
    Data.q $7F1C6F92B4A8CEF3,$0000FF0000FF0000,$00FF0000FF0000FF,$FF0000FF0000FF00,$0000FF0000FF0000
    Data.q $00FF0000FF0000FF,$FF0000FF0000FF00,$0000FF0000FF0000,$00FF0000FF0000FF,$BADE00FF0000FF00
    Data.q $7B89B2D287B3D68C,$001E00001600556A,$1E00001E00001E00,$00001E00001E0000,$001E00001E00001E
    Data.q $1E00001E00001E00,$00001E00001E0000,$004200004200001E,$1E00001E00004200,$6F000F00001E0000
    Data.q $B1D3F6A7CDF1676A,$93AE87A5C195B8D8,$BE99B4D099B4D078,$536C888CA5C287A3,$8EA8829AB469809B
    Data.q $3C22385390A6C178,$5064804B62790B21,$3A541A2441414E71,$791C263A3F475C31,$BCC4CBBBC3CB616B
    Data.q $8DB09FA6ACADB7B9,$8B3D507034466A79,$5A6D8B4A5D7B586B,$6683637490536480,$93505E7928375457
    Data.q $101B37444F6B6A78,$6E8BA7B0CD1A2340,$40242A4A00001E65,$444C63373E5A1A20,$CAD3CDD7E38B94A5
    Data.q $BD9FA8AD9BA6ACC0,$040D2C6C7795ADB6,$7490E2EDFF081331,$A2252F4800001C69,$494F67373F567F89
    Data.q $7992DADEF75D637B,$CF50506C00001777,$02001A13102DB3B3,$778A0F1126000016,$CED2DCE8A9AEC172
    Data.q $B7C4CD97A4ADB8C2,$465DA2AEBA919DA9,$E58D9BB518283F36,$2E3A52101F36BDCB,$001366718598A5B8
    Data.q $B5878EA030374A00,$494B601D1F349DA2,$567100001537374F,$82797B87D3D1E759,$D0D6E2B6BDC57679
    Data.q $AABA9EA7B8AEB8C4,$BA92A1B49DAABB9D,$98B4C20D293598A7,$223621354D9CB2C7,$139DAEBEB8CADE10
    Data.q $5E6A781E2E3B0003,$7888252E3D202C3A,$814F5467B9C0D271,$D4D7E8D5D7EE686D,$A6A9CDD1D2DCDFE4
    Data.q $B9B4BECAB1B8C09E,$9AA9C08692A89DA9,$617BABBBD4A7B7D0,$6E1C283E7F8DA751,$4A55698893A74F5A
    Data.q $C9DD2E394D152034,$A64A5265C0CBDFBE,$B5BCCED5DCEE8B93,$C3D1B6BCCCACB2C2,$A9AEB4B4BFC3CEBD
    Data.q $AFB3BE969B9FA6AA,$9FBC858AA0B3B9C9,$E9C2C8E88A8FAD9A
    Data.b $CC,$C5
    _3bmp_end:
EndDataSection
:wink:
Avatar de l’utilisateur
SPH
Messages : 4721
Inscription : mer. 09/nov./2005 9:53

Re: drag&drop compliqué (pour moi)

Message par SPH »

TRES grand merci, Marc :!: :idea:
http://HexaScrabble.com/
!i!i!i!i!i!i!i!i!i!
!i!i!i!i!i!i!
!i!i!i!
//// Informations ////
Intel Core i7 4770 64 bits - GTX 650 Ti
Version de PB : 6.00 - 64 bits
Répondre