DragImage()

Syntax

Ergebnis = DragImage(ImageID [, Aktionen])
Beschreibung
Startet eine Drag & Drop Operation mit Bild-Daten.

Parameter

ImageID Das zu "ziehende" (englisch "to drag") Bild. ImageID() kann verwendet werden, um diese ID für ein Bild zu erhalten.
Aktionen (optional) Eine Kombination der Drag & Drop Aktionen, welche für das Bild erlaubt sein sollen. Wenn der Parameter nicht angegeben wird, wird #PB_Drag_Copy die einzige erlaubte Aktion sein. Mögliche Aktionen sind: (sie können mittels '|' kombiniert werden) 
  #PB_Drag_Copy: Das Bild kann kopiert werden
  #PB_Drag_Move: Das Bild kann verschoben werden
  #PB_Drag_Link: Das Bild kann verlinkt werden
Der Anwender kann durch Drücken der Zusatztasten wie 'Strg' oder 'Shift' entscheiden, welche dieser Aktionen verwendet werden soll. Die Aktionen, welche tatsächlich stattfinden können, richten sich auch nach den vom Zielobjekt (englisch "drop target") erlaubten Aktionen.
(Auf MacOSX werden die Aktionen nur als ein Vorschlag übergeben. Das Zielobjekt kann immer noch eine andere Aktion auswählen.)

Rückgabewert

Gibt einen der oben genannten Drag & Drop Aktions-Werte zurück, welche die vom Anwender genutzte Aktion anzeigen, oder #PB_Drag_None wenn der Anwender die Drag & Drop Operation abgebrochen hat.

Bitte beachten Sie, dass es bei Rückgabe von #PB_Drag_Move in Ihrer Verantwortung liegt, das verschobene Bild von Ihrer Applikation zu entfernen.

Anmerkungen

Drag & Drop kann grundsätzlich jederzeit gestartet werden, aber die linke Maustaste sollte aktuell gedrückt sein, da andernfalls die Operation umgehend und ohne Erfolg beendet wird. Der übliche Zeitpunkt zum Starten einer Drag & Drop Operation ist, wenn ein Gadget über EventType() ein Ereignis vom Typ #PB_EventType_DragStart zurückmeldet.

Beispiel

  ; Verschieben Sie das Bild zu einer Applikation, welche Bilder akzeptiert (wie Office- oder Grafikprogramme).
  ;
  If LoadImage(1, #PB_Compiler_Home + "examples/sources/data/PureBasicLogo.bmp")
    If OpenWindow(1, 200, 200, 400, 90, "Drag & Drop", #PB_Window_SystemMenu)
      ImageGadget(1, 10, 10, 380, 70, ImageID(1))
    
      Repeat
        Event = WaitWindowEvent()      
        If Event = #PB_Event_Gadget And EventGadget() = 1 And EventType() = #PB_EventType_DragStart
          DragImage(ImageID(1))
        EndIf      
      Until Event = #PB_Event_CloseWindow
    EndIf
  EndIf

Siehe auch

DragFiles(), DragText(), DragPrivate(), DragOSFormats(), SetDragCallback()

Unterstützte OS

Alle

<- DragFiles() - DragDrop Inhaltsverzeichnis - DragOSFormats() ->