Seite 1 von 1

Schrift verschwindet

Verfasst: 09.02.2005 13:00
von sobi
Hallo,

mit

Code: Alles auswählen

DrawText(#Text12)
habe ich einen Text auf mein Fenster geschrieben. Wenn das Fenster jedoch in der größe geändert wird und der Text nicht mehr genügend Platz hat, verschwindet der Text! Wie ändere ich das?
Der Beginn wurde so definiert:

Code: Alles auswählen

StartDrawing(WindowOutput())
Ist das in Ordnung?


Liebe Grüße,


Simon

Verfasst: 09.02.2005 13:36
von ts-soft
bei jedem #PB_Event_SizeWindow den text neuzeichnen oder in ein ImageGadget anzeigen. findes du beispiele in der hilfe

Verfasst: 09.02.2005 14:01
von sobi
ts-soft hat geschrieben:bei jedem #PB_Event_SizeWindow den text neuzeichnen oder in ein ImageGadget anzeigen. findes du beispiele in der hilfe
Vielen Dank für deinen Tipp, jetzt funktioniert es so, wie es funktionieren soll! :)

Verfasst: 09.02.2005 16:24
von sobi
Hallo,

das #PB_Event_SizeWindow habe ich so eingebaut:

Code: Alles auswählen

Repeat 
Event = WindowEvent()
If Event =#PB_Event_SizeWindow
uebersicht()
Else
Delay(10)
EndIf 
Until Event = #PB_Event_CloseWindow
Das funktioniert zwar, ber wenn ich jetzt einen anderen Menüpunkt anklicke, dann öffnet er den nicht! Wie muss das richtig geändern werden?
Liebe Grüße,


Simon

Verfasst: 09.02.2005 17:14
von ts-soft

Code: Alles auswählen

Repeat
  Event = WaitWindowEvent()
  Select Event
    Case #PB_Event_SizeWindow
      uebersicht()
    Case #PB_Event_Menu
      Select EventMenuID() 
        Case 1 : Debug "Menü-Eintrag 1 angeklickt!" 
        Case 2 : Debug "Menü-Eintrag 2 angeklickt!" 
        Case 3 : Debug "Menü-Eintrag 3 angeklickt!" 
      EndSelect 
    Case #PB_Event_Gadget 
      Select EventGadgetID() 
        Case 1 : Debug "Schalter 1 angeklickt!" 
        Case 2 : Debug "Schalter 2 angeklickt!" 
        Case 3 : Debug "Schalter 3 angeklickt!" 
      EndSelect 
  EndSelect
Until Event = #PB_Event_CloseWindow 
Findest Du alles auch in der Hilfe von PB
Wenn Du Deinen Text in ein ImageGadget zeichnest, wird es automatisch neugezeichnet. Findest Du auch in der Hilfe

Verfasst: 09.02.2005 18:43
von Lars
Ehem. . . [c]#PB_Event_Repaint[/c]

Verfasst: 10.02.2005 00:11
von sobi
Lars hat geschrieben:Ehem. . . [c]#PB_Event_Repaint[/c]
Hallo,

Danke für den Tipp, aber wo kommt das #PB_Event_Repaint rein? - Den so richtig funktioniert es noch nicht! :-(

Code: Alles auswählen

Repeat 
  Event = WaitWindowEvent() 
  Select Event 
    Case #PB_Event_SizeWindow    
;uebersicht()           
    Case #PB_Event_Menu 
      Select EventMenuID() 
            Case 31 
              uebersicht()         
            Case 32 
              neu()             
            Case 19 
              Quit=1 
          EndSelect 
      EndSelect      
  Until Quit=1 
Lasse ich die uebersicht() das erste mal drin, dann zeigt er mir diese sofort an und wenn ich sie ändere, dann wird sie auch neu gezeichnet. Schmeiß ich sie raus, dann zeichnet er sie nicht neu (zeigt sie aber auch nicht gleich beim aufrufen an. Ich brauche beides. (neu zeichnen und nicht gleich anzeigen) - Nur, wie komm ich dahin?

LG


Simon