Тхт файл обработать посимвольно

[AlexDn]

в тхт находится информация в виде тратата, тратата, тратата. т.е. через запятую. Нужно преобразовать в вид
тратата
тратата
тратата
т.е. заменить запятую на перенос строк.. как и чем лучше посимвольно считать тхт?

[AlexDn]

есть насколько мне известно StrList.LoadFromFile(FName); но он считывает файл построчно вроде бы, StrList[1], StrList[2], а мне нужно посимвольно или как лучше сделать?

[Человек_Борща]

Стандартными TTextFile,Read,Write,Seek,Rewrite.. .
Ну и кто мешает зделать так?:

var
  i:LongInt;
  ts:TstringLIst;
begin
Ts:=TstringList.Create;

try
Ts.LoadFromFile('myMegabitFile.txt');
For i:=0 to Length(ts.Text) -1 do
begin
   if Ts.Text[i] = Chr(',') then 
   begin

   end;
end;
finally
FreeAndNil(ts);
end;
end;

а вообще лучше считать весь текст в строку а затем зделать так:

var
 NewS,OldS:string;
begin
OldS:=mySomethingText;
NewS:=StringReplase(OldS,PChar(','),#10#13,[rfReplaceAll]);
end;