FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour Ancho de un TSay
Posts: 2
Joined: Fri Feb 01, 2008 11:27 AM
Ancho de un TSay
Posted: Tue May 06, 2008 04:13 PM

Hola a todos!!!
A ver si alguien puede decirme como obtener en tiempo de ejecución el ancho que necesita un tsay para que me quepa un texto dado para una fuente dada. La idea es crear una funcion que genere un dialogo ajustado al ancho de un texto pasado.

Muchas gracias de antemano.

Posts: 8523
Joined: Tue Dec 20, 2005 07:36 PM
Ancho de un TSay
Posted: Tue May 06, 2008 05:32 PM

José,

Podrias explicar mejor??

?????????

João Santos - São Paulo - Brasil - Phone: +55(11)95150-7341
Posts: 782
Joined: Wed Dec 19, 2007 07:50 AM
Re: Ancho de un TSay
Posted: Tue May 06, 2008 07:51 PM
josemaria wrote:A ver si alguien puede decirme como obtener en tiempo de ejecución el ancho que necesita un tsay para que me quepa un texto dado para una fuente dada. La idea es crear una funcion que genere un dialogo ajustado al ancho de un texto pasado.

Hola José María, prueba esto:

nWidth := GetTextWidth( 0, cString, oFont:hFont )

Saludos.

Manuel Mercado
manuelmercado at prodigy dot net dot mx
Posts: 2
Joined: Fri Feb 01, 2008 11:27 AM
Ancho de un TSay
Posted: Wed May 07, 2008 07:09 AM

Perfecto Manuel, muchas gracias. Una sola cosa... tuve que dividir el valor resultante entre 2 sea cual sea la fuente que utilice :?

Gracias otra vez.
Salu2

Continue the discussion