Mensaje de espera realizando un proceso.

Board index FiveWin para Harbour/xHarbour Mensaje de espera realizando un proceso.

dobfivewin

Posts: 325

Joined: Sun Feb 03, 2008 11:04 PM

Mensaje de espera realizando un proceso.
Posted: Sat Jan 31, 2009 01:35 PM

Estimados

como era para visualizar un mensaje de espera, mientras se realiza un procesos?

gracias

david
argentina

Kleyber

Posts: 581

Joined: Tue Oct 11, 2005 11:28 AM

Re: Mensaje de espera realizando un proceso.
Posted: Sat Jan 31, 2009 01:39 PM

Hola David,

Puedes usar el MsgRun(). Ej.:

msgRun("Aguarde, gerando relatório","ATENÇÃO",{|| Gera_Relato()})

Saludos

Kleyber Derick

FWH / xHb / xDevStudio / SQLLIB

Alfredo Arteaga

Posts: 326

Joined: Sun Oct 09, 2005 05:22 PM

Re: Mensaje de espera realizando un proceso.
Posted: Sat Jan 31, 2009 05:21 PM

También puedes usar un dialogo y ejecutar el proceso con oDlg:bStart()

[img]http://img519.imageshack.us/img519/117/esperaww9.th.jpg" alt="" loading="lazy">
[/img]

Code: Select all Collapse

      DEFINE DIALOG oDlt RESOURCE "Dlg_Tmp" FONT oWnd:oFont TRANSPARENT
      REDEFINE SAY PROMPT "Detectando unidades de red..." ID 10 OF oDlt
      oDlt:bStart:={|| Unidades() ,oDlt:End()}
      ACTIVATE DIALOG oDlt CENTERED ON PAINT FillWnd(oDlt)

FiveTech Support Forums

Continue the discussion