Aktuelle Zeit: 09.07.2020 09:16

Alle Zeiten sind UTC + 1 Stunde [ Sommerzeit ]




Ein neues Thema erstellen Auf das Thema antworten  [ 5 Beiträge ] 
Autor Nachricht
 Betreff des Beitrags: Bild zu einer externen Applikation
BeitragVerfasst: 29.08.2019 08:36 
Offline
Benutzeravatar

Registriert: 15.11.2010 10:56
Hallo Leute,
möchte Bild und Text in eine externe Anwendung per Drag übergeben.

Nun habe die Sache wie in Help beschrieben aufgebaut.

Beim Ziehen zeigt Cursor die Kopie an, aber beim Ziehen in andere Anwendung wandelt er sich ins Verbot Zeichen um!

Und somit kommt nichts an!

Code:
; Verschieben Sie das Bild zu einer Applikation, welche Bilder akzeptiert (wie Office- oder Grafikprogramme).
Global Work_I_Bild
;
If LoadImage(1, #PB_Compiler_Home + "examples/sources/data/PureBasicLogo.bmp")
 
  If OpenWindow(1, 200, 200, 400, 90, "DragImage in andere Anwendung", #PB_Window_SystemMenu)
    Work_I_Bild = ImageGadget(#PB_Any, 10, 10, 380, 70, ImageID(1))
    EnableGadgetDrop(Work_I_Bild, #PB_Drop_Image, #PB_Drag_Copy )
   
    Repeat
      Event = WaitWindowEvent()     
      If Event = #PB_Event_Gadget And EventGadget() = Work_I_Bild And EventType() = #PB_EventType_DragStart
        Debug "DragStart"
        ;
        DragImage(ImageID(1),#PB_Drag_Copy)
      EndIf     
    Until Event = #PB_Event_CloseWindow
  EndIf
EndIf

Jemand einen Tipp?

Gruss ... Velindos

_________________
Windows 7/8/8.1/10 (32/64-Bit) |Ubuntu 10.4 (64-Bit) |Purebasic 5.43 LTS (32/64-Bit)


Nach oben
 Profil  
Mit Zitat antworten  
 Betreff des Beitrags: Re: Bild zu einer externen Applikation
BeitragVerfasst: 29.08.2019 10:44 
Offline
Benutzeravatar

Registriert: 24.11.2004 13:12
Wohnort: Germany
Habe es mal getestet...

funktioniert so weit wie es soll. Aber die Anwendung muss auch Drop unterstützen.

Win: Wordpad (habe kein Office hier), macOS: Pages

_________________
Alles ist möglich, fragt sich nur wie...
Projekte ThreadToGUI / EventDesigner V3 / OOP-BaseClass-Modul / OPC-Helper DLL
PB v3.30 / v5.4x - OS Mac Mini OSX 10.xx / Window 10 Pro. (X64) /Window 7 Pro. (X64) / Window XP Pro. (X86) / Ubuntu 14.04
Downloads auf My Webspace


Nach oben
 Profil  
Mit Zitat antworten  
 Betreff des Beitrags: Re: Bild zu einer externen Applikation
BeitragVerfasst: 29.08.2019 12:48 
Offline
Benutzeravatar

Registriert: 15.11.2010 10:56
Hallo mk-soft!

Danke für deine prompte Hilfe. Hab die Sache mit Wordpad übersehen!

Versuchte das Bild in den Photofiltre zu geben! Na, das geht nicht.

Hier dürften noch Unterschiede im DragImage sein, keine Ahnung!

Hab einfach das Dragimage noch ins Clipboard geladen und kann es somit auch im Photofiltre einfügen.

Gruss ... Velindos!

_________________
Windows 7/8/8.1/10 (32/64-Bit) |Ubuntu 10.4 (64-Bit) |Purebasic 5.43 LTS (32/64-Bit)


Nach oben
 Profil  
Mit Zitat antworten  
 Betreff des Beitrags: Re: Bild zu einer externen Applikation
BeitragVerfasst: 29.08.2019 13:04 
Offline
Benutzeravatar

Registriert: 24.11.2004 13:12
Wohnort: Germany
Versuch es mal mit einer Temp-Dabei

_________________
Alles ist möglich, fragt sich nur wie...
Projekte ThreadToGUI / EventDesigner V3 / OOP-BaseClass-Modul / OPC-Helper DLL
PB v3.30 / v5.4x - OS Mac Mini OSX 10.xx / Window 10 Pro. (X64) /Window 7 Pro. (X64) / Window XP Pro. (X86) / Ubuntu 14.04
Downloads auf My Webspace


Nach oben
 Profil  
Mit Zitat antworten  
 Betreff des Beitrags: Re: Bild zu einer externen Applikation
BeitragVerfasst: 29.08.2019 14:00 
Offline
Benutzeravatar

Registriert: 15.11.2010 10:56
Hallo mk-soft!
Hab die Sache nach deinen Tip gestaltet und schon kann man das Bild
in Externe Anwendungen Dragen!

Code:
; Verschieben Sie das Bild zu einer Applikation, welche Bilder akzeptiert (wie Office- oder Grafikprogramme).
UsePNGImageDecoder()
UsePNGImageEncoder()

Enumeration
  #Img_Drag
  #Img_Catch
EndEnumeration

Global Work_I_Bild
; Temp Pfad
Global DragFile_Pfad$ = GetTemporaryDirectory()+"Velindos_Clipboard_Image.bmp"
;
If LoadImage(#Img_Drag, #PB_Compiler_Home + "examples/sources/data/PureBasicLogo.bmp")
 
  If OpenWindow(1, 200, 200, 400, 90, "DragImage in andere Anwendung", #PB_Window_SystemMenu)
    Work_I_Bild = ImageGadget(#PB_Any, 10, 10, 380, 70, ImageID(#Img_Drag))
    EnableGadgetDrop(Work_I_Bild, #PB_Drop_Image, #PB_Drag_Copy )
   
    Repeat
      Event = WaitWindowEvent()     
     
      If Event = #PB_Event_Gadget And EventGadget() = Work_I_Bild And EventType() = #PB_EventType_DragStart
        Debug "DragStart"
        ; Img temp save
        SaveImage(#Img_Drag, DragFile_Pfad$, #PB_ImagePlugin_BMP)
        ; drag
        DragFiles(DragFile_Pfad$,#PB_Drag_Copy)
       
      EndIf     
    Until Event = #PB_Event_CloseWindow
  EndIf
EndIf


Danke!

Gruss ... Velindos!

_________________
Windows 7/8/8.1/10 (32/64-Bit) |Ubuntu 10.4 (64-Bit) |Purebasic 5.43 LTS (32/64-Bit)


Nach oben
 Profil  
Mit Zitat antworten  
Beiträge der letzten Zeit anzeigen:  Sortiere nach  
Ein neues Thema erstellen Auf das Thema antworten  [ 5 Beiträge ] 

Alle Zeiten sind UTC + 1 Stunde [ Sommerzeit ]


Wer ist online?

Mitglieder in diesem Forum: Majestic-12 [Bot] und 7 Gäste


Sie dürfen keine neuen Themen in diesem Forum erstellen.
Sie dürfen keine Antworten zu Themen in diesem Forum erstellen.
Sie dürfen Ihre Beiträge in diesem Forum nicht ändern.
Sie dürfen Ihre Beiträge in diesem Forum nicht löschen.

Suche nach:
Gehe zu:  

 


Powered by phpBB © 2008 phpBB Group | Deutsche Übersetzung durch phpBB.de
subSilver+ theme by Canver Software, sponsor Sanal Modifiye