URL per Drag & Drop auf ein ComboBoxGadget

[max11]

Hallo Männer,
gibt es die Möglichkeit eine Url aus eine Web Browser in ein ComboBoxGadget zu kopieren.
Ich habe schon einiges versucht, allso wenn im Browser eine lokale datei angezeigt wird ist alle prima aber leider bei einem Link ändert sich der Mauszeiger nicht.

EnableGadgetDrop(#cmbWebAdresse, #PB_Drop_Files | #PB_Drop_Text , #PB_Drag_Copy )

kann mir da einer helfen?

[Omi]

Hallo Max,

geht doch eh.
Z.B. ein ComboBoxGadget(0, 10, 10, 250, 25, #PB_ComboBox_Editable) angelegt.
Dann aus genau dieser Seite den Inhalt der Adresseingabe oder z.B. den Link rechts oben 'Englisches Forum' in das Gadget gezogen.
Beide werden ohne Problem in die Eingabe der ComboBox übernommen ???

Ein EnableGadgetDrop brauchts dafür nicht.

Gruß Charly

[max11]

genau so hab ich es erstellt

ComboBoxGadget(#cmbWebAdresse, 0, 30, 500, 25, #PB_ComboBox_Editable)

aber es funzt nicht bei einer Internetadresse.

wenn ich "EnableGadgetDrop" entferne geht auch keine lokal gespeicherte Datei nicht.

[Omi]

Tja ???
Hab mit PB5.40 (gtk2) und PB5.31 auf Xubuntu-Linux keine Probleme !?!

Bist Du auf Windows? Hier müssten mittlerweile andere ran ...
Ich häng mal meinen kurzen Text-Code an

Code: Alles auswählen

Global.i gEvent, gQuit

OpenWindow(0, 0, 0, 300, 100, "ComboBox", #PB_Window_SystemMenu | #PB_Window_ScreenCentered)
ComboBoxGadget(0, 10, 10, 280, 25, #PB_ComboBox_Editable)
AddGadgetItem(0, -1, "item 1")

Repeat
	gEvent= WaitWindowEvent()
	
	Select gEvent
		Case #PB_Event_CloseWindow
			gQuit= #True
			
	EndSelect
	
Until gQuit

Charly

[Derren]

Geht bei mir gar nicht. Weder Text, noch Link, noch eine Adresse aus dem Browser.
Weder mit EnableGadgetDrop(), noch ohne.

Hat jemand mal ein funktionierendes Beispiel?

edit: geht unter Windows nicht, bei mir. Auch nicht mit nem String Gadget.

[max11]

Hallo Carrly,

ja, Windows 7,

habe deinen Code getestet aber leider es funzt nicht.

vielen dank für deine hilfe.

Code: Alles auswählen

Global.i gEvent, gQuit

OpenWindow(0, 0, 0, 300, 100, "ComboBox", #PB_Window_SystemMenu | #PB_Window_ScreenCentered)
ComboBoxGadget(1, 10, 10, 280, 25, #PB_ComboBox_Editable)
EnableGadgetDrop(1, #PB_Drop_Files | #PB_Drop_Text , #PB_Drag_Copy )
AddGadgetItem(1, -1, "item 1")

Repeat
   gEvent= WaitWindowEvent()
   
   Select gEvent
     Case #PB_Event_GadgetDrop  
       
       If 1 = EventGadget() 
         SetGadgetText(1, EventDropFiles())
      EndIf
       
     Case #PB_Event_CloseWindow
         gQuit= #True
         
   EndSelect
   
Until gQuit

hier im beispiel gehts aber nur lokale dateien.

__________________________________________________
Code-Tags hinzugefügt
16.11.2015
RSBasic

[Kiffi]

Dateien oder Text: Das dürfte so nicht funktionieren.

Hier Dein Beispiel mit Text-Drag:

Code: Alles auswählen

Global.i gEvent, gQuit

OpenWindow(0, 0, 0, 300, 100, "ComboBox", #PB_Window_SystemMenu | #PB_Window_ScreenCentered)
ComboBoxGadget(1, 10, 10, 280, 25, #PB_ComboBox_Editable)
EnableGadgetDrop(1, #PB_Drop_Text , #PB_Drag_Copy )
AddGadgetItem(1, -1, "item 1")

Repeat
  gEvent= WaitWindowEvent()
  
  Select gEvent
    Case #PB_Event_GadgetDrop 
      
      If 1 = EventGadget() 
        SetGadgetText(1, EventDropText())
      EndIf
      
    Case #PB_Event_CloseWindow
      gQuit= #True
      
  EndSelect
  
Until gQuit

Grüße ... Peter

[max11]

Hallo Peter,

dein Beispiel funzt nicht. Allso das wir uns richtig verstehen ich möchte aus einem externen Programm zb. IE oder Firefox den Link per Drop in meiner combobox haben.

[Kiffi]

ich möchte aus einem externen Programm zb. IE oder Firefox den Link per Drop in meiner combobox haben.

ja, grade noch einmal mit dem Chrome und Firefox ausprobiert: Funktioniert.

Grüße ... Peter

[max11]

Hallo Peter,

hast du auch Windows 7?

bei mir kommt nur der Mauszeiger mit Stop Symbol?