Status / Date() / TIme() Cómo?

Status / Date() / TIme() Cómo?

Postby goosfancito » Mon Jun 26, 2006 6:25 pm

Amigos,
Quiero hacer que me aparezca en mi STATUSBAR el keyboard, fecha, hora, pero no logro realizarlo, solo puedo hacer que aparezca la hora.

Code: Select all  Expand view  RUN
DEFINE STATUSBAR oStb PROMPT "Mi mensaje" OF ::oWnd;
               sizes 250 time



Alguna ayuda?
FWH 21.02
Harbour 3.2.0dev (r2104281802)
Copyright (c) 1999-2021, https://harbour.github.io/
User avatar
goosfancito
 
Posts: 1954
Joined: Fri Oct 07, 2005 7:08 pm

Postby Armando » Mon Jun 26, 2006 9:15 pm

Goosfancito:

Mira este ejemplo

SET MESSAGE OF oWindow TO oApp:cRazonSocial KEYBOARD CLOCK
// De izquierda a derecha, pone El nombre de la empresa
// despues el status del teclado y la hora

DEFINE MSGITEM oMiCasilla OF oWindow:oMsgBar;
SIZE 85 PROMPT Date2Txt(DATE())
// Posteriormente defino una casilla y muestro la fecha
// convertida a texto, prefiero 26/Jun/2006 y no 26/06/2006

DEFINE MSGITEM oMiCasilla OF oWindow:oMsgBar;
SIZE 175 PROMPT oApp:cCopyRight
// Finalmente defino otra casilla y muestro el mensaje de derechos
// reservados

La claúsula SIZE define la longitud de la casilla en pxieles

Saludos, Armando
SOI, s.a. de c.v.
estbucarm@gmail.com
http://www.soisa.mex.tl/
http://sqlcmd.blogspot.com/
Tel. (722) 174 44 45
Carpe diem quam minimum credula postero
User avatar
Armando
 
Posts: 3235
Joined: Fri Oct 07, 2005 8:20 pm
Location: Toluca, México

Postby goosfancito » Mon Jun 26, 2006 9:46 pm

Amigo,

Eso si lo se, pero quiero usar STATUSBAR no esa clase.

Gracias desde ya.
FWH 21.02
Harbour 3.2.0dev (r2104281802)
Copyright (c) 1999-2021, https://harbour.github.io/
User avatar
goosfancito
 
Posts: 1954
Joined: Fri Oct 07, 2005 7:08 pm


Return to FiveWin para Harbour/xHarbour

Who is online

Users browsing this forum: Google [Bot] and 64 guests