Danf - Mi 03.03.10 19:26
Titel: IF - Zweig/ Variable nicht mit zwei Bedingungen definierbar?
Servus,
Ich soll für die Schule (mal wieder) ein kleines Programm zu Ascii schreiben. An sich kein problem, allerdings schaffe ich es nicht eine Variable mit 2 zu erfüllenden Bedingungen zu definieren, hier mein(e) Ansätze:
X soll größer als 65 und kleiner als 90 sein damit die Bedingung erfüllt ist:
Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
| VAR
b : char;
x : Integer;
begin
b := edit1.text[1];
x := ord(b);
if 65 < x < 90 then
begin
x := x + 32;
end;
edit2.text := inttostr(x);
end; |
Fehler: [Fehler] Unit1.pas(36): Inkompatible Typen
Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
| VAR
b : char;
x : Integer;
begin
b := edit1.text[1];
x := ord(b);
if x > 65 < 90 then
begin
x := x + 32;
end;
edit2.text := inttostr(x);
end; |
Gleicher Fehler wie oben
Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
| VAR
b : char;
x : Integer;
begin
b := edit1.text[1];
x := ord(b);
if x > 65 AND x < 90 then
begin
x := x + 32;
end;
edit2.text := inttostr(x);
end; |
Und wieder der gleiche Fehler
Kann mir jemand sagen warum das nicht läuft, bzw. wo der fehler liegt?
Ich bedanke mich im vorraus
MFG
Danf