also, wohlgemerkt, erst einlesen, und dann wieder inne datei rein, wobei das auch so ginge:
Delphi-Quellcode:
procedure tausch(position1, position2, laenge:integer);
var
i:integer;
hilfswert:char;
begin
memo1.lines.loadfromfile('wasweiss.ich');
for 1:=position1 to position1+laenge do
begin
position2:=position2+1; //muss ja beides erhöht werden :-D
//eigentliches tauschen
hilfswert:=Memo1.lines.text[position1];
memo1.lines.text[position1]:=memo1.lines.text[position2];
memo1.lines.text[position2]:=hilfswert;
//eigentliches tauschen zuende
end;
memo1.lines.savetofile('wasweiss.ich');
end;
kann sein das man statt der memo auch ne richedit nehmen muss...
oder hab ichs falsch verstanden???