Forum: Programmieren allgemein
by yankee,
24. Jan 2005
EDIT: achr nach Kommentar von jfheins korrigiert und achr durch ord ersetzt.
Forum: Programmieren allgemein
by yankee,
23. Jan 2005
Etwa so:
old, new:string;
new :=chr(ord(old+3));
new :=chr(ord(old+5));
for i:=2 to length(old)-1 do new :=chr(ord(old+i+5-i*2));
also nur vom Prinzip her. Ich weiß nicht mehr, weie das Gegenstück von chr ist, deswegen habe ich mal achr genommen. Und ich hoffe, ich habe mich bei der Berechnung in der for-Schleife nicht vertan.
Aber mal so vom Grundatz her, müsste das hinkommen. Habe leider...