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.