hi,
hab ein kleines Problem mit meiner anweisung
An markierter stelle gibt mir das programm die fehlermeldung:
[Error] Uhotel.pas(200): Undeclared identifier: '1'
kann mir jemand helfen?
gibt es evt auch ne möglichkeit diese gesamte anweisungskette zu
verkürzen?
DANKE
Delphi-Quellcode:
Case rgsaison.ItemIndex of
0:Case rgdauer.ItemIndex of
0: Case rgzimmer.ItemIndex of
0:zp:=50;
1:zp:=55;
2:zp:=60;
else
zp:=65;
1:Case rgzimmer.ItemIndex of //<-- Hier bei der 1: ist der Fehler
0:zp:=45;
1:zp:=50;
2:zp:=55;
else
zp:=60
else
Case rgzimmer.ItemIndex of
0:zp:=30;
1:zp:=35;
2:zp:=40;
else
zp:=45;
1:Case rgdauer.ItemIndex of
0: Case rgzimmer.ItemIndex of
0:zp:=55;
1:zp:=60;
2:zp:=65;
else
zp:=70;
1: Case rgzimmer.ItemIndex of
0:zp:=50;
1:zp:=55;
2:zp:=60;
else
zp:=65;
else
Case rgzimmer.ItemIndex of
0:zp:=35;
1:zp:=40;
2:zp:=45;
else
zp:=50;
else Case rgdauer.ItemIndex of
0: Case rgzimmer.ItemIndex of
0:zp:=60;
1:zp:=65;
2:zp:=70;
else
zp:=75;
1: Case rgzimmer.ItemIndex of
0:zp:=55;
1:zp:=60;
2:zp:=65;
else
zp:=70;
else
Case rgzimmer.ItemIndex of
0:zp:=40;
1:zp:=45;
2:zp:=50;
else
zp:=55;
End;
[edit=Daniel B]Delphi-Tags eingefügt. MfG Daniel B.[/edit]