| |
| |
|
Nico
Madysa | XProfan10 brigt mich zur Zeit völlig zum Verzweifeln.
Eine kurze Schilderung meines Problems:
Ich habe auf meinem Fenster eine GroupBox in der eine ListBox ist. Die GroupBox habe ich, damit besser aussieht und ich will auch nicht auf sie verzichten. Nur die ListBox macht mir Sorgen.
Nehme ich nähmlich %hWnd als das ihr übergeordnete Fenster, so wird sie von der GroupBox überdeckt, was wirklich nicht gut aussieht.
Nehme ich dagegen, wie mir bereits empfohlen, die GroupBox als übergeordnetes Fenster, scheint alles zu klappen. Allerdings ist mir aufgefallen, dass ein Klick in die ListBox nun plötzlich kein waitinput mehr abbricht.
Und das Problem ist, dass ich zwei Buttons habe, die, wenn die ListBox gefüllt ist, aktiviert werden sollen (Sie sind vorher mit EnableWindow ausgeschalten).
So, und das ist einfach doof, wenn ein Klick ins Leere die Buttons aktiviert, ich mich auf der ListBox dagegen dumm und dämlich klicken kann.
Ich glaube, da muss Roland die Sache noch etwas überarbeiten.
Hier ist ein kleiner Beispielcode:
KompilierenMarkierenSeparierendeclare gb1& , gb2& , lb1& , lb2& , b1& , b2&
Window 100 , 100 - 300 , 200
gb1& = Create("GroupBox",%hWnd,"%hWnd als Parent" , 5,5,130,150)
gb2& = Create("GroupBox",%hWnd,"GroupBox als Parent",150,5,130,150)
lb1& = Create("ListBox",%hWnd,0,10,20,120,120)
lb2& = Create("ListBox",gb2&,0,5,20,120,120)
b1& = Create("Button",%hWnd,"Activated by ListBox", 5,160,100,25)
b1& = Create("Button",%hWnd,"Activated by ListBox",150,160,100,25)
EnableWindow b1& , 0
EnableWindow b2& , 0
whilenot %Key = 2
waitinput
if Clicked(lb1&)
EnableWindow b1& , 1
endif
if Clicked(lb2&)
EnableWindow b2& , 1
endif
wend
end
So, ich hoffe, dass dieser eilig zusammengeschriebene Beispielcode genauso funktioniert, wie mein Programm. |
|
| |
| |
| |
|
|
Michael
Wodrich | Wirklich seltsam das Ganze.
Bei den GroupBoxen habe ich mal die Reihenfolge gesetzt, wie es für die RadioButtons gehört - aber da tut sich auch nichts (dabei habe ich aber Fehler entdeckt).
Der Code sollte vorher nochmal getestet werden - dafür ist der Interpreter ja sehr praktisch.
Hier korrigiert:
KompilierenMarkierenSeparierenDeclare Gb1& , Gb2& , Lb1& , Lb2& , B1& , B2&
Window 100 , 100 - 320 , 300
Gb1& = Create("GroupBox",%Hwnd,"%hWnd als Parent" , 5,5,130,150)
Lb1& = Create("ListBox",%Hwnd,0,10,20,100,100)
B1& = Create("Button",%Hwnd,"Act. by L1", 5,160,100,25)
Gb2& = Create("GroupBox",%Hwnd,"GroupBox als Parent",150,5,130,150)
Lb2& = Create("ListBox",Gb2&,0,5,20,100,100)
B2& = Create("Button",%Hwnd,"Act. by L2",150,160,100,25)
Enablewindow B1& , 0
Enablewindow B2& , 0
Whilenot %Key = 2
Waitinput
If Clicked(Lb1&)
Enablewindow B1& , 1
Endif
If Clicked(Lb2&)
Enablewindow B2& , 1
Endif
Wend
End
Und: Nämlich schreibt man neuerdings tatsächlich mit h ??!?
Früher hatten wir dafür einen sehr einfachen Merksatz:
Wer nämlich mit h schreibt...
Schöne Grüße
Michael Wodrich |
|
| |
| Programmieren, das spannendste Detektivspiel der Welt. | 27.06.2006 ▲ |
|
| |
|
|
RGH | [quote:f232fd7877=Nico Madysa]So, ich hoffe, dass dieser eilig zusammengeschriebene Beispielcode genauso funktioniert, wie mein Programm.[/quote:f232fd7877]
Hier ist nicht Hoffnung angesagt, sondern ausprobieren vor dem Posten! 
Gruß
Roland |
|
| |
| Intel Duo E8400 3,0 GHz / 4 GB RAM / 1000 GB HDD - ATI Radeon HD 4770 512 MB - Windows 7 Home Premium 32Bit - XProfan X4 | 27.06.2006 ▲ |
|
| |
|
|
Michael
Wodrich | Aber wie setzt man das Ganze jetzt in Funktion. Es sollte doch eigentlich nicht sein, daß eine GroupBox andere Elemente verdeckt (die sollte immer ganz unten in der Hierarchie stehen).
Schöne Grüße
Michael Wodrich |
|
| |
| Programmieren, das spannendste Detektivspiel der Welt. | 27.06.2006 ▲ |
|
| |
|
|
RGH | [quote:d0195f82f8=Nico Madysa]XProfan10 brigt mich zur Zeit völlig zum Verzweifeln.
Eine kurze Schilderung meines Problems: ...[/quote:d0195f82f8]
Taucht das Problem erst mit XProfan 10 auf? War es mit XProfan 9 noch anders?
Gruß
Roland |
|
| |
| Intel Duo E8400 3,0 GHz / 4 GB RAM / 1000 GB HDD - ATI Radeon HD 4770 512 MB - Windows 7 Home Premium 32Bit - XProfan X4 | 27.06.2006 ▲ |
|
| |
|
|
Michael
Wodrich | 
Da wird plötzlich Falscher Parametertyp ausgegeben. Tja, da ist wohl ein Parameter zu viel...
Schöne Grüße
Michael Wodrich
Warum erkennt XProfan 10 das nicht? |
|
| |
| Programmieren, das spannendste Detektivspiel der Welt. | 27.06.2006 ▲ |
|
| |
|
|
Michael
Wodrich | Arrrg, es geht hier um den String, der ab v10 eine Zahl sein darf...
Macht man einen String draus, dann funktioniert die erste Variante korrekt und die 2. Listbox reagiert nicht auf ein WaitInput. (v9)
Das hängt also tatsächlich mit dem Style zusammen, den Du wohl hierfür geändert hast...
[quote:b4549e625f]Listboxen (Syntaxänderung ab der 7. Subscriptionslieferung / 03.05.2006)
Ab der 7. Subscriptionslieferung erhält der bisher ungenutzte Parameter nach dem Handle eine Bedeutung. (Bisher mußte es ein Leerstring sein.) Der Parameter ist nun numerisch und gibt den Stil der Listbox an. 1 = sortiert, 2 = Mehrfachauswahl, 3 = beides. Ein Leerstring älterer Quellcodes wird als 0 gewertet, so dass diese wie bisher funktionieren. Die SortedListbox ist nun nicht mehr notwendig, bleibt aber aus Kompatibilitätsgründen in der bislang gültigen Fassung erhalten.[/quote:b4549e625f]
Schöne Grüße
Michael Wodrich |
|
| |
| Programmieren, das spannendste Detektivspiel der Welt. | 27.06.2006 ▲ |
|
| |
|
|
RGH | Jetzt gehts (zumindest bei mir) wieder wie früher.
Es hing zwar mit einem, gesetzten Style zusammen, aber nicht mit den Änderungen für XProfan 10.
Gruß
Roland |
|
| |
| Intel Duo E8400 3,0 GHz / 4 GB RAM / 1000 GB HDD - ATI Radeon HD 4770 512 MB - Windows 7 Home Premium 32Bit - XProfan X4 | 27.06.2006 ▲ |
|
| |
|
|
Nico
Madysa | Suppi  , heißt das, dass ich in der 14. Subscription-Lieferung auf eine Korrektur hoffen darf?
Ich hatte das Programm, das dem Mini-Code vorausging mit XProfan9 geschrieben, da tauchte das Problem nicht auf. |
|
| |
| |
| |
|
(448)
Deutsch
English
Français
Español
Italia