FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour TSButton y Ventana
Posts: 396
Joined: Tue Mar 18, 2008 09:41 PM
TSButton y Ventana
Posted: Tue Aug 03, 2010 12:01 PM
Hola Amigos,

Tengo una aplicaci贸n con una ventana principal, en ella he puesto un bot贸n de la clase TSButton
y me lo muestra. El problema es que al pasar el rat贸n sobre el bot贸n, no se activa ni permite
hacer click. Es como si estuviera en un segundo plano.

Os paso una muestra de mi c贸digo:

Code (fw): Select all Collapse
DEFINE WINDOW oWnd MDI ;
     TITLE cTitulo ;
     ICON oIcon ;
     COLORS CLR_BLUE, CLR_WHITE MENU oMenu

   DEFINE BUTTONBAR oBar OF oWnd SIZE 30,50 2007

   DEFINE BUTTON oBtn4 OF oBar ;
   TOOLTIP OemToAnsi( "Administraci贸n de Propietarios" ) ;
   RESOURCE "admprop_btn" ;
   ACTION( MsgInfo( "hola" ) )  ;
   MESSAGE "hola"

// Este es el que falla.
@ 5,5 SBUTTON oBtnAvisos OF oWnd ;
   TOOLTIP "Muestra los avisos pendientes." ;
   MESSAGE "Muestra los avisos pendientes." ;
   COLORS { | oBtnAvisos | If( oBtnAvisos:lMouseOver, CLR_RED, CLR_BLACK ) }, CLR_LIGHTBLUE ;
   RESOURCE "MAS" ;
   OFFICE ;
   ACTION MsgInfo( "hola" )

ACTIVATE WINDOW oWnd MAXIMIZED


Es la primera vez que intento poner un bot贸n en una ventana sin que dependa de la barra de botones ni integrado en un dialogo, supongo que algo se me escapa.

Si alguien tiene alguna idea, bienbenida sea.
:-)
Javier,

FWH 8.04 2008
Posts: 514
Joined: Sun Oct 16, 2005 03:32 AM
Re: TSButton y Ventana
Posted: Tue Aug 03, 2010 02:33 PM
Hola,

Tines que asignarlo a oWnd:oWndClient

Code (fw): Select all Collapse
@ 5,5 SBUTTON oBtnAvisos OF oWnd:oWndClient 聽;
聽 聽TOOLTIP "Muestra los avisos pendientes." ;
聽 聽MESSAGE "Muestra los avisos pendientes." ;
聽 聽COLORS { | oBtnAvisos | If( oBtnAvisos:lMouseOver, CLR_RED, CLR_BLACK ) }, CLR_LIGHTBLUE ;
聽 聽RESOURCE "MAS" ;
聽 聽OFFICE ;
聽 聽ACTION MsgInfo( "hola" )

Saludos,

Carlos Gallego

Saludos,



Carlos Gallego



*** FWH-25.12, xHarbour 1.3.1 Build 20241008, Borland C++7.70, PellesC, ADS 11.1***

Posts: 396
Joined: Tue Mar 18, 2008 09:41 PM
Re: TSButton y Ventana
Posted: Wed Aug 04, 2010 07:33 AM

Gracias Carlos, ha funcionado!. :D
Un saludo.

Javier,

FWH 8.04 2008

Continue the discussion