Entwickler-Ecke

Delphi Language (Object-Pascal) / CLX - Frage zu Ascii-Zeichen


Böner - Fr 10.10.03 23:13
Titel: Frage zu Ascii-Zeichen
ka wo das reingehört, deswegen hierhin !

Mit welchem Befehl kann ich einzellne Zeichen, oder besser noch einen ganzen Text in Ascii-Nummern verwandeln ?

Gruß Böner


Anonymous - Fr 10.10.03 23:19

einfach den Char als byte casten:


Delphi-Quelltext
1:
byte(str[i]);                    
[/delphi]


Böner - Fr 10.10.03 23:25

char ?

bin noch ziemlich neu in der branche ! hatte delphi nur in der schule ! wir hatten mal was mit ascii-werten, hab ich aber vergessen !

Was muss ich schreiben damit folgendes passiert:

Hab zwei Memo-Felder. In Memo1 schreib ich nen Text, der dann auf knopfdruck in memo2 als ascii-text erscheint !

Gruß Böner


Anonymous - Fr 10.10.03 23:31

willst du einfach nur die zeichen als integer??
versuchs mal so:


Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
var
 i,j: integer;
begin
 memo2.text := '';
 for i := 0 to memo1.lines.count-1 do
 begin
  memo2.lines.add('');
  for j := 1 to length(memo1.lines[i]) do
   memo2.text := memo2.text + inttostr(byte(memo1.lines[i][j])) + ' ';
 end;
end;


(ungetestet)


Delete - Sa 11.10.03 03:27

Wie wäre es mit ord? Einfach mal in der Hilfe kucken.