problemas con el LoadFromFile

[[Caral]]

Hola
busca es una variable que contiene la direccion, o el nombre del archivo, muy raro, intenta esto:

Código Delphi [-]
procedure TPrograma.BuscarClick(Sender: TObject);
var busca:string;
begin
busca:= 'c:\S.P.T.M\coros\coro.txt';
try
presen.lines.LoadFromFile(busca);
Except
on EFOpenError do
messageDlg('El Coro NO está cargado',mtError,mbOKCancel,0);
end;
end;

Como digo, la variable busca, contiene la direccion y el nombre del archivo, con esto solo se necesita la colocacion del nombre de la variable a buscar, supongo que presen, es el nombre del memo.
Por otro lado, si la variable solo contiene el nombre del archivo hay que concatenar (ya casi me lo creo).

Código Delphi [-]
procedure TPrograma.BuscarClick(Sender: TObject);
var busca:string;
begin
busca:=coro.txt;
try
presen.lines.LoadFromFile('c:\S.P.T.M\coros\'+busca);
Except
on EFOpenError do
messageDlg('El Coro NO está cargado',mtError,mbOKCancel,0);
end;
end;

Si te fijas el tipo de archivo es txt, no text, creo que hay diferencia.
No estoy muy seguro de la forma, no te fies mucho.
Saludos