Frage zu Ascii-Zeichen

Böner · Beiträge: 39 Win Xp, Win 98, Linux 8.2 D3 Prof + D6 Pers

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

Gast Erhaltene Danke: 1

einfach den Char als byte casten:

markieren

Delphi-Quelltext

1:	byte(str[i]);

[/delphi]

Böner · Beiträge: 39 Win Xp, Win 98, Linux 8.2 D3 Prof + D6 Pers

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

Gast Erhaltene Danke: 1

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

markieren

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)

Ehemaliges Mitglied Erhaltene Danke: 1

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

	Mitgliederliste
	Gruppen
	Das Team
	Richtlinien
	Synonyme