Entwickler-Ecke

Delphi Language (Object-Pascal) / CLX - Umwandlung in ASCII


elduchte - Mi 25.06.03 10:39
Titel: Umwandlung in ASCII
Hallo,
wie kann ich ein Buchstabe (ein Wort) im ASCII-Code anzeigen/umwandeln lassen??

Danke
Andreas


MAlsleben - Mi 25.06.03 11:18

Hi,

mit der Funktion ord('x').
Beispiel dazu ist in der Delphi Hilfe.

Gruß Micha.


Tweafis - Mi 25.06.03 12:48

bei einem ganzen wort geht das mit ner selbsgeschriebenen Funktion die ungefähr so aussehen kann:


Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
function GetAsciiString(s: string; hex: boolean = false): string;
var x:integer;
begin
  result := '';
  for x:=1 to length(s) do begin
    if hex then result:=result+'$'+IntToHex(ord(s[x]),2)+' '
    else result := result+IntToStr(ord(s[x]))+' ';
  end;
  result := trim(result);
end;


Bei Bedarf anpassen ;)