Hola,
¿este codigo te funciona?
Código Delphi
[-]
procedure TForm1.BitBtn1Click(Sender: TObject);
var
i: Integer;
Linea: string;
begin
DoubleBuffered := true;
Memo1.Lines.LoadFromFile('...');
Memo1.Lines.text := stringreplace(Memo1.Lines.text,#9,' ',[rfReplaceAll]);
Memo2.Lines.Delimitier := ';';
Memo2.Lines.Delimitiedtext := Memo1.Lines.Text;
end;