Page 1 of 1

textbox no cambia

Posted: Fri Feb 26, 2016 7:27 pm
by Alepts
Tengo algo como esto

Code: Select all

Function recorre()
Do While !Eof()
    Main.label_1.Value := ''
    Main.textbox_1.Value := FACTURA
    If CANCELADA
        Main.label_1.Value := 'C A N C E L A D A'
    Skip
EndDo
Return
Pero el textobox no cambia hasta que llega al eof() mostrando el ultimo registro, mas en cambio el Label funciona correctamente.

¿Alguna solución? o ¿tendré que cambiar todos los textbox por labels?

Re: textbox no cambia

Posted: Fri Feb 26, 2016 7:31 pm
by srvet_claudio
Colocar DO EVENTS dentro del bucle.

Re: textbox no cambia

Posted: Fri Feb 26, 2016 7:40 pm
by Alepts
De lujo, no solo me corrigió ese error.
Cuando cambiaba de ventana durante el proceso y quería regresar de nuevo, la ventana no respondía. Ya regresa con normalidad :D

Gracias Doctor