Seite 1 von 1

Textgadget mit Border im Flatstyle

Verfasst: 26.02.2005 09:51
von Kiffi

Code: Alles auswählen

If OpenWindow(0, 333, 70, 145, 105,  #PB_Window_SystemMenu | #PB_Window_ScreenCentered | #PB_Window_TitleBar , "FlatTextGadget")
  If CreateGadgetList(WindowID())
    TextGadget(1, 8,  8, 128, 20, "Flat",     #PB_Text_Center | #PB_Text_Border)
    TextGadget(2, 8, 40, 128, 20, "Flatter",  #PB_Text_Center | #SS_Sunken)
    TextGadget(3, 8, 72, 128, 20, "Flattest", #PB_Text_Center | #WS_BORDER)
    Repeat
    Until WaitWindowEvent()=#PB_Event_CloseWindow
  EndIf
EndIf
Danke an alle, die mir bei diesem Code geholfen haben!

// Edit: Code für PB4

Code: Alles auswählen

If OpenWindow(0, 333, 70, 145, 105, "FlatTextGadget", #PB_Window_SystemMenu | #PB_Window_ScreenCentered | #PB_Window_TitleBar)
  If CreateGadgetList(WindowID(0))
    TextGadget(1, 8,  8, 128, 20, "Flat",     #PB_Text_Center | #PB_Text_Border)
    TextGadget(2, 8, 40, 128, 20, "Flatter",  #PB_Text_Center | #SS_SUNKEN)
    TextGadget(3, 8, 72, 128, 20, "Flattest", #PB_Text_Center | #WS_BORDER)
    Repeat
    Until WaitWindowEvent()=#PB_Event_CloseWindow
  EndIf
EndIf 

Verfasst: 26.02.2005 14:32
von glubschi90
Constant not found: #SS_Sunken

Verfasst: 26.02.2005 14:39
von DarkDragon
glubschi90 hat geschrieben:Constant not found: #SS_Sunken
Hier funzt alles mit der PB3.93b2

Verfasst: 26.02.2005 15:01
von Team100
#SS_Sunken = 4096 ....... bis inkl. PB3.91 offenbar nicht vordefiniert.

Der Code läuft aber auch unter 3.91 (mit manueller Definition von #SS_Sunken)


Cu von Team100