Page 1 of 1

Centralizar Titulo em Dialog ????/

PostPosted: Thu Nov 15, 2007 2:25 am
by Ale SB
¿Es posible centralizar el título en un cuadro de diálogo, en la barra de título?

Saludos

PostPosted: Thu Nov 15, 2007 7:17 am
by Antonio Linares
Puedes añadirle espacios a la izquierda del título
Space( 40 ) + cTitulo

PostPosted: Fri Nov 16, 2007 3:37 pm
by joseluisysturiz
Habia una forma en clipper que se usaba para el centrado de titulos en la pantalla o documentos a imprimir, que era diviendo el tamaño de columnas creo que entre 2 y restandole el tamaño del texto o algo asi, si alguien recuerda eso, bueno te serviria, deja revisar en mi clipoteca a ver si la encuentro y te la envio o publico.practica lo que te dije de la division.saludos.... lo bueno de esto es que si cambias el tamaño del dialogo se centra igual en cambio como te dice antonio te va a quedar movido en titulo y vas a tener que estar incrementando SPACE(), podrias hacerte una funcioncita, bye.

PostPosted: Fri Nov 16, 2007 4:23 pm
by Biel EA6DD
Supongo que lo que comenta Jose Luis es algo similar a esto:
Code: Select all  Expand view
FUNCTION Centra(cCadena,nLon,cRelleno)
    DEFAULT nLon:=78
    DEFAULT cRelleno:=Space(1)
    cCadena:= Replicate(cRelleno,Int((nLon-Len(cCadena))/2))+cCadena+Replicate(cRelleno,Int((nLon-Len(cCadena))/2))
RETURN cCadena

Pero para que te funcione ok, necesitas saber el ancho donde lo quieres centrar.

PostPosted: Fri Nov 16, 2007 9:25 pm
by joseluisysturiz
Biel EA6DD wrote:Supongo que lo que comenta Jose Luis es algo similar a esto:
Code: Select all  Expand view
FUNCTION Centra(cCadena,nLon,cRelleno)
    DEFAULT nLon:=78
    DEFAULT cRelleno:=Space(1)
    cCadena:= Replicate(cRelleno,Int((nLon-Len(cCadena))/2))+cCadena+Replicate(cRelleno,Int((nLon-Len(cCadena))/2))
RETURN cCadena

Pero para que te funcione ok, necesitas saber el ancho donde lo quieres centrar.

Ese mismo Biel, logico que como dices, debe saber el ancho del dialogo y creo es lo mas facil de todo y depende si usa tamaño por pixeles u otra forma.Gracias por esa Biel..., voy probarla a ver que tal va... :wink:

PostPosted: Sun Nov 18, 2007 1:37 pm
by Ale SB
Gracias amigos para las pistas !

Sauludos