Veralteter Befehl
Verfasst: 08.01.2009 11:04
Hallo Leute,
Habe nach Vorlage des Buches "Purebasic - A Beginner's Guide" ein Programm erstellt wie folgt:
Enumeration
#WINDOW_ROOT
#SOUND_FILE
#TEXT_FILE
#BUTTON_CHOOSE_FILE
#TEXT_VOLUME
#TRACKBAR_VOLUME
#TEXT_PAN
#TRACKBAR_PAN
#BUTTON_PLAY_FILE
#BUTTON_PAUSE_FILE
#BUTTON_STOP_FILE
EndEnumeration
Global FileName.s = ""
Global FilePaused.b = #False
#FLAGS = #PB_Window_SystemMenu | #PB_Window_ScreenCentered
If OpenWindow(#WINDOW_ROOT, 0, 0, 500, 215, "Roland's MP3-Player", #FLAGS)
If CreateGadgetList(WindowID(#WINDOW_ROOT))
TextGadget(#TEXT_FILE, 10, 10, 480, 20, "", #PB_Text_Border)
ButtonGadget(#BUTTON_CHOOSE_FILE, 10, 40, 150, 20, "Choose a MP3 File ...")
TextGadget(#TEXT_VOLUME, 10, 70, 480, 20, "Volume")
TrackBarGadget(#TRACKBAR_VOLUME, 10, 90, 480, 20, 0,100)
SetGadgetState(#TRACKBAR_VOLUME, 100)
TextGadget(#TEXT_PAN, 10, 120, 480, 20, "Pan")
TrackBarGadget(#TRACKBAR_PAN, 10, 140, 480, 20, 0, 200)
SetGadgetState(#TRACKBAR_PAN, 100)
ButtonGadget(#BUTTON_PLAY_FILE, 10, 180, 100, 20, "Play")
ButtonGadget(#BUTTON_PAUSE_FILE, 130, 180, 100, 20, "Pause")
ButtonGadget(#BUTTON_STOP_FILE, 250, 180, 100, 20, "Stop")
[.....]
Habe den Quellcode dann mit PB4.30 kompiliert; das Ganze funktioniert zwar, aber es ist auch die Meldung dahergekomen, dass es sich bei 'CreateGadgetList()' um einen veralteten Befehl handeln würde.
Da ich ein kompletter Neuling bin, bitte ich um Beantwortung der folgenden Fragen:
1) Kommt es häufig vor, dass ein Befehl ersetzt/ausgetauscht/eliminiert wird? Wie lange wird so ein veralteter Befehl noch unterstützt?
2) Wie lautet der korrekte Ersatz für CreateGadgetList()?
Vielen Dank!
Roland.
Habe nach Vorlage des Buches "Purebasic - A Beginner's Guide" ein Programm erstellt wie folgt:
Enumeration
#WINDOW_ROOT
#SOUND_FILE
#TEXT_FILE
#BUTTON_CHOOSE_FILE
#TEXT_VOLUME
#TRACKBAR_VOLUME
#TEXT_PAN
#TRACKBAR_PAN
#BUTTON_PLAY_FILE
#BUTTON_PAUSE_FILE
#BUTTON_STOP_FILE
EndEnumeration
Global FileName.s = ""
Global FilePaused.b = #False
#FLAGS = #PB_Window_SystemMenu | #PB_Window_ScreenCentered
If OpenWindow(#WINDOW_ROOT, 0, 0, 500, 215, "Roland's MP3-Player", #FLAGS)
If CreateGadgetList(WindowID(#WINDOW_ROOT))
TextGadget(#TEXT_FILE, 10, 10, 480, 20, "", #PB_Text_Border)
ButtonGadget(#BUTTON_CHOOSE_FILE, 10, 40, 150, 20, "Choose a MP3 File ...")
TextGadget(#TEXT_VOLUME, 10, 70, 480, 20, "Volume")
TrackBarGadget(#TRACKBAR_VOLUME, 10, 90, 480, 20, 0,100)
SetGadgetState(#TRACKBAR_VOLUME, 100)
TextGadget(#TEXT_PAN, 10, 120, 480, 20, "Pan")
TrackBarGadget(#TRACKBAR_PAN, 10, 140, 480, 20, 0, 200)
SetGadgetState(#TRACKBAR_PAN, 100)
ButtonGadget(#BUTTON_PLAY_FILE, 10, 180, 100, 20, "Play")
ButtonGadget(#BUTTON_PAUSE_FILE, 130, 180, 100, 20, "Pause")
ButtonGadget(#BUTTON_STOP_FILE, 250, 180, 100, 20, "Stop")
[.....]
Habe den Quellcode dann mit PB4.30 kompiliert; das Ganze funktioniert zwar, aber es ist auch die Meldung dahergekomen, dass es sich bei 'CreateGadgetList()' um einen veralteten Befehl handeln würde.
Da ich ein kompletter Neuling bin, bitte ich um Beantwortung der folgenden Fragen:
1) Kommt es häufig vor, dass ein Befehl ersetzt/ausgetauscht/eliminiert wird? Wie lange wird so ein veralteter Befehl noch unterstützt?
2) Wie lautet der korrekte Ersatz für CreateGadgetList()?
Vielen Dank!
Roland.