Entscheidungen treffen

[Christian18]

Hallo,

ich habe auf meiner Form eine ComboBox. In dieser sind sehr viele einträge vorhanden. Jeder Eintrag öffnet eine Form. (soll eine form öffnen)

Das wollte ich mir case machen kann ich das oder was nimmt man am besten??? (Also Entscheidungen treffen)

[Christian Seehase]

Moin Christian,

Du kannst jedem Item in der ComboBox noch einen Zahlenwert mitgeben, da Du die Items auch mit AddObject hinzufügen kannst (als Objekt wird dann einfach TObject(Welcher32BitWertAuchImmer)) genommen.
Anschliessend kannst Du mit

Delphi-Quellcode:

case ComboBox1.Objects[IndexDesJeweilsAusgwähltenItems] of
  //...
end;

das entsprechende Formular auswählen.

Andere Variante:
Die Formulare werden in einem Array gespeichert, wobei der jeweilige Index mit dem Objekt des ComboBox.Items korrespondiert.

[CalganX]

Hi,
nimm Case und frage die Eigenschaft ItemIndex ab, oder nimm die Strings. Dazu brauchst du aber [cl="Case strings"]eine spezielle Funktion[/cl].

Chris

[Muetze1]

Moin!

Oder füge die Forms gleich als Instanz mit dem AddObject hinzu zu der ComboBox, dann brauchst du kein Case sondern zeigst die Form einfach an.

Delphi-Quellcode:

if ( ComboBox1.ItemIndex > -1 ) Then
  TForm(ComboBox1.Items.Objects[ComboBox1.ItemIndex]).Show;

MfG
Muetze1

[Matze]

Öhm, wollt nur mal sagen, dass es besser wäre, wenn du, Christian18, den Titel ändern könntest.

Bei so einem Problem kommt keiner auf die Idde, nach Entscheidungen treffen zu suchen.