oToolbar:nWidth no me funciona en folders

[Ruben D. Fernandez]

Amigos:

Alguna idea?

Cuando pongo oToolbar:nWidth = 300 en un folder
no respeta el tamaño.
Estoy tratando de poner una toolbar en una pestaña del folder.


Saludos y gracias.

Ruben Fernandez.

[Antonio Linares]

Ruben,

FWH por defecto asigna el dato ::oTop del contenedor igual a la toolbar, por lo que esta ocupará todo el ancho del contenedor.

Prueba a hacer oWnd:oTop := nil y así no redimensionará la toolbar automaticamente.

[Francisco Horta]

Ruben,
Tuve la misma necesidad que tu, tengo un folder con varias pestañas y cada pestaña tiene su propia toolbar ya que los botones son diferenets opciones, pero no he logrado que la toolbar se ajuste al tamaño del folder, esta se sale un poco y se ve mal, como le hiciste?
[img=http://img67.imageshack.us/img67/9148/barfldyd8.jpg]

http://img67.imageshack.us/my.php?image=barfldyd8.jpg

salu2
paco

[Antonio Linares]

Paco,

oToolBar:oWnd:oTop = nil
oToolBar:nWidth -= ...

[Moisoft]

Despues de definir la Toolbar y todos sus botones

oFld:nOption:Resize()

[Francisco Horta]

Gracias por su ayuda, pero fijate Antonio que no he podido acomodarlo,
tengo un dialogo desde recurso con el folder y en la parte del activate on init uso una funcion para crear la toolbar, que estoy haciendo mal? pongo parte del codigo.


ACTIVATE DIALOG oDlg CENTERED VALID lEnd ;
ON INIT ( crea_barra(oDlg,oFld,oImageList,oReBar,oToolBar),;
oToolBar[1]:oWnd:oTop:=nil, oToolBar[1]:nWidth:=100 )


STAT FUNC crea_barra(oDlg,oFld,oImageList,oReBar,oToolBar)
DEFINE REBAR oReBar[1] OF oFld:aDialogs[1]

DEFINE TOOLBAR oToolBar[1] OF oReBar[1] SIZE 26, 24 ;
IMAGELIST oImageList[1] BALLOON

DEFINE TBBUTTON OF oToolBar[1] ;
TOOLTIP "Nueva partida"

DEFINE TBBUTTON OF oToolBar[1] ;
TOOLTIP "Elimina partida"

DEFINE TBSEPARATOR OF oToolBar[1]

DEFINE TBBUTTON OF oToolBar[1] ;
TOOLTIP "Imprime relación"

oReBar[1]:InsertBand( oToolBar[1] )
RETURN NIL

ya probe metiendo tambien dentro de la funcion la opcion del nil y del nWidth y tampoco.

Salu2
Paco

[Ruben D. Fernandez]

Paco:

No lo tengo solucionado.

Lamentablemente saque la toolbar y puse botones

Saludos

Ruben Fernandez.

[Antonio Linares]

Paco,

Cambiale el ancho a la rebar:

oRebar:nWidth := ...

[Ruben D. Fernandez]

Antonio y Paco:

Funciono perfecto.

Además se le puede cambiar el color
oRebar:SetColor(CLR_WHITE) // por ejemplo

Gracias Maestro.

Ruben Fernandez.

[Francisco Horta]

Gracias a ambos,
funciono ok., una pregunta mas antonio,
como hago para en la toolbar posicionar un boton hasta la parte derecha de la barra?, ya que quedaria un espacio grande entre el penultimo y utlimo boton, y la clase los pone seguidos..
salu2
paco

[Antonio Linares]

Paco,

No me suena que el control ToolBar permita hacer eso.

Habría que buscar en google...

[Francisco Horta]

Bien, gracias Antonio
Paco