vamos por partes.
Si lo que quieres es poder buscar un archivo en tu disco duro (o tu equipo) y que este quede guardado en algún lado, lo que tendrías que hacer esutilizar un TOpenDialog:
Código Delphi
[-]
with OpenDialog1 do begin
if Execute then
ShowMessage(Format('Ruta: %s, Archivo : %s', [ExtractFilePath(FileName), ExtractFileName(FileName)])) else
ShowMessage('Open file was cancelled');
end;