Ver Mensaje Individual
  #13  
Antiguo 23-04-2007
Avatar de BlackDaemon
BlackDaemon BlackDaemon is offline
Miembro
 
Registrado: dic 2006
Ubicación: Bolivia - Santa Cruz
Posts: 206
Reputación: 18
BlackDaemon Va por buen camino
ohhhh!!!
Bueno que tonto he sido al hacer eso, ahora ya me han quedado las cosas super claras, tienes razón Dec ahí estoy creando el mismo componte y el otro no me serviría para nada... por eso nunca se movian los progressbar, ahora si por lo menos ya se mueven Pero estan medio locos, por que suben y bajan, por ej llega a 10 % baja a 0, luego sube a 30 % y baja.. luego así se la pasa hasta que termina de realizar las peticiones/recepciones de datos pero claro.. ahora se que pueda ser por el bucle que estoy usando, por el momento tengo que salir un rato, mas tarde regreso y continuaré leyendo sobre el tema que me gusta mucho como trabaja delphi+internet creo que es cosa de aprender nada mas.. y yo lo veía complicado
aquí les dejo mi código que estoy usando para las búsquedas.

Código Delphi [-]
procedure TForm1.SBBuscarClick(Sender: TObject);
var
  params: TStrings;
  respuesta: string;
  I : Integer;
begin
  params := TStringList.Create;
  try

  I := 0;
  while (I <= Final) do
  begin
    I := I + 10;
    respuesta := IdHTTP.Get('http://www.google.com.bo/search?hl=es&q='+EPalabra.Text+'&hl=es&start='+IntToStr(I)+'&sa=N');
    MHtml.Text := MHtml.Text + respuesta;

  end;
  finally
    IdHTTP.Free;
    params.Free;
  end;
end;

final es una variable tambien.

y tengo en los eventos de mi componente idHTTP lo mismo que tenía antes, no he tocado nada, osea está en mis ateriores post

saludos Dec
Responder Con Cita