Einzelnen Beitrag anzeigen

Stresemann

Registriert seit: 23. Mai 2006
Ort: Münster
14 Beiträge
 
Delphi 6 Personal
 
#1

Umrechnen von String-Werten zu dezimal Code und zurück

  Alt 24. Mai 2006, 13:26
Hallo zusammen! Wie schon in einem anderen Tread brauche ich die Hilfe bei einem Programm
womit ich string-Werte, wie z.B. A zu dezimal-code laut Ascii bekommen, also bei A 65...
Bei dem Umrechnen von string nach dezimalcode habe ich schon ein Erfolg erzielt:

Delphi-Quellcode:

var i,n: integer;
Satz, int: String;

for i := 1 to (length(Satz)) do
begin
n := Ord(Satz[i]);
Mit diesem Quellcode klappt die Umrechnung! Hurrah und danke noch mal nachträglich
für die Hilfe dabei.. Nur jetzt fehlt mir noch die umgekehrte Rechnung von
dezimal zu String..
Einen Ansatz dazu habe ich:

Delphi-Quellcode:
var i,n: integer;
Satz, int: String;

for i := 1 to length(satz) do
begin
int := chr(strtoint(satz[i]));
Doch dies klappt noch net, da er bei jedem Wert nur  herausspuckt.
Ich bin mir sicher das die Schleife hochgradig falsch ist, jedoch weiß ich mir
selber noch nicht richtig zu helfen.
Michael Raring