Hola a todos.
vuelvo a solicitar vuestra ayuda para poder aprender un poco mas.
Estoy realizando una aplicación para conexión por Telnet (
https://www.clubdelphi.com/foros/showthread.php?t=95374) a un listado de equipos.
en un principio cuando se realiza la conexión a un solo equipo no tengo problema, me conecto ejecuto la consulta y desconecto.
el problema ocurre cuando le pongo una lista de IP para que so realice secuencialmente.
la Lista de Ip se encuentra en un ListBox.
El problema e que he intentado hacer algo como.
Código Delphi
[-]
Var
N : Integer;
Begin
For N = 0 To ListBox.Items.Count -1 Then
Begin
Memo1.Text := 'Iniciando Conexión';
Memo1.Text := 'Finalizando conexión';
End;
pero esto parece que es demasiado rápido y se queda enganchado y no es capaz de realizar las tareas de echo no es capaz de pintar en el momo.
por lo que pense en depender de una bariable global para controlar el "For" la estructura que tenia pensada es mas o menos.
Código Delphi
[-]
Var
N : Integer;
Begin
For N = 0 To ListBox.Items.Count -1 Then
Begin
Repeat
Begin;
Memo1.Text := 'Iniciando Conexión';
End;
Until Terminado = True ;
Begin
Memo1.Text := 'Iniciando Conexión';
End;
End;
End;
Pero no soy capaz de que esto funcione. se me bloquea la aplicacion.
Alguna sugerencia????????
Muchas gracias.