warum hast du da mehrere begin und end?
in Adresse hast du alle adressen drin?
Dann kannst über Adresse[i] nur auf ein zeichen einer adresse zugreifen.
Schau dir mal TMemo.Lines an, das ist die Klasse TStrings.
tauschen:
Delphi-Quellcode:
hilfsvariable = Adresse[i]
Adresse[i] = Adresse[i+1]
Adresse[i+1] = hilfsvariable