Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Internet (https://www.clubdelphi.com/foros/forumdisplay.php?f=3)
-   -   WebBrowser no me recarga pagina (https://www.clubdelphi.com/foros/showthread.php?t=69317)

hmrvivas 10-08-2010 06:45:18

WebBrowser no me recarga pagina
 
Hola todos....

trabajo en delphi 2007, y estoy ejecutando un codigo php que tengo en un servidor remoto, para ello utilizo un TWebBrowser, el cual lo ejecuto normal:

Código Delphi [-]
WebBrowser1.Navigate(auxstrweb);


donde auxstrweb es un string con la url de la pagina php y lleva una serie de parametros que se pasan para leer por GET.

El cuento es que la primera vez me lo hace bien, y las otras veces que llamo a la misma pagina pero con otros parametros, es como si no se ejecutara. (No hace nada).

cabe aclarar que utilizo una barra de progreso para detectar cuando se termina el proceso.

Código Delphi [-]
procedure TFrmSeleccionBoletines.WebBrowser1DocumentComplete(ASender: TObject;
  const pDisp: IDispatch; var URL: OleVariant);
var
  CurWebrowser : IWebBrowser;
  TopWebBrowser: IWebBrowser;
  Document     : OLEvariant;
  WindowName   : string;
begin
  CurWebrowser := pDisp as IWebBrowser;
  TopWebBrowser := (ASender as TWebBrowser).DefaultInterface;
  if CurWebrowser=TopWebBrowser then
  begin
    ProgressBar1.Position := 100;
    ShowMessage('Proceso Completado...');
   // cargawebcompletado := FALSE;
  end
  else
  begin
    Document := CurWebrowser.Document;
    WindowName := Document.ParentWindow.Name;
    //ShowMessage('Frame ' + WindowName + ' is loaded.')
  end;
 
end;




Si alguien sabe como puedo hacer para ejecutar esa pagina cuantas veces se quiera. Lo hago en el evento OnClick de un boton.

Gracias si pueden colaborarme.....


La franja horaria es GMT +2. Ahora son las 01:51:57.

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