Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   OOP (https://www.clubdelphi.com/foros/forumdisplay.php?f=5)
-   -   Edit.Text en bucles (https://www.clubdelphi.com/foros/showthread.php?t=75801)

bgespada 20-09-2011 10:14:27

Edit.Text en bucles
 
Hola
Me encuentro con el siguiente inconveniente.

Quiero visualizar valores de una columna de un DB en un Edit.
El Edit está dentro de un bucle while.
El dato que muestro es el dato a trabajar con otras funciones antes de cambiar de registro en el DB.

Código Delphi [-]
while i <> 0 do
  begin
  sNomRob := DBgenvlg.FieldByName(genvlgNomRobot).Value;
  Edit.Text := SNomRob;
  {...Funciones varias...}
  DBSimbolos.Next;
end;

¿Hay alguna propiedad o método para poder ver los datos en el Edit en tiempo de ejecución?

Muchas gracias

newtron 20-09-2011 11:21:08

Igual hoy estoy algo lento pero no me entero de lo que quieres exactamente. :)

bgespada 20-09-2011 11:37:08

Hola newtron

Intento explicarme mejor.

El Edit.Text, lo relleno con datos (sNomRob), pero no se ven los datos (sNomRob) hasta haber finaliza el bucle. Por lo tanto el único valor que veo es el último de sNomRob.

Gracias de nuevo

duilioisola 20-09-2011 12:12:49

Debes meter una linea más para que refresque los datos.
Código Delphi [-]
while i <> 0 do
  begin
  sNomRob := DBgenvlg.FieldByName(genvlgNomRobot).Value;
  Edit.Text := SNomRob;
  // Procesa todos los refrescos y otros eventos (mouse, Mov. de ventanas, teclado, etc.)
  Application.ProcessMessages; 
  {...Funciones varias...}
  DBSimbolos.Next;
end;
Cuida de no abusar de esto, porque puede hacer que tu aplicación se vuelva lenta.

También deberías leer esto.

bgespada 20-09-2011 12:35:45

Muchas gracias


La franja horaria es GMT +2. Ahora son las 17:15:19.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi