topic-14064

Board index FiveWin para Harbour/xHarbour Sobre Statusbar

Posts: 479

Joined: Fri Feb 16, 2007 10:29 AM

Sobre Statusbar
Posted: Tue Dec 23, 2008 01:12 PM

Compañeros:

Varias son las preguntas sobre Statusbar:
1.- ¿ Se puede incluir un bitmap dentro del statusbar y asignarle un Action? En caso afirmativo, ¿como sería?
2.- Podemos darle el aspecto Wxp mediante '2007'

Un saludo a todos y Feliz Navidad y próspero año nuevo
Lorenzo.

Loren

Posts: 479

Joined: Fri Feb 16, 2007 10:29 AM

Sobre Statusbar
Posted: Tue Dec 23, 2008 01:18 PM

Para más informacion... lo tengo definido así:

Code: Select all Collapse

        Activate dialog oWin center on init TStatusBar():New(oWin,' Pantalla Principal ',{550,650,750},{' Pantalla Principal ','Usuario: '+rtrim(Nom_usuario),'© Lorenzo Fdez.'}) valid iif(msgnoyes('¿Seguro de salir?','Responda...'),identificar2(),.f.)

A la espera de respuestas...
LORENZO

Patricio Avalos Aguirre

Posts: 1074

Joined: Fri Oct 07, 2005 01:56 PM

Sobre Statusbar
Posted: Tue Dec 23, 2008 02:36 PM

Para el icono debes modificar la clase StatusBa.prg
e incluir este metodo

Code: Select all Collapse

#define SB_SETICON	  1039

METHOD SetIcons( nPos, oIco )   INLINE SendMessage( ::hWnd, SB_SETICON, nPos, oIco:hIcon )

Saludos
Patricio

__________________________________________________________________
Version: Harbour 3.2.0dev (r1307082134),Compiler: Borland C++ 5.8.2 (32-bit)
PCode version: 0.3, FWH 13.2
http://www.sialm.cl

FiveTech Support Forums

Continue the discussion