|
hola de nuevo, sabes que carga bien la pagina,
//ListBox1.Selected [ 1 ] := true;
WebBrowser1.Navigate(ListBox1.items.strings[1]);
pero mi idea es que con un buttom, el pase para la siguinte pagina, y si repito el procedimiento, asignandole otro item
WebBrowser1.Navigate(ListBox1.items.strings[2]);
el recorre todo y me trae la ultima, sera que me esta faltando algo.
procedure TFormForm01.FormCreate(Sender: TObject);
begin
ListBox1.Items.LoadFromFile('C:\Arquivos de programas\Cyber\Access\IParquivo.txt');
end;
procedure TFormForm01.SpeedButton2Click(Sender: TObject);
begin
//ListBox1.Selected [ 1 ] := true;
WebBrowser1.Navigate(ListBox1.items.strings[1]);
//ListBox1.Selected [ 2 ] := true;
WebBrowser1.Navigate(ListBox1.items.strings[2]);
end;
creo que es asi, gracias
|