Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > Internet
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

Grupo de Teaming del ClubDelphi

Tema Cerrado
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 17-05-2005
Avatar de delphi.com.ar
delphi.com.ar delphi.com.ar is offline
Federico Firenze
 
Registrado: may 2003
Ubicación: Buenos Aires, Argentina *
Posts: 5.935
Poder: 27
delphi.com.ar Va por buen camino
Fíjate en este ejemplo que subí que hace algo muuuuy parecido:
http://www.clubdelphi.com/foros/showthread.php?t=21293

Saludos!
__________________
delphi.com.ar

Dedique el tiempo suficiente para formular su pregunta si pretende que alguien dedique su tiempo en contestarla.
  #2  
Antiguo 17-05-2005
Avatar de AGAG4
AGAG4 AGAG4 is offline
Miembro
 
Registrado: ago 2004
Ubicación: Los Mochis, Sinaloa, México
Posts: 1.420
Poder: 21
AGAG4 Va por buen camino
Gracias

Gracias por su pronta respuesta, se mira muy interezante su proyecto ya revise lo que me comento pero desconozco las herramientas Web, es decir sólo vi la instrucción :
Código Delphi [-]
DownloadURLToFile(AImageUrl, AImageFile)
que me imagino que hace algo parecido con UrlDownloadToFile que es la que uso, bueno seguiré haciendo pruebas....

Que tenga buen día.
  #3  
Antiguo 17-05-2005
Avatar de delphi.com.ar
delphi.com.ar delphi.com.ar is offline
Federico Firenze
 
Registrado: may 2003
Ubicación: Buenos Aires, Argentina *
Posts: 5.935
Poder: 27
delphi.com.ar Va por buen camino
Esa instrucción tambien esta escrita en el proyecto:
Código Delphi [-]
function DownloadURLToFile(const AUrl, AFileName: TFileName): boolean;
begin
  Result := True;

  with TDownLoadURL.Create(nil) do
    try
      URL := AUrl;
      Filename := AFileName;

      try
        ExecuteTarget(Nil);
      except
        Result := False;
      end;

    finally
      Free;
    end;
end;


Utiliza un TDownLoadURL que es un "Standard Action" que implementa "URLDownloadToFile" de UrlMon.dll.... A la larga lo mismo pero Made in Borland
__________________
delphi.com.ar

Dedique el tiempo suficiente para formular su pregunta si pretende que alguien dedique su tiempo en contestarla.
  #4  
Antiguo 17-05-2005
Avatar de AGAG4
AGAG4 AGAG4 is offline
Miembro
 
Registrado: ago 2004
Ubicación: Los Mochis, Sinaloa, México
Posts: 1.420
Poder: 21
AGAG4 Va por buen camino
Gracias

Gracias Federico, voy a hacer pruebas....

Que tenga buen día.
  #5  
Antiguo 18-05-2005
Avatar de AGAG4
AGAG4 AGAG4 is offline
Miembro
 
Registrado: ago 2004
Ubicación: Los Mochis, Sinaloa, México
Posts: 1.420
Poder: 21
AGAG4 Va por buen camino
Pero....

Gracias por su respuesta Federico pero no me funciono, ya realize pruebas, hace lo mismo que el UrlDownloadToFile pero con la diferencia que la que usted me dio se crea TDownLoadURL.Create(nil) y se Destruye con FREE creí que con eso bastaba para que retomará la información del archivo de la página web pero no es así, TOMA SIEMPRE el primer valor que tomo al Iniciar la Aplicación, hago llamadas a la página en intervalos de 3 veces de 3 minutos después 3 veces de 5 minutos y por ultimo 3 veces de 10 minutos pero ninguno los retoma, siendo que si abró manualmente la página web si me aparece el último Dato del archivo.

Otra Cosa que descubrí es que cuando abró la página Manualmente en la Pc donde esta corriendo la Aplicación me doy cuenta que la aplicación cuando intenta retomar el archivo lo BAJA CORRECTAMENTE, pero si NO ABRO Manualmente sigue intentando pero sin éxito alguno.

Existirá alguna otra función ó API de windows????

A usted Federico si le REFRESCA el archivo que descarga en su aplicación????

Si no la solución que tomare sería cerrar y volver abrir la aplicación que apenas así refresca el archivo....

Gracias por su sugerencia.

Última edición por AGAG4 fecha: 18-05-2005 a las 17:06:18. Razón: Corrección
  #6  
Antiguo 10-02-2012
petete2008 petete2008 is offline
Miembro
 
Registrado: oct 2008
Posts: 109
Poder: 16
petete2008 Va por buen camino
tengo el mismo problema que tu con
UrlDownloadToFile

siempre me descarga el mismo contenido a pesar de modificarlo en el destino.
  #7  
Antiguo 10-02-2012
petete2008 petete2008 is offline
Miembro
 
Registrado: oct 2008
Posts: 109
Poder: 16
petete2008 Va por buen camino
solucionado!!!

function DownloadToFile(URL, FileName: String): Boolean;
var lpszFile: Array [0..MAX_PATH] of Char;
begin
// Download to cache by getting newest version
if (URLDownloadToCacheFile(nil, PChar(URL), @lpszFile, MAX_PATH, BINDF_GETNEWESTVERSION, nil) = S_OK) then
// Copy to desired file name
result:=CopyFile(@lpszFile, PChar(FileName), False)
else
// Failed
result:=False;
end;
Tema Cerrado



Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro


La franja horaria es GMT +2. Ahora son las 11:15:12.


Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi
Copyright 1996-2007 Club Delphi