Liebe Testkollegen, ich habe ein kleines Skript angefügt um die Funktionsweise von
1. Die Nutzung der gebundenen Variable in einem Listenelement
2. den Platzhalter cx.System.WMIAbfrage() in diesem Beispiel werden die installierten Drucker angezeigt.
3. Sowie die gebundene Variable 'ergebnis' die uns dann die Zeilennummer für
4. die Meldung [cX.Anzeige(hauptfenster).Liste(Liste_1).Zeile(ergebnis)] liefert.
zu demonstrieren.
cX4Web Code
Was ist das?
1 *** WMI_Abfrage der installierten Drucker
2
3 Anzeige-Fenster 'WMI-Abfragen', ID='hauptfenster'
4 *** Hier wird im Listenelement eine gebundene Variable definiert, die dann einen Wert aufnimmt (in diesem Fall die markierte Zeilennummer).
5 Liste '¶', erst löschen (ID='Liste_1', Bindung [ergebnis], X='3,44', Y='11,91', Breite='121,44', Höhe='80,17', Zielfenster='hauptfenster', gebunden an [ergebnis])
6 Setze in [cX.Anzeige(hauptfenster).Liste(Liste_1).Liste]: '[cX.System.WMIAbfrage(SELECT * FROM CIM_Printer)]' , Trenner '=', rechts davon
7 Button 'Beenden' (ID='Button_1', Y='96,84', Zielfenster='hauptfenster')
8 Warte Endlos (Warten auf zu behandelnde Ereignisse)
9
10 :: Anzeige(hauptfenster)_Element(Liste_1)_Klick (keine rekursiven Aufrufe)
11 *** Hier dient die gebundene Variable als Lieferant der ausgewählten Zeile (Nummer) in der Liste und zeigt den ausgewählten Drucker an.
12 Meldung 'Drucker ausgewählt:[cX.Anzeige(hauptfenster).Liste(Liste_1).Zeile(ergebnis)]', Titel 'Ausgewählter Drucker', Buttons 'Nur OK', Symbol 'Information'
13 Beende Unterprogramm (Zurück)
14
15 :: Anzeige(hauptfenster)_Element(Button_1)_Klick
16 Beende Skript
cX4Web Code: Einfach anklicken zum Kopieren und in click.EXE 5.0 einfügen
(16 Zeilen, cX 5.0.8.2)
Wie immer vorbehaltlich Volltestmodus, zum experimentieren und zur freien Verwendung.
Ach ja für WMI Abfragen kann man sich den
WMI Explorer
herunterladen und dann mit diesem Skript verschiede Abfragen durchtesten.
@Stefan
Lieber Stefan, eine gebundene Variable ist aber im Variableninspektor nicht sichtbar? Oder täusche ich mich da?
lg Christian