Seite 1 von 1

String Gadget-Übernahme des Geschriebenen

Verfasst: 08.04.2007 23:46
von Pandorra
hallo,
ich hab eine kleine Frage.
Nach längerem Probieren finde ich keine möglichkeit dies hier

Code: Alles auswählen

  Global Profil.s, Passwort.s
  
  If OpenWindow(0, 0, 0, 402, 120, "StringGadget Flags", #PB_Window_SystemMenu | #PB_Window_ScreenCentered) And CreateGadgetList(WindowID(0))
    TextGadget(0, 10,  12, 100, 20, "Benutzername:")
    TextGadget(1, 10,  52, 100, 20, "Passwort:")
    StringGadget(2, 88,  10, 306, 20, Profil)
    StringGadget(3, 88, 50, 306, 20, Passwort, #PB_String_Password)
    ButtonGadget(4, 156, 80, 90, 30, "OK")
    Repeat : Until WaitWindowEvent() = #PB_Event_CloseWindow
  EndIf
als ersatz für

Code: Alles auswählen

Global Profil.s, Passwort.s
Profil.s =  InputRequester("Spieler","Bitte geben sie Ihren Profilnamen an:","")
Passwort.s =  InputRequester("Spieler","Bitte geben sie Passwort an:","")

Zu nehmen. Wenn man zum beispiel auf OK drückt das er dann das was im String (Passwort/Benutzername) geschrieben wurde so zu übernehmen das ich zum beispiel Später dies machen kann:

Code: Alles auswählen

Debug Profil
Und dies mir dann im Debug das geschriebene Anzeigt.
Gibt es da einen spezielen Code oder sowas.
Benötige dringend hilfe.
(Das Fenster zu schließen indem man auf OK drückt ist kein Problem( Ich kann mit Select umgehen wollte ich nur kurz erwähnen bevor jemand versucht es mir mit unötig (viel) Schreibarbeit zu erklären))

Verfasst: 08.04.2007 23:57
von ts-soft

Code: Alles auswählen

Global Profil.s, Passwort.s

If OpenWindow(0, 0, 0, 402, 120, "StringGadget Flags", #PB_Window_SystemMenu | #PB_Window_ScreenCentered) And CreateGadgetList(WindowID(0))
  TextGadget(0, 10,  12, 100, 20, "Benutzername:")
  TextGadget(1, 10,  52, 100, 20, "Passwort:")
  StringGadget(2, 88,  10, 306, 20, Profil)
  StringGadget(3, 88, 50, 306, 20, Passwort, #PB_String_Password)
  ButtonGadget(4, 156, 80, 90, 30, "OK")
  Repeat
    Select WaitWindowEvent()
      Case #PB_Event_CloseWindow
        Break
      Case #PB_Event_Gadget
        Select EventGadget()
          Case 4 ; Okay gedrück
            Debug "Benutzername: " + GetGadgetText(2) ; StringGadget Profil
            Debug "Passwort: " + GetGadgetText(3) ; StringGadget Passwort
        EndSelect
    EndSelect
  ForEver
EndIf
So, und bevor weitere Fragen kommen, bitte die Beispiele in der Hilfe,
sowie entsprechende Tutorials auf PureArea.net durcharbeiten, weil so
wird das dieses Jahr nichts mehr :wink:

Verfasst: 09.04.2007 00:04
von Pandorra
thx.
schon klar