MsgWait con FiveLinux

MsgWait con FiveLinux

Postby jgayoso » Wed Mar 30, 2011 6:45 pm

Buenas a todos, ya estoy compilando mi proyecto en FiveLinux utilizando Ubuntu, y hasta el momento voy bien, avanzando.
En FiveWin existe la función MsgWait, consulta:

¿Habra algo parecido en FiveLinux o xHarbour para Linux?
¿Alguien tiene un código?

La idea es colocar "Espere procesando..." o cualquier texto parecido para indicar al usuario que se esta realizando un proceso.

U otra forma de hacerlo... tambie es bienvenida.

Se agradece desde ya.

Jorge Gayoso :oops:
jgayoso
 
Posts: 170
Joined: Sat Aug 07, 2010 11:36 pm
Location: Chile

Re: MsgWait con FiveLinux

Postby pablovidal » Wed Mar 30, 2011 7:28 pm

Esto me funciona en Windows
Code: Select all  Expand view

function aMsgWait( bAction, cCaption, cCLR )
LOCAL oDlg, nWidth
Local oFont
Local oSay

     DEFAULT cCaption := "Un momento..."
     DEFAULT bAction  := { || WaitSeconds( 05 ) }
     DEFAULT cClr     := CLR_BLUE

 DEFINE FONT oFont NAME "TAHOMA" SIZE 0,-15 BOLD ITALIC

 DEFINE DIALOG oDLG RESOURCE "DLG_WAIT" Font oFont

 REDEFINE SAY oSay PROMPT cCaption ID 102 OF oDlg FONT oFont COLOR CLR_WHITE

 oDlg:bStart := { || Eval( bAction, oDlg ), oDlg:End(), SysRefresh() }
 oDlg:lHelpIcon := .F.
 Activate Dialog oDlg Center

Return Nil
Saludos,

Pablo Alberto Vidal
/*
------------------------------------------------------
Harbour 3.2.0, Fivewin 17.02, BCC7
------------------------------------------------------
*/
User avatar
pablovidal
 
Posts: 401
Joined: Thu Oct 06, 2005 10:15 pm
Location: Republica Dominicana


Return to FiveLinux / FiveDroid (Android)

Who is online

Users browsing this forum: No registered users and 3 guests