ExplorerTreeGadget: Datei anwählen

Anfängerfragen zum Programmieren mit PureBasic.
Benutzeravatar
Eckhard.S
Beiträge: 136
Registriert: 22.07.2006 17:19
Wohnort: Meschede/Sauerland

ExplorerTreeGadget: Datei anwählen

Beitrag 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
Viele Grüße aus dem Sauerland
Eckhard

PureBasic 4.0 Vollversion, WinXP
Make a better world :D
a14xerus
Beiträge: 1440
Registriert: 14.12.2005 15:51
Wohnort: Aachen

Beitrag 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)
Benutzeravatar
Eckhard.S
Beiträge: 136
Registriert: 22.07.2006 17:19
Wohnort: Meschede/Sauerland

Beitrag 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)
Viele Grüße aus dem Sauerland
Eckhard

PureBasic 4.0 Vollversion, WinXP
Make a better world :D
Benutzeravatar
AND51
Beiträge: 5220
Registriert: 01.10.2005 13:15

Beitrag 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).
PB 4.30

Code: Alles auswählen

Macro Happy
 ;-)
EndMacro

Happy End
Benutzeravatar
winduff
Beiträge: 879
Registriert: 10.02.2006 21:05
Wohnort: Gießen
Kontaktdaten:

Beitrag von winduff »

hrhr :mrgreen: schmökern sollte in den duden eingetragen werden ;)

ansonsten: sehe ich genauso :allright:
Bild
AND51 hat geschrieben:...und ich würde dein Programm aus Wut zwei mal installieren, um eines genüsslicher löschen zu können, als das andere...
a14xerus
Beiträge: 1440
Registriert: 14.12.2005 15:51
Wohnort: Aachen

Beitrag 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
Kaeru Gaman
Beiträge: 17389
Registriert: 10.11.2004 03:22

Beitrag 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 ...
Der Narr denkt er sei ein weiser Mann.
Der Weise weiß, dass er ein Narr ist.
Benutzeravatar
AND51
Beiträge: 5220
Registriert: 01.10.2005 13:15

Beitrag 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)
PB 4.30

Code: Alles auswählen

Macro Happy
 ;-)
EndMacro

Happy End
Kaeru Gaman
Beiträge: 17389
Registriert: 10.11.2004 03:22

Beitrag von Kaeru Gaman »

AND51 hat geschrieben:...das macht bestimmt schon ein naderer... 8)
...ich bin kein Naderer. :?
Der Narr denkt er sei ein weiser Mann.
Der Weise weiß, dass er ein Narr ist.
Benutzeravatar
AND51
Beiträge: 5220
Registriert: 01.10.2005 13:15

Beitrag von AND51 »

...ist das arabische Wort für "anderer"... :mrgreen:
PB 4.30

Code: Alles auswählen

Macro Happy
 ;-)
EndMacro

Happy End
Antworten