Seite 1 von 2

ExplorerTreeGadget: Datei anwählen

Verfasst: 27.09.2006 18:48
von Eckhard.S
Zur Benutzung des ExplorerTreeGadgets habe ich nach eigenem Gebastel und Nachsehen in der Hilfe, im Forum und im Archiv meine einfache Aufgabe leider nicht lösen können.

Man soll mit Doppelklick eine Datei auswählen können, der Dateiname landet in einer Variablen z.B. datei$ und das Gadget schließt sich

Was muss man einbauen?:

Code: Alles auswählen

OpenWindow(0, 0, 0, 300, 300, "ExplorerTreeGadget", #PB_Window_SystemMenu | #PB_Window_ScreenCentered) And CreateGadgetList(WindowID(0))
  ExplorerTreeGadget(0, 10, 10, 280, 280, "")

  Repeat    
    Select WaitWindowEvent() 
      Case #PB_Event_CloseWindow 
        Break
    
    
         
    EndSelect
    
  ForEver
  End

Verfasst: 27.09.2006 18:56
von a14xerus

Code: Alles auswählen

; PB 4.0
; ExplorerTree Example by Alexander N

Enumeration
  #window_0
  
  #explorer_tree
EndEnumeration


If OpenWindow(#window_0, 0, 0, 300, 300, "ExplorerTreeGadget", #PB_Window_SystemMenu | #PB_Window_ScreenCentered)
  If CreateGadgetList(WindowID(#window_0)) 
    ExplorerTreeGadget(#explorer_tree, 10, 10, 280, 280, "") 
  EndIf
EndIf



Repeat    
  Event = WaitWindowEvent()
  GadgetID = EventGadget()
  
  
  If Event = #PB_Event_CloseWindow 
    quit = #True
  ElseIf Event = #PB_Event_Gadget
    If GadgetID = #explorer_tree
      If EventType() = #PB_EventType_LeftDoubleClick
        explorer$ = GetGadgetText(#explorer_tree)
        quit = #True
      EndIf
    EndIf
  EndIf
  
Until quit = #True
CloseWindow(#window_0)
MessageRequester("Ausgabe",explorer$)
End
//edit: warum nicht:

Code: Alles auswählen

datei$ = OpenFileRequester("Öffnen","","",0)

Verfasst: 27.09.2006 20:02
von Eckhard.S
a14xerus hat geschrieben:
warum nicht:

Code: Alles auswählen

datei$ = OpenFileRequester("Öffnen","","",0)
:o Weil man als Anfänger da erst mal einen Tipp dafür braucht. Das ist natürlich noch simpler, danke!! 8)

Verfasst: 27.09.2006 20:06
von AND51
Tipp!

Nimm dir einfach mal Zeit mit ner Tafel Vollmilchschokolade, setz dich da hin und schmöker erst einmal ne Runde in der Hilfe, um zu sehen, was es für befehle gibt.

Offensichtlich programmierst du eher Anwendungen statt Spiele. Bin uch einer dieser Sorte und mache das genauso, allerdings überspringe ich die Kapitel 3D-Befehele und 2D (obowhl ich mich auch mit 2D schon auskenne).

"Schmökern" bedeutet einfach langsam und vor allem gemütlich lesen. Und nur das, was einen Interessiert (mir egal, wie andere "schmökern" definieren ;-) ). So lernst du PB-befehel ganz leicht und wärst selbst auf OpenFileRequester() gekommen, da wette ich drum (das war nicht böse gemeint, sondern sollte zum Schmökern animieren).

Verfasst: 27.09.2006 20:13
von winduff
hrhr :mrgreen: schmökern sollte in den duden eingetragen werden ;)

ansonsten: sehe ich genauso :allright:

Verfasst: 27.09.2006 20:44
von a14xerus
Eckhard.S hat geschrieben:
a14xerus hat geschrieben:
warum nicht:

Code: Alles auswählen

datei$ = OpenFileRequester("Öffnen","","",0)
:o Weil man als Anfänger da erst mal einen Tipp dafür braucht. Das ist natürlich noch simpler, danke!! 8)
bitte bitte

=> guck dir generell mal den abschnitt requester an, da sind imemr nützliche sachen drin ;-)

und sonst stimme ich AND51 und winduff voll und ganz zu

Verfasst: 27.09.2006 22:00
von Kaeru Gaman
winduff hat geschrieben:hrhr :mrgreen: schmökern sollte in den duden eingetragen werden ;)
http://www.duden.de/ hat geschrieben:schmökern (Artikelvorschau)
schmö|kern <sw. V.; hat> (ugs.): gemütlich etw. Unterhaltendes, Spannendes o. Ä. lesen: er schmökert ...

Verfasst: 28.09.2006 08:42
von AND51
Da hat mir ja schon jemand die Arbeit abgenommen... :lol:
Ich dachte erst schon: Soll ich mal nachschlagen und den Link hier reinsetzen? Ne, das macht bestimmt schon ein naderer... 8)

Verfasst: 28.09.2006 11:15
von Kaeru Gaman
AND51 hat geschrieben:...das macht bestimmt schon ein naderer... 8)
...ich bin kein Naderer. :?

Verfasst: 28.09.2006 13:16
von AND51
...ist das arabische Wort für "anderer"... :mrgreen: