Barra de botones en línea inferior de la ventana?

Board index FiveWin para Harbour/xHarbour Barra de botones en línea inferior de la ventana?

Posts: 365

Joined: Sat Oct 08, 2005 07:59 PM

Barra de botones en línea inferior de la ventana?
Posted: Thu Jul 10, 2008 04:04 PM

¿Puede ponerse la ButtonBar en el margen inferior de la ventana? Así funciona:

Tbar():New(oWnd, 25, 25, .T., "BOTTOM")

pero queda una fea banda gris en la parte superior de la ventana, como si también reservase allí espacio para la barra.
Rafael

FWH 8.05 + Harbour

Antonio Linares

Posts: 44162

Joined: Thu Oct 06, 2005 05:47 PM

Barra de botones en línea inferior de la ventana?
Posted: Thu Jul 10, 2008 04:38 PM

Rafael,

Aqui tienes un ejemplo:

Code: Select all Collapse

#include "FiveWin.ch"

function Main()

   local oWnd, oBar

   DEFINE WINDOW oWnd

   DEFINE BUTTONBAR oBar OF oWnd 2007

   oWnd:oBottom = oBar
   oWnd:oTop = nil
   oWnd:oBar = nil
   
   DEFINE BUTTON OF oBar ACTION MsgInfo( "click" )

   ACTIVATE WINDOW oWnd

return nil

regards, saludos

Antonio Linares
www.fivetechsoft.com

Rafael Clemente

Posts: 365

Joined: Sat Oct 08, 2005 07:59 PM

Barra de botones en línea inferior de la ventana?
Posted: Thu Jul 10, 2008 06:25 PM

Gracias, Antonio. Funciona perfectamente.
Rafael

FiveTech Support Forums

Continue the discussion