---

Hallo,

wie der Titel schon sagt, versuche ich in einer ComboBox einzelne Einträge zu deaktivieren. Nun bin ich mir aber gar nicht sicher, ob das überhaupt geht, bzw. in welchem Programm ich so etwas überhaupt schon einmal gesehen habe.
Mit:

Code:

---

CB_Format.ListIndex [0].endable = False

---

wird das nichts.
Wie gesagt, ich möchte nicht die ganze ComboBox deaktivieren, sondern nur einzelne Einträge, deren Namen und ListIndex ich kenne.

Hat jemand evtl. eine Idee?

Gruß
SKYSURFER

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo

Ist mir nicht bekannt, daß einzelne Einträge deaktiviert werden können. Wo holst du denn die Einträge für die Liste her oder sind die direkt fest in die ComboBox eingetragen? Wenn sich die Einträge nicht dauernd ändern, könnte man sie im Quellcode fix hinterlegen und anhand definierter Prüfbedingungen zur Laufzeit zur ComboBox hinzufügen (ComboBox.AddItem) oder eben nicht, wenn die Form aufgerufen wird.

------------------
MfG
RK

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo,

das hatte ich mir schon gedacht.

Nun aber erstmal etwas mehr Infos:
Ich bastle gerade an ein einem Druckdialog. Ja, ist schon klar, gab es hier schon 1000 mal. Aber halt nicht so wie ich es wollte.
Und ich möchte über die ComboBox das Blattformat auswählen. Deshalb habe ich in der ComboBox diese Werte:

Code:

---

    'Druckformate
    CB_Format.AddItem "DIN A0", 0
    CB_Format.AddItem "DIN A1", 1
    CB_Format.AddItem "DIN A2", 2
    CB_Format.AddItem "DIN A3", 3
    CB_Format.AddItem "DIN A4", 4

---

Nun, wenn ich aber einen Kopierer der von DIN A4 bis DIN A3 geht macht es wenig Sinn die Formate DIN A0 bis DIN A2 in der Box zu haben und zur Auswahl zu stellen.

Nachdem ich mit dem ListIndex nicht bei 3 beginnen kann, muss ich die Werte in der Box anders sortieren. Aber das sollte nicht das Problem sein. D.h. meine Box sieht so aus:

Code:

---

    'Druckformate
   
CB_Format.AddItem "DIN A4", 0
CB_Format.AddItem "DIN A3", 1
CB_Format.AddItem "DIN A2", 2
CB_Format.AddItem "DIN A1", 3
CB_Format.AddItem "DIN A0", 4
   

---

Gruß
SKYSURFER

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo

Wie wäre es denn, wenn du mir einer "case select"-Anweisung arbeitest? Das würde im Prinzip so aussehen:

Code:

---

Select Case sDruckermodell
            Case "A4-Drucker"
                  CB_Format.AddItem "DIN A4", 0
            Case "A3-Drucker"
                  CB_Format.AddItem "DIN A4", 0
                  CB_Format.AddItem "DIN A3", 1
            Case "A0-Plotter"
                  CB_Format.AddItem "DIN A4", 0
                  CB_Format.AddItem "DIN A3", 1
                  CB_Format.AddItem "DIN A2", 2
                  CB_Format.AddItem "DIN A1", 3
                  CB_Format.AddItem "DIN A0", 4

---

Die ComboBox "Blattformate" ist zu Beginn deaktiviert, bis ein Drucker ausgewäht wurde. Die ComboBox "Druckermodell" kann über SelectedIndexChanged das Aktivieren und Befüllen der ComboBox "Blattformate" anstoßen. Du hast so immer nur die Blattformate zur Auswahl die der Drucker unterstützt. Man könnte das Ganze noch aufbohren und über die Druckereinstellungen die möglichen Blattformate abfragen, aber in einer Umgebung mit nicht ständig wechselnden Druckern für meinen Geschmack übertrieben.

------------------
MfG
RK

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Danke für den Tipp,

Ich habe es jetzt so gemacht, dass ich die ComboBox leere und dann so fülle, wie ich es brauche.
Das ging am schnellsten und ist zweckmäßig.

Nun habe ich aber noch ein Problem mit dem Druckformat und dem PDFCreator.
Bei mir Daheim funktioniert es, dass die richtige Blattgröße und die richtige Seitenaurichtung übergeben wird.
Auf der Arbeit wird bei dem Format DIN A1 und DIN A0 die Seitenaurichtung automatisch auf Hochformat gestellt, obwohl ich
Querformat übergebe.

Hier auf der Arbeit habe ich Version 0.9.7, Daheim 0.9.8. Gibt es da eine Einstellmöglichkeit oder ist das ein Bug?

Gruß
SKYSURFER

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP