Ver Mensaje Individual
  #1  
Antiguo 05-02-2010
cocute cocute is offline
Miembro
 
Registrado: nov 2008
Posts: 403
Reputación: 16
cocute Va por buen camino
como puedo comprobar si un fichero online existe

uso este procedimiento para descargar el fichero de una web:

Código Delphi [-]
procedure TForm1.descargarURL ( const direccionURL, ficheroLocal : string);
begin
  if direccionURL <> '' then
  begin
    with TDownloadURL.Create(self) do
    try
      URL := direccionURL;
      FileName := ficheroLocal;
      ExecuteTarget(nil);
    finally
      Free;
    end;
  end;
end;

para usarlo hago esto y todo ok
Código Delphi [-]
descargarurl('http://www.web.com/fichero.txt', 'fichero.txt');

Como es normal, si el servidor esta offline me salta un mensaje "Error downloading URL: http://www.web.com/fichero.txt", en vez de eso preferiria que no me saliese ningún mensaje emergente o si sale al menos poder cambiar el mensaje que sale por otro. ¿como hago eso?

Última edición por cocute fecha: 05-02-2010 a las 12:07:38.
Responder Con Cita