Hallo,
Ich bräuchte für jemand, der sehbehindert ist, größere Dialogelemente mit einem auch größeren Font.
Soweit, so gut.
Button + Listbox funktioniert soweit auch. Aber warum funktioniert das nicht mit einer Gridbox ?
Gerade die bräuchte ich am nötigsten.
Code
Declare Handle grid, btn1
Declare Long ende
ende = 0
WindowTitle "H A U S - V E R W A L T U N G"
Window 1000, 800
UseFont "Arial", 24, 16, 1, 0, 0
SetDialogFont 1
btn1 = Create("Button", %HWnd, "Ende", 10, 10, 100, 50)
'grid = Create("GridBox", %HWnd, "Mieter;0;200;Ausgaben;0;180;Einnahmen;0;240", 0, 10, 100, 600, 400)
grid = Create("Listbox", %HWnd, 0, 10, 100, 600, 400)
AddString(grid, "Maier|100|200")
AddString(grid, "Müller|150|80")
WhileNot ende
WaitInput
Case Clicked(btn1) : ende = 1
EndWhile
Alles anzeigen
Beim TreeView klappt es gottseidank auch.
Werde es noch mit TabControl versuchen.