FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour Estilo de control (Solucionado)
Posts: 6755
Joined: Wed Feb 15, 2012 08:25 PM
Estilo de control (Solucionado)
Posted: Wed Aug 21, 2013 10:51 AM
Hola
Como saber si una determinada propiedad esta contenida en el estilo de un control?
Ejemplo, algo asi, saber si WS_BORDER $ ::nStyle (si el control lo han definido con borde)
Evidentemente esto no funciona.
Hace tiempo creo que lo vi en el foro pero no lo encuentro
Saludos
Cristobal Navarro

Hay dos tipos de personas: las que te hacen perder el tiempo y las que te hacen perder la noci贸n del tiempo

El secreto de la felicidad no est谩 en hacer lo que te gusta, sino en que te guste lo que haces
Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
Re: Estilo de control
Posted: Wed Aug 21, 2013 05:40 PM

Prueba asi:

MsgInfo( lAnd( GetWindowLong( hWnd, GWL_STYLE ), WS_BORDER ) )

regards, saludos

Antonio Linares
www.fivetechsoft.com
Posts: 6755
Joined: Wed Feb 15, 2012 08:25 PM
Re: Estilo de control
Posted: Wed Aug 21, 2013 05:54 PM

Antonio
Ya habia probado con:

? GetWindowLong( oXBrw:hWnd, -16 ) //GWL_STYLE )

y siempre obtenia 0, y eso me tiene parado

MsgInfo( lAnd( GetWindowLong( oXBrw:hWnd, -16 ), WS_BORDER ) )

Devuelve siempre .F.

El valor de GWL_STYLE es -16 ?, verdad?

Gracias y saludos

Cristobal Navarro

Hay dos tipos de personas: las que te hacen perder el tiempo y las que te hacen perder la noci贸n del tiempo

El secreto de la felicidad no est谩 en hacer lo que te gusta, sino en que te guste lo que haces
Posts: 6755
Joined: Wed Feb 15, 2012 08:25 PM
Re: Estilo de control
Posted: Wed Aug 21, 2013 05:59 PM
Antonio
Como dices muchas veces, siempre lo mas sencillo es lo mejor y nos encargamos de hacerlo complicado
Esto si funciona:
Code (fw): Select all Collapse
聽lAnd( ::nStyle, WS_BORDER )

Gracias
Cristobal Navarro

Hay dos tipos de personas: las que te hacen perder el tiempo y las que te hacen perder la noci贸n del tiempo

El secreto de la felicidad no est谩 en hacer lo que te gusta, sino en que te guste lo que haces
Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
Re: Estilo de control (Solucionado)
Posted: Wed Aug 21, 2013 06:06 PM

Cristobal,

Haces esa comprobaci贸n despues de haber llamado a oBrw:CreateFromCode() ?

Hasta ese momento no tiene un handle de ventana (hWnd) v谩lido

regards, saludos

Antonio Linares
www.fivetechsoft.com
Posts: 6755
Joined: Wed Feb 15, 2012 08:25 PM
Re: Estilo de control (Solucionado)
Posted: Wed Aug 21, 2013 06:08 PM

Ese era el problema
Necesitaba conocer el estilo en tiempo de creacion y antes del CreateFrom...()
Por eso el uso del :hWnd me daba 0
Parece que funciona asi. Que te parece?
Gracias

Cristobal Navarro

Hay dos tipos de personas: las que te hacen perder el tiempo y las que te hacen perder la noci贸n del tiempo

El secreto de la felicidad no est谩 en hacer lo que te gusta, sino en que te guste lo que haces

Continue the discussion