Page 1 of 1

oToolbar:nWidth no me funciona en folders

Posted: Mon Jul 30, 2007 12:38 am
by 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.

Posted: Sat Aug 11, 2007 9:54 am
by 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.

Posted: Wed Aug 29, 2007 7:11 pm
by 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

Posted: Thu Aug 30, 2007 7:30 am
by Antonio Linares
Paco,

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

Posted: Thu Aug 30, 2007 7:37 am
by Moisoft
Despues de definir la Toolbar y todos sus botones

oFld:nOption:Resize()

Posted: Thu Aug 30, 2007 4:18 pm
by 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

Posted: Thu Aug 30, 2007 4:27 pm
by Ruben D. Fernandez
Paco:

No lo tengo solucionado.

Lamentablemente saque la toolbar y puse botones

Saludos

Ruben Fernandez.

Posted: Thu Aug 30, 2007 5:15 pm
by Antonio Linares
Paco,

Cambiale el ancho a la rebar:

oRebar:nWidth := ...

Posted: Thu Aug 30, 2007 6:03 pm
by 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.

Posted: Thu Aug 30, 2007 6:30 pm
by 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

Posted: Thu Aug 30, 2007 7:16 pm
by Antonio Linares
Paco,

No me suena que el control ToolBar permita hacer eso.

Habría que buscar en google...

Posted: Thu Aug 30, 2007 8:11 pm
by Francisco Horta
Bien, gracias Antonio
Paco