[GUI] : SetGadgetText auf Fenster anwenden [erledigt]

Übersicht BlitzMax, BlitzMax NG Beginners-Corner

Neue Antwort erstellen

d-bug

Betreff: [GUI] : SetGadgetText auf Fenster anwenden [erledigt]

BeitragSo, Nov 20, 2005 14:33
Antworten mit Zitat
Benutzer-Profile anzeigen
Wenn ich SetGadgetText auf ein Fenster Anwende sollte sich ja eigentlich der Titeltext ändern. Irgendwie scheint er das aber nicht tun zu wollen.

In der Hilfe steht :
Zitat:
For a Window gadget, SetGadgetText causes the Window to be renamed.
For the Label, Button, TextField and TextArea gadgets, the contents of the gadget are replaced with the new Text.


...also machte ich daraus folgendes Test-Proggy:
Code: [AUSKLAPPEN]
test:TGadget = CreateWindow ("TestFenster",0,0,640,480)

Repeat

   Select WaitEvent()
      Case EVENT_WINDOWCLOSE
         End
   End Select

   If KeyHit (KEY_F12)
      SetGadgetText (test,"Test Test Test")
   EndIf

Forever

Funktioniert aber leider nicht Sad

Irgendetwas scheine ich da wohl falsch zu machen. Aber was ?
  • Zuletzt bearbeitet von d-bug am Sa, Nov 26, 2005 15:13, insgesamt 2-mal bearbeitet

Artemis

BeitragSo, Nov 20, 2005 14:47
Antworten mit Zitat
Benutzer-Profile anzeigen
keydown und keyhit usw. funktionieren wie schon in B+ nur im grafikfenster.

wenn du folgenden code testest siehst dus:
Code: [AUSKLAPPEN]
test:TGadget = CreateWindow ("TestFenster",0,0,640,480)

Repeat

   Select WaitEvent()
      Case EVENT_WINDOWCLOSE
         End
   End Select

   If KeyHit (KEY_F12)
      Notify("as")
      SetGadgetText (test,"Test Test Test")
   EndIf

Forever

wenn du das so machst, siehst du das alles klappt:
Code: [AUSKLAPPEN]
test:TGadget = CreateWindow ("TestFenster",0,0,640,480)
SetGadgetText (test,"Test Test Test")
Repeat

   Select WaitEvent()
      Case EVENT_WINDOWCLOSE
         End
   End Select
Forever
 

gamble

BeitragSo, Nov 20, 2005 14:49
Antworten mit Zitat
Benutzer-Profile anzeigen
SetGadgetText funktioniert, Deine If-Abfrage greift aber nicht Wink

MVB

BeitragSo, Nov 20, 2005 14:51
Antworten mit Zitat
Benutzer-Profile anzeigen
blub
Code: [AUSKLAPPEN]
test:TGadget = CreateWindow ("TestFenster",0,0,640,480)
button:TGadget =CreateButton("Umbennenen",10,10,100,22,test)

While WaitEvent()
   Select EventID()
      Case EVENT_GADGETACTION
          SetGadgetText (test,"Test Test Test")
   
      Case EVENT_WINDOWCLOSE
         End
   End Select
Wend
Smile
aquamonit.de|BlitzMax|MaxGUI

d-bug

BeitragSo, Nov 20, 2005 15:05
Antworten mit Zitat
Benutzer-Profile anzeigen
volldepp der ich bin !!!! Sad

danke an alle

Hummelpups

BeitragSo, Nov 20, 2005 15:16
Antworten mit Zitat
Benutzer-Profile anzeigen
hehe, schaffst das schon, mit dem Sprung in die unendlich
große und absolut geile Welt von BMax mit 100% Wissen über
jeden Befehl. *träum, ich will auch*

Hast du nie mit BPlus etwas gemacht? da war es doch auch schon
so oder nicht?

IMurDOOM
blucode - webdesign - Ressource - NetzwerkSim
BlitzBasic 2D - BlitzMax - MaxGUI - Monkey - BlitzPlus

d-bug

BeitragSo, Nov 20, 2005 15:36
Antworten mit Zitat
Benutzer-Profile anzeigen
nein, habe ich nicht. Smile

Hab nur BB3D besessen und 100% an XUI rumgefummelt. Deswegen muß ich mich erstmal umgewöhnen, denn der Event-Handler von XUI funktionierte etwas anders. Wink

greetz

Neue Antwort erstellen


Übersicht BlitzMax, BlitzMax NG Beginners-Corner

Gehe zu:

Powered by phpBB © 2001 - 2006, phpBB Group