brauche dringend hilfe bei der combobox !!!

[jordan93]

haii erst mal!

ich arbeite an einem programm, in dem eine combobox vorkommt. in dieser combobox stehen 2 schwierigkeitsgrade (leicht und schwer). wenn ich eines dieser beiden auswähle soll er den wert einer variable ändern. leider bin ich damit etwas überfordert.

ich bitte dringend um hilfe.

bei "leicht" soll der wert der variable "heer" 1000 sein
bei "schwer" soll der wert der variable "heer" 500 sein

danke schon mal für die hilfe

lg euer jordan93

[aurikel_Max]

Mmmh?

Delphi-Quellcode:

if DeineComboBox.Text = 'leicht'  then
  heer := 1000
else if DeineComboBox.Text = 'schwer' then
  heer := 500;

[himitsu]

Text in ComboBox:

Code:

leicht
schwer

heer := 1000 div (DeineComboBox.ItemIndex + 1);

[p80286]

wie wär es hiermit:

Delphi-Quellcode:

procedure TForm1.MyComboboxChange(Sender: TObject);
var
  heer:integer;
begin
  if MyCombobox.text='schwer' then
    heer:=1000
  else
    heer:=500;
end;

Gruß
K-H

[aurikel_Max]

Zitat von p80286:

wie wär es hiermit:

Delphi-Quellcode:

procedure TForm1.MyComboboxChange(Sender: TObject);
var
  heer:integer;
begin
  if MyCombobox.text='schwer' then
    heer:=1000
  else
    heer:=500;
end;

Gruß
K-H

Daran hab ich auch zuerst gedacht - allerdings war ich mir nicht sicher, ob vielleicht am Anfang ein Startwert wie "Schwierigkeit" gesetzt ist - bei einem Klick auf "Weiter" o.ä. hätte er dann automatisch den schwierigen Schwierigkeitsgrad.

[DeddyH]

Zitat von himitsu:

heer := 1000 div (DeineComboBox.ItemIndex + 1);

Und dann wird der ItemIndex per Code auf -1 gesetzt (nichts ausgewählt)... bumm! Macht es Euch doch nicht so schwer, Leute, nehmt eine einfache case-Abfrage (evtl. inkl. else-Zweig) und gut.

[himitsu]

Eine ComboBox mit Style als csDropDownList und den in der GUI/Form eingetragenen Auswahlwerten kennt Standardmäßig kein -1.

OK, egal ob kathematisch oder via CASE, über den ItemIndex ist der bessere Weg.
> vorallem wenn man die Anwendung mal lokalisiert.

[jordan93]

danke habt mir schon sehr geholfen

jetzt ist aber noch ein problem aufgetreten.
beim doppelklick auf die combobox erscheint folgende fehlermeldung:

could not find source location to add method ComboBox1Change. "END." or INTIALIZATION not found in unit source

vielleicht könnt ihr mir da noch beilflich sein
herzlichen dank bereits

lg jordan93

[lbccaleb]

Erstelle lieber nen neuen Thread, sonnst findet hier bald keiner mehr was wieder. Dann wird dir bestimmt auch geholfen