topic-22673

Posts: 2170

Joined: Fri Jul 18, 2008 01:24 AM

Problemas con Checkbox
Posted: Mon Oct 17, 2011 02:57 AM

Uploaded with ImageShack.us

Hola amigos. ¿Alguien ha tenido este problema con los CheckBox? Tambien con su transparencia, todo cuando uso degradados. Para estos uso la funcion GradientFill(). He leido durante mas de dos horas en el foro. Todas las posibles soluciones no funcionan para mi. Lo que muestra la imagen lo he resuelto con IsAppThemed(), por el momento. No sé si me dará problemas mas adelante.

Lo que no he podido resolver es la transparencia de los mismos. ¿Alguna solución? Uso versión 10.06, Pellesc, Borland 5.82.

Otra preguntita, probablemente tonta, pero no doy. ¿Cuál es la instrucción para ejecutar una acción dando click sobre un BmpAlpha?, He probado con la misma del bmp corriente... pero no!.

Agradezco de antemano
Abrazos.

Francisco J. Alegría P.

Chinandega, Nicaragua.

Fwxh-MySql-TMySql

Antonio Linares

Posts: 44158

Joined: Thu Oct 06, 2005 05:47 PM

Re: Problemas con Checkbox
Posted: Mon Oct 17, 2011 07:54 AM

Francsico,

Puedes proporcionar algún ejemplo pequeño y autocontenido que podamos probar aqui ? gracias

regards, saludos

Antonio Linares
www.fivetechsoft.com

FranciscoA

Posts: 2170

Joined: Fri Jul 18, 2008 01:24 AM

Re: Problemas con Checkbox
Posted: Mon Oct 17, 2011 08:06 PM

Antonio Linares wrote:Francsico,

Puedes proporcionar algún ejemplo pequeño y autocontenido que podamos probar aqui ? gracias

Hola Antonio, te he enviado por email el ejemplo que solicitas. Lo hice por ese medio porque contiene una carpeta con el prg, dll, ejecutable y otros. Agradezco tu amable atención.

Mucho éxito con FIVEWIN WEB del que estoy pendiente de su lanzamiento.

Saludos.

Francisco J. Alegría P.

Chinandega, Nicaragua.

Fwxh-MySql-TMySql

FranciscoA

Posts: 2170

Joined: Fri Jul 18, 2008 01:24 AM

Re: Problemas con Checkbox
Posted: Wed Oct 19, 2011 11:02 PM

Hola Antonio...

Francisco J. Alegría P.

Chinandega, Nicaragua.

Fwxh-MySql-TMySql

FranciscoA

Posts: 2170

Joined: Fri Jul 18, 2008 01:24 AM

Re: Problemas con Checkbox
Posted: Thu Oct 20, 2011 02:29 PM

Saludos, Antonio. ¿Algo sobre el CheckBox?
Agradecido

Francisco J. Alegría P.

Chinandega, Nicaragua.

Fwxh-MySql-TMySql

carlos vargas

Posts: 1789

Joined: Tue Oct 11, 2005 05:01 PM

Re: Problemas con Checkbox
Posted: Thu Oct 20, 2011 02:50 PM

Francisco, si gustas aproximadamente de las 4pm estaré conectado por msn a donboscocorp2@hotmail.com
para ayudarte.

Salu2

Carlos Vargas

Desde Managua, Nicaragua (CA)

Antonio Linares

Posts: 44158

Joined: Thu Oct 06, 2005 05:47 PM

Re: Problemas con Checkbox
Posted: Thu Oct 20, 2011 06:44 PM

Francisco,

Recibido y te contestamos cuanto antes :-)

regards, saludos

Antonio Linares
www.fivetechsoft.com

Antonio Linares

Posts: 44158

Joined: Thu Oct 06, 2005 05:47 PM

Re: Problemas con Checkbox
Posted: Thu Oct 20, 2011 07:09 PM

Francisco,

Aqui tienes un ejemplo de como has de crear el brush degradado de los diálogos:

Code (fw): Select all Collapse

#include "FiveWin.ch"

function Main()

   local oDlg, lValue := .T.
   local aColors := { { 0.8, nRGB(225,125,40),nRGB(130,112,0) }, { 0.8, nRGB(130,112,0),nRGB(225,125,40) } }

   DEFINE DIALOG oDlg SIZE 500, 300 TRANSPARENT
   
   @ 2, 2 CHECKBOX lvalue PROMPT "Test" OF oDlg SIZE 80, 20

   ACTIVATE DIALOG oDlg CENTERED ;
      ON INIT GradBrush( oDlg, aColors )

return nil

function GradBrush( oDlg, aColors )

   local hDC, hBmp, hBmpOld, oBrush

   hDC = CreateCompatibleDC( oDlg:GetDC() )
   hBmp = CreateCompatibleBitMap( oDlg:hDC, oDlg:nWidth, oDlg:nHeight )
   hBmpOld = SelectObject( hDC, hBmp )

   GradientFill( hDC, 0, 0, oDlg:nHeight, oDlg:nWidth, aColors )

   DeleteObject( oDlg:oBrush:hBrush )
   oDlg:oBrush:hBitmap = hBmp
   oDlg:oBrush:hBrush = CreatePatternBrush( hBmp )
   SelectObject( hDC, hBmpOld )
   oDlg:ReleaseDC()

return nil

regards, saludos

Antonio Linares
www.fivetechsoft.com

FranciscoA

Posts: 2170

Joined: Fri Jul 18, 2008 01:24 AM

Re: Problemas con Checkbox
Posted: Fri Oct 21, 2011 07:04 AM

Carlos, disculpa pero no habia revisado el foro hasta esta hora (1.04 am hora Nic) Agradezco mucho tu interés. Estaremos en contacto.

Antonio, funciona muy bien sin necesidad de IsAppThemed(). Muchísimas gracias, y en espera de FIVEWIN WEB.

Abrazos.

Francisco J. Alegría P.

Chinandega, Nicaragua.

Fwxh-MySql-TMySql

FiveTech Support Forums

Continue the discussion