Hola a todos, estoy necesitando una pequeña ayuda...
En mi aplicacion, tengo 3
ListBox, alli llamo 3 archivos .txt diferentes,
el 1º txt me llama un archivo que contiene 'Capitulos', el 2º txt contiene 'Archivos.html' y el 3º txt contiene informacion indicando el
Form debe ser maximizado o no, mi codigo es asi:
Código Delphi
[-]
procedure TForm1.ListBox1DblClick(Sender: TObject);
begin
if ListBox1.ItemIndex = 0 then
begin
ListBox2.Items.LoadFromFile('C:\Archivos de programas\Cyber\Access\IPCapitulo.txt');
ListBox3.Items.LoadFromFile('C:\Archivos de programas\Cyber\Access\IPArchivos.txt');
ListBox4.Items.LoadFromFile('C:\Archivos de programas\Cyber\Access\IPMaximizada.txt');
end;
y tengo un
SpeedButton donde el recorre los 3 archivos txt y muestra las html en un
WebBrowser y el codigo es asi:
Código Delphi
[-]
procedure TForm1.SpeedButton2Click(Sender: TObject);
begin
with ListBox3.Items do
begin
if ListBox3.ItemIndex < Count-1
then ListBox2.ItemIndex := ListBox2.ItemIndex + 1
else MessageDlg('Final del curso !',mtInformation,[mbOk],0);
Panel2.Caption := ListBox2.Items.Strings[ListBox2.ItemIndex];
WebBrowser1.Navigate(strings[ListBox2.ItemIndex]);
end;
hasta alli todo bien... utilize los 2 primeros txt (IPCapitulo.txt, IPArchivos.txt) , ahora mi duda...
al recorrer el 3 archivo txt (IPMaximizada.txt), cual seria el procedimiento correcto para que cuando el encuentre la opcion de maximizar representada por la 'S' en el (IPMaximizada.txt), el maximize el
Form.
Gracias por la ayuda.
Un abrazo y saludos para todos...