Hola a todos nuevamente, necesitando una vez mas de la ayuda en el foro...
estoy trabajando con un listbox en el que cargo un archivo txt, por medio de un speedbuttom, voy recorriendo el mismo,
seria algo asi:
lleno el listbox con los items del archivo txt
Código Delphi
[-]ListBox2.Items.LoadFromFile('C:\IPCapitulo.txt');
recorro los items del listbox
Código Delphi
[-]procedure TForm1.SpeedButton2Click(Sender: TObject);
begin
with ListBox2.Items do
begin
if ListBox2.ItemIndex < Count-1
then ListBox2.ItemIndex := ListBox2.ItemIndex + 1
else MessageDlg(Final del curso !',mtInformation,[mbOk],0);
end;
el contenido del listbox seria:
01
01
01
02
02
03
03
04
y quiero que cuando pase por ejemplo del item 01 al 02..me informe con un mensaje que pase al siguiente item..
muchas gracias por la ayuda..
saludos..