Combobox

[snears]

Einen wünderschönen Sonntag,

ich habe mal wieder eine Frage und zwar habe ich ein Projekt laufen das mir meine Abiturnote berechnet.
Nur leider komme ich nicht mehr weiter, mein Problem ist folgendes, ich habe mir comboxen erstellt in denen ich mein fach auswählen kann
und in der nächsten combobox meine punktzahl die ich erreicht habe.

Nun würde ich gerne wissen, da es sehr viele comboxen sind und ich keine lust habe meine punkte im edit feld einzufügen, wie delphi
die zahl die man ausgewählt in der combobox und die dann einem wert zugefügt wird.


Also meinetwegen ich habe in deutsch 10 Punkte, dann soll delphi sagen

combobox1 = 10
10= x ( um mit dem x noch weitere berechnungen zu machen)

Hoffe ihr versteht was ich meine.


Vielen Dank schon mal im vorraus und frohe Ostern

[DeddyH]

Sry, aber zumindest ich persönlich hab das noch nicht ganz verstanden

[himitsu]

Du kannst eine ComboBox genauso auslesen, wie ein Edit > .Text
oder man nimmt den .ItemIndex

[mkinzler]

Genauer gesagt
ComboBox.Items[ComboBox.ItemIndex]

[himitsu]

Wenn man weiß, daß nur Zahlen in .Items vorkommen und diese auch noch sortiert sind, dann kann man auch direkt mit .ItemIndex rechnen.

[Matze]

Wenn Text Zahlen zugeordnet werden soll (bsp. sehr gut => 1), dann könnte man auch Text mit "sehr gut" festlegen und der Eigenschaft "Tag" die 1 zuweisen und mit Tag direkt rechnen.

[himitsu]

Tag?

Es gibt doch nur ein .Tag pro ComboBox.
Meinst du nicht eher ComboBox1.Items.Objects ?

[add]

Zitat von DeddyH:

Schlimmstenfalls käme noch eine case-Abfrage in Betracht.

Delphi-Quellcode:

case ComboBox.ItemIndex of
  0: Note := 1;
  1: Note := 2;
  ...
end;

Note := ComboBox.ItemIndex + 1;

[DeddyH]

Schlimmstenfalls käme noch eine case-Abfrage in Betracht.

Delphi-Quellcode:

case ComboBox.ItemIndex of
  0: Note := 1;
  1: Note := 2;
  ...
end;

[Matze]

Zitat von himitsu:

Meinst du nicht eher ComboBox1.Items.Objects ?

ja, verwechselt. Dann geht's doch nicht ganz so einfach.

[DeddyH]

Zitat von himitsu:

[add]

Zitat von DeddyH:

Schlimmstenfalls käme noch eine case-Abfrage in Betracht.

Delphi-Quellcode:

case ComboBox.ItemIndex of
  0: Note := 1;
  1: Note := 2;
  ...
end;

Note := ComboBox.ItemIndex + 1;

Rechnen kann ich auch, das war ja nur ein Beispiel. Man kann aber auch hartkodiert völlig unterschiedliche Werte zuweisen, die sich nicht unbedingt berechnen lassen.