Waldkauz - Mi 18.03.09 16:18
Titel: Problem mit der Ord()-Verarbeitung
hallo!
Ich habe da ein kleines Problem mit dem Befehl Ord().
Ich komm einfach nicht dahinter was ich falsch mache.
Also das Programm was ich mache funktioniert u.a. (bzw. soll funktionieren) so:
Man gibt ein Wort ins Edit1 ein und beim Klick auf den Button wird das Wort aus ASCII-Zahlen zusammengesetzt im Panel1 ausgegeben.
Also z.B. "Aha" wird zu 65 - 104 - 97
Wo liegt der Fehler (außerdem mag er mein "i:=i+1" auch nicht)?
Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
| var
i: integer;
chr:char;
laenge:integer;
wort:string;
begin
wort:=Edit1.Text;
laenge:=Length(wort);
for i := 1 to laenge do
begin
chr:=wort[i];
Panel1.Caption:=Panel1.Caption+' - '+Ord(chr);
i:=i+1;
end;
end; |
AXMD - Mi 18.03.09 16:21
 Waldkauz hat folgendes geschrieben  : |
Ich habe da ein kleines Problem mit dem Befehl Ord().
Ich komm einfach nicht dahinter was ich falsch mache. |
Du hast vergessen, den Rückgabewert von Ord (Typ Integer) wieder in einen String umzuwandeln, um ihn an den anderen String anzuhängen, d.h. dir fehlt ein IntToStr um den Aufruf von Ord
| Waldkauz hat folgendes geschrieben : |
| Wo liegt der Fehler (außerdem mag er mein "i:=i+1" auch nicht) |
i wird bei jedem Schleifendurchlauf automatisch um 1 erhöht, das musst du nicht extra machen (lass die Zeile also einfach weg).
AXMD