Transparent property not working properly

Moderator: Rathinagiri

Post Reply
Javier Tovar
Posts: 1275
Joined: Tue Sep 03, 2013 4:22 am
Location: Tecámac, México

Transparent property not working properly

Post by Javier Tovar »

Hola Pablo César,

Así esta bien?, las imagenes hablan por si solas.

A los controles les puse BackColor de Verde (Claro que solo a los que se les puede poner) y el Form está en color ciano.

La Primer columna de controles tienen la propiedad de transparencia como .T.
La Segunda columna de controles tienen la propiedad de transparencia como .F.
Los Controles del Primer Tab tienen la propiedad de transparencia como .T.
Los Controles del Segundo Tab tienen la propiedad de transparencia como .F.

Resumiendo. Los Controles que no trabajan su propiedad de transparencia son:
  1. Windows Classic
    1. Slider
    2. Frame
    Cuando son contenidos en un Tab:
    1. Slider
    2. Frame
    3. RadioGroup
    WinClasic.jpg
    WinClasic.jpg (111.71 KiB) Viewed 3979 times
  2. Windows AERO
    1. CheckBox
    2. Slider
    3. RadioGroup
    4. Frame
    Cuando son contenidos en un Tab:
    1. CheckBox
    2. Slider
    3. RadioGroup
    4. Frame
    WinAERO.jpg
    WinAERO.jpg (118.93 KiB) Viewed 3979 times
Saludos y Cualquier comentario es bienvenido.

////////////////////////////////////////////////////////////////////////////////////////////////
Hi Pablo César,

Is it okay now ? Pictures speaks for itself.

Controls were put BackColor Green (Of course, only those who can put them) and Form is Cyan color.

The first column controls have the property of transparency as .T.
The second column controls have the property of transparency as .F.
First Tab Controls are the property of transparency as .T.
Second Tab Controls are the property of transparency as .F.

Briefly. Hereunder Controls which are not working transparency property:
  1. Windows Classic
    1. Slider
    2. Frame
    When at Tab:
    1. Slider
    2. Frame
    3. RadioGroup
    WinClasic.jpg
    WinClasic.jpg (111.71 KiB) Viewed 3979 times
  2. Windows AERO
    1. CheckBox
    2. Slider
    3. RadioGroup
    4. Frame
    When at Tab:
    1. CheckBox
    2. Slider
    3. RadioGroup
    4. Frame
    WinAERO.jpg
    WinAERO.jpg (118.93 KiB) Viewed 3979 times
Greetings and Any comments are welcome.
For this test I used this code:

Code: Select all

#include <hmg.ch>

Function Main
DEFINE WINDOW Form_1 AT 103 , 13 WIDTH 1169 HEIGHT 476 ;
    TITLE "Demo TRANSPARENCIES" MAIN BACKCOLOR {0,255,255}

    DEFINE LABEL Label_1
        ROW    40
        COL    60
        WIDTH  120
        HEIGHT 24
        VALUE "Label_1"
        FONTNAME "Arial"
        FONTSIZE 9
        TOOLTIP ""
        FONTBOLD .F.
        FONTITALIC .F.
        FONTUNDERLINE .F.
        FONTSTRIKEOUT .F.
        HELPID Nil
        VISIBLE .T.
        TRANSPARENT .T.
        ACTION Nil
        AUTOSIZE .F.
        BACKCOLOR {0,255,64}
        FONTCOLOR NIL
    END LABEL

    DEFINE LABEL Label_5
        ROW    40
        COL    330
        WIDTH  120
        HEIGHT 24
        VALUE "Label_5"
        FONTNAME "Arial"
        FONTSIZE 9
        TOOLTIP ""
        FONTBOLD .F.
        FONTITALIC .F.
        FONTUNDERLINE .F.
        FONTSTRIKEOUT .F.
        HELPID Nil
        VISIBLE .T.
        TRANSPARENT .F.
        ACTION Nil
        AUTOSIZE .F.
        BACKCOLOR {0,255,64}
        FONTCOLOR NIL
    END LABEL

    DEFINE BUTTON Button_2
        ROW    80
        COL    330
        WIDTH  100
        HEIGHT 28
        ACTION Nil
        CAPTION "Button_2"
        FONTNAME "Arial"
        FONTSIZE 9
        TOOLTIP ""
        FONTBOLD .F.
        FONTITALIC .F.
        FONTUNDERLINE .F.
        FONTSTRIKEOUT .F.
        ONGOTFOCUS Nil
        ONLOSTFOCUS Nil
        HELPID Nil
        FLAT .F.
        TABSTOP .T.
        VISIBLE .T.
        TRANSPARENT .F.
        MULTILINE .F.
        PICTURE Nil
        PICTALIGNMENT TOP
    END BUTTON

    DEFINE BUTTON Button_1
        ROW    80
        COL    60
        WIDTH  100
        HEIGHT 28
        ACTION Nil
        CAPTION "Button_1"
        FONTNAME "Arial"
        FONTSIZE 9
        TOOLTIP ""
        FONTBOLD .F.
        FONTITALIC .F.
        FONTUNDERLINE .F.
        FONTSTRIKEOUT .F.
        ONGOTFOCUS Nil
        ONLOSTFOCUS Nil
        HELPID Nil
        FLAT .F.
        TABSTOP .T.
        VISIBLE .T.
        TRANSPARENT .T.
        MULTILINE .F.
        PICTURE Nil
        PICTALIGNMENT TOP
    END BUTTON

    DEFINE CHECKBOX Check_1
        ROW    130
        COL    60
        WIDTH  100
        HEIGHT 28
        CAPTION "Check_1"
        VALUE .F.
        FONTNAME "Arial"
        FONTSIZE 9
        TOOLTIP ""
        ONCHANGE Nil
        ONGOTFOCUS Nil
        ONLOSTFOCUS Nil
        FONTBOLD .F.
        FONTITALIC .F.
        FONTUNDERLINE .F.
        FONTSTRIKEOUT .F.
        BACKCOLOR {128,255,0}
        FONTCOLOR NIL
        HELPID Nil
        TABSTOP .T.
        VISIBLE .T.
        TRANSPARENT .T.
    END CHECKBOX

    DEFINE CHECKBOX Check_4
        ROW    130
        COL    330
        WIDTH  100
        HEIGHT 28
        CAPTION "Check_4"
        VALUE .F.
        FONTNAME "Arial"
        FONTSIZE 9
        TOOLTIP ""
        ONCHANGE Nil
        ONGOTFOCUS Nil
        ONLOSTFOCUS Nil
        FONTBOLD .F.
        FONTITALIC .F.
        FONTUNDERLINE .F.
        FONTSTRIKEOUT .F.
        BACKCOLOR {0,255,64}
        FONTCOLOR NIL
        HELPID Nil
        TABSTOP .T.
        VISIBLE .T.
        TRANSPARENT .F.
    END CHECKBOX

    DEFINE CHECKBUTTON CheckBtn_1
        ROW    180
        COL    60
        WIDTH  100
        HEIGHT 28
        CAPTION "CheckBtn_1"
        VALUE .F.
        FONTNAME "Arial"
        FONTSIZE 9
        TOOLTIP ""
        ONCHANGE Nil
        ONGOTFOCUS Nil
        ONLOSTFOCUS Nil
        FONTBOLD .F.
        FONTITALIC .F.
        FONTUNDERLINE .F.
        FONTSTRIKEOUT .F.
        HELPID Nil
        TABSTOP .T.
        VISIBLE .T.
        PICTURE Nil
    END CHECKBUTTON

    DEFINE CHECKBUTTON CheckBtn_2
        ROW    170
        COL    330
        WIDTH  100
        HEIGHT 28
        CAPTION "CheckBtn_2"
        VALUE .F.
        FONTNAME "Arial"
        FONTSIZE 9
        TOOLTIP ""
        ONCHANGE Nil
        ONGOTFOCUS Nil
        ONLOSTFOCUS Nil
        FONTBOLD .F.
        FONTITALIC .F.
        FONTUNDERLINE .F.
        FONTSTRIKEOUT .F.
        HELPID Nil
        TABSTOP .T.
        VISIBLE .T.
        PICTURE Nil
    END CHECKBUTTON

    DEFINE SLIDER Slider_1
        ROW    240
        COL    60
        WIDTH  120
        HEIGHT 35
        RANGEMIN 1
        RANGEMAX 10
        VALUE 0
        TOOLTIP ""
        ONCHANGE Nil
        HELPID Nil
        TABSTOP .T.
        VISIBLE .T.
        BACKCOLOR {0,255,64}
    END SLIDER

    DEFINE SLIDER Slider_4
        ROW    220
        COL    330
        WIDTH  120
        HEIGHT 35
        RANGEMIN 1
        RANGEMAX 10
        VALUE 0
        TOOLTIP ""
        ONCHANGE Nil
        HELPID Nil
        TABSTOP .T.
        VISIBLE .T.
        BACKCOLOR {0,255,0}
    END SLIDER

    DEFINE RADIOGROUP RadioGroup_4
        ROW    280
        COL    330
        WIDTH  120
        HEIGHT 50
        OPTIONS { 'Option 1','Option 2'}
        VALUE 1
        FONTNAME "Arial"
        FONTSIZE 9
        TOOLTIP ""
        ONCHANGE Nil
        FONTBOLD .F.
        FONTITALIC .F.
        FONTUNDERLINE .F.
        FONTSTRIKEOUT .F.
        HELPID Nil
        TABSTOP .T.
        VISIBLE .T.
        TRANSPARENT .F.
        SPACING 25
        BACKCOLOR {0,255,64}
        FONTCOLOR NIL
        READONLY Nil
        HORIZONTAL .F. 
    END RADIOGROUP

    DEFINE FRAME Frame_3
        ROW    360
        COL    330
        WIDTH  130
        HEIGHT 60
        FONTNAME "Arial"
        FONTSIZE 9
        FONTBOLD .F.
        FONTITALIC .F.
        FONTUNDERLINE .F.
        FONTSTRIKEOUT .F.
        CAPTION "Frame_3"
        BACKCOLOR {0,255,0}
        FONTCOLOR NIL
        OPAQUE .T.
    END FRAME

    DEFINE TIMER Timer_1 INTERVAL 1000 ACTION {|| (Form_1.Label_1.Value := Time()) }

    DEFINE RADIOGROUP RadioGroup_1
        ROW    290
        COL    70
        WIDTH  120
        HEIGHT 50
        OPTIONS { 'Option 1','Option 2'}
        VALUE 1
        FONTNAME "Arial"
        FONTSIZE 9
        TOOLTIP ""
        ONCHANGE Nil
        FONTBOLD .F.
        FONTITALIC .F.
        FONTUNDERLINE .F.
        FONTSTRIKEOUT .F.
        HELPID Nil
        TABSTOP .T.
        VISIBLE .T.
        TRANSPARENT .T.
        SPACING 25
        BACKCOLOR {0,255,64}
        FONTCOLOR NIL
        READONLY Nil
        HORIZONTAL .F. 
    END RADIOGROUP

    DEFINE FRAME Frame_1
        ROW    360
        COL    70
        WIDTH  140
        HEIGHT 70
        FONTNAME "Arial"
        FONTSIZE 9
        FONTBOLD .F.
        FONTITALIC .F.
        FONTUNDERLINE .F.
        FONTSTRIKEOUT .F.
        CAPTION "Frame_1"
        BACKCOLOR {0,255,0}
        FONTCOLOR NIL
        OPAQUE .F.
    END FRAME

    DEFINE TAB Tab_1 AT 10 , 480 WIDTH 330 HEIGHT 410 VALUE 1 FONT "Arial" SIZE 9 TOOLTIP "" ON CHANGE Nil

        PAGE "Transparent := .T."

            DEFINE LABEL Label_3
                ROW    60
                COL    20
                WIDTH  120
                HEIGHT 24
                VALUE "Label_3"
                FONTNAME "Arial"
                FONTSIZE 9
                TOOLTIP ""
                FONTBOLD .F.
                FONTITALIC .F.
                FONTUNDERLINE .F.
                FONTSTRIKEOUT .F.
                HELPID Nil
                VISIBLE .T.
                TRANSPARENT .T.
                ACTION Nil
                AUTOSIZE .F.
                BACKCOLOR {0,255,64}
                FONTCOLOR NIL
            END LABEL

            DEFINE TEXTBOX Text_2
                ROW    60
                COL    190
                WIDTH  120
                HEIGHT 24
                FONTNAME "Arial"
                FONTSIZE 9
                TOOLTIP ""
                ONCHANGE Nil
                ONGOTFOCUS Nil
                ONLOSTFOCUS Nil
                FONTBOLD .F.
                FONTITALIC .F.
                FONTUNDERLINE .F.
                FONTSTRIKEOUT .F.
                ONENTER Nil
                HELPID Nil
                TABSTOP .T.
                VISIBLE .T.
                READONLY .F.
                RIGHTALIGN .F.
                DISABLEDBACKCOLOR Nil
                DISABLEDFONTCOLOR Nil
                CASECONVERT NONE
                BACKCOLOR NIL
                FONTCOLOR NIL
                INPUTMASK Nil
                FORMAT Nil
                VALUE ""
            END TEXTBOX

            DEFINE SLIDER Slider_2
                ROW    100
                COL    20
                WIDTH  120
                HEIGHT 35
                RANGEMIN 1
                RANGEMAX 10
                VALUE 0
                TOOLTIP ""
                ONCHANGE Nil
                HELPID Nil
                TABSTOP .T.
                VISIBLE .T.
                BACKCOLOR {0,255,64}
            END SLIDER

            DEFINE RADIOGROUP RadioGroup_3
                ROW    160
                COL    30
                WIDTH  120
                HEIGHT 50
                OPTIONS { 'Option 1','Option 2'}
                VALUE 1
                FONTNAME "Arial"
                FONTSIZE 9
                TOOLTIP ""
                ONCHANGE Nil
                FONTBOLD .F.
                FONTITALIC .F.
                FONTUNDERLINE .F.
                FONTSTRIKEOUT .F.
                HELPID Nil
                TABSTOP .T.
                VISIBLE .T.
                TRANSPARENT .T.
                SPACING 25
                BACKCOLOR {0,255,64}
                FONTCOLOR NIL
                READONLY Nil
                HORIZONTAL .F. 
            END RADIOGROUP

            DEFINE CHECKBOX Check_2
                ROW    180
                COL    200
                WIDTH  100
                HEIGHT 28
                CAPTION "Check_2"
                VALUE .F.
                FONTNAME "Arial"
                FONTSIZE 9
                TOOLTIP ""
                ONCHANGE Nil
                ONGOTFOCUS Nil
                ONLOSTFOCUS Nil
                FONTBOLD .F.
                FONTITALIC .F.
                FONTUNDERLINE .F.
                FONTSTRIKEOUT .F.
                BACKCOLOR {0,255,64}
                FONTCOLOR NIL
                HELPID Nil
                TABSTOP .T.
                VISIBLE .T.
                TRANSPARENT .T.
            END CHECKBOX

            DEFINE FRAME Frame_2
                ROW    40
                COL    10
                WIDTH  310
                HEIGHT 340
                FONTNAME "Arial"
                FONTSIZE 9
                FONTBOLD .F.
                FONTITALIC .F.
                FONTUNDERLINE .F.
                FONTSTRIKEOUT .F.
                CAPTION "Frame_2"
                BACKCOLOR {0,255,64}
                FONTCOLOR NIL
                OPAQUE .T.
            END FRAME

            DEFINE BUTTON Button_3
                ROW    250
                COL    40
                WIDTH  100
                HEIGHT 28
                ACTION Nil
                CAPTION "Button_3"
                FONTNAME "Arial"
                FONTSIZE 9
                TOOLTIP ""
                FONTBOLD .F.
                FONTITALIC .F.
                FONTUNDERLINE .F.
                FONTSTRIKEOUT .F.
                ONGOTFOCUS Nil
                ONLOSTFOCUS Nil
                HELPID Nil
                FLAT .F.
                TABSTOP .T.
                VISIBLE .T.
                TRANSPARENT .T.
                MULTILINE .F.
                PICTURE Nil
                PICTALIGNMENT TOP
            END BUTTON

            DEFINE CHECKBUTTON CheckBtn_3
                ROW    250
                COL    190
                WIDTH  100
                HEIGHT 28
                CAPTION "CheckBtn_3"
                VALUE .F.
                FONTNAME "Arial"
                FONTSIZE 9
                TOOLTIP ""
                ONCHANGE Nil
                ONGOTFOCUS Nil
                ONLOSTFOCUS Nil
                FONTBOLD .F.
                FONTITALIC .F.
                FONTUNDERLINE .F.
                FONTSTRIKEOUT .F.
                HELPID Nil
                TABSTOP .T.
                VISIBLE .T.
                PICTURE Nil
            END CHECKBUTTON

        END PAGE 

        PAGE "Page 2"

            DEFINE TEXTBOX Text_3
                ROW    70
                COL    170
                WIDTH  120
                HEIGHT 24
                FONTNAME "Arial"
                FONTSIZE 9
                TOOLTIP ""
                ONCHANGE Nil
                ONGOTFOCUS Nil
                ONLOSTFOCUS Nil
                FONTBOLD .F.
                FONTITALIC .F.
                FONTUNDERLINE .F.
                FONTSTRIKEOUT .F.
                ONENTER Nil
                HELPID Nil
                TABSTOP .T.
                VISIBLE .T.
                READONLY .F.
                RIGHTALIGN .F.
                DISABLEDBACKCOLOR Nil
                DISABLEDFONTCOLOR Nil
                CASECONVERT NONE
                BACKCOLOR NIL
                FONTCOLOR NIL
                INPUTMASK Nil
                FORMAT Nil
                VALUE ""
            END TEXTBOX

            DEFINE RADIOGROUP RadioGroup_2
                ROW    130
                COL    170
                WIDTH  120
                HEIGHT 50
                OPTIONS { 'Option 1','Option 2'}
                VALUE 1
                FONTNAME "Arial"
                FONTSIZE 9
                TOOLTIP ""
                ONCHANGE Nil
                FONTBOLD .F.
                FONTITALIC .F.
                FONTUNDERLINE .F.
                FONTSTRIKEOUT .F.
                HELPID Nil
                TABSTOP .T.
                VISIBLE .T.
                TRANSPARENT .F.
                SPACING 25
                BACKCOLOR {0,255,0}
                FONTCOLOR NIL
                READONLY Nil
                HORIZONTAL .F. 
            END RADIOGROUP

            DEFINE LABEL Label_2
                ROW    60
                COL    20
                WIDTH  120
                HEIGHT 24
                VALUE "Label_2"
                FONTNAME "Arial"
                FONTSIZE 9
                TOOLTIP ""
                FONTBOLD .F.
                FONTITALIC .F.
                FONTUNDERLINE .F.
                FONTSTRIKEOUT .F.
                HELPID Nil
                VISIBLE .T.
                TRANSPARENT .F.
                ACTION Nil
                AUTOSIZE .F.
                BACKCOLOR {128,255,0}
                FONTCOLOR NIL
            END LABEL

            DEFINE SLIDER Slider_3
                ROW    100
                COL    20
                WIDTH  120
                HEIGHT 35
                RANGEMIN 1
                RANGEMAX 10
                VALUE 0
                TOOLTIP ""
                ONCHANGE Nil
                HELPID Nil
                TABSTOP .T.
                VISIBLE .T.
                BACKCOLOR {0,255,64}
            END SLIDER

            DEFINE CHECKBOX Check_3
                ROW    160
                COL    20
                WIDTH  100
                HEIGHT 28
                CAPTION "Check_3"
                VALUE .F.
                FONTNAME "Arial"
                FONTSIZE 9
                TOOLTIP ""
                ONCHANGE Nil
                ONGOTFOCUS Nil
                ONLOSTFOCUS Nil
                FONTBOLD .F.
                FONTITALIC .F.
                FONTUNDERLINE .F.
                FONTSTRIKEOUT .F.
                BACKCOLOR {0,255,0}
                FONTCOLOR NIL
                HELPID Nil
                TABSTOP .T.
                VISIBLE .T.
                TRANSPARENT .F.
            END CHECKBOX

            DEFINE FRAME Frame_4
                ROW    40
                COL    10
                WIDTH  290
                HEIGHT 290
                FONTNAME "Arial"
                FONTSIZE 9
                FONTBOLD .F.
                FONTITALIC .F.
                FONTUNDERLINE .F.
                FONTSTRIKEOUT .F.
                CAPTION "Frame_4"
                BACKCOLOR {0,255,0}
                FONTCOLOR NIL
                OPAQUE .T.
            END FRAME

            DEFINE BUTTON Button_4
                ROW    240
                COL    30
                WIDTH  100
                HEIGHT 28
                ACTION Nil
                CAPTION "Button_4"
                FONTNAME "Arial"
                FONTSIZE 9
                TOOLTIP ""
                FONTBOLD .F.
                FONTITALIC .F.
                FONTUNDERLINE .F.
                FONTSTRIKEOUT .F.
                ONGOTFOCUS Nil
                ONLOSTFOCUS Nil
                HELPID Nil
                FLAT .F.
                TABSTOP .T.
                VISIBLE .T.
                TRANSPARENT .F.
                MULTILINE .F.
                PICTURE Nil
                PICTALIGNMENT TOP
            END BUTTON

            DEFINE CHECKBUTTON CheckBtn_4
                ROW    240
                COL    170
                WIDTH  100
                HEIGHT 28
                CAPTION "CheckBtn_4"
                VALUE .F.
                FONTNAME "Arial"
                FONTSIZE 9
                TOOLTIP ""
                ONCHANGE Nil
                ONGOTFOCUS Nil
                ONLOSTFOCUS Nil
                FONTBOLD .F.
                FONTITALIC .F.
                FONTUNDERLINE .F.
                FONTSTRIKEOUT .F.
                HELPID Nil
                TABSTOP .T.
                VISIBLE .T.
                PICTURE Nil
            END CHECKBUTTON

        END PAGE 

    END TAB 

    DEFINE LABEL Label_7
        ROW    10
        COL    60
        WIDTH  120
        HEIGHT 24
        VALUE "Transparente := .T."
        FONTNAME "Arial"
        FONTSIZE 9
        TOOLTIP ""
        FONTBOLD .F.
        FONTITALIC .F.
        FONTUNDERLINE .F.
        FONTSTRIKEOUT .F.
        HELPID Nil
        VISIBLE .T.
        TRANSPARENT .T.
        ACTION Nil
        AUTOSIZE .F.
        BACKCOLOR {0,255,64}
        FONTCOLOR NIL
    END LABEL

    DEFINE LABEL Label_8
        ROW    10
        COL    330
        WIDTH  120
        HEIGHT 24
        VALUE "Transparent := .F."
        FONTNAME "Arial"
        FONTSIZE 9
        TOOLTIP ""
        FONTBOLD .F.
        FONTITALIC .F.
        FONTUNDERLINE .F.
        FONTSTRIKEOUT .F.
        HELPID Nil
        VISIBLE .T.
        TRANSPARENT .F.
        ACTION Nil
        AUTOSIZE .F.
        BACKCOLOR {0,255,64}
        FONTCOLOR NIL
    END LABEL

    DEFINE TAB Tab_2 AT 10 , 820 WIDTH 330 HEIGHT 400 VALUE 1 FONT "Arial" SIZE 9 TOOLTIP "" ON CHANGE Nil

        PAGE "Transparent := .F."

            DEFINE FRAME Frame_5
                ROW    40
                COL    20
                WIDTH  280
                HEIGHT 330
                FONTNAME "Arial"
                FONTSIZE 9
                FONTBOLD .F.
                FONTITALIC .F.
                FONTUNDERLINE .F.
                FONTSTRIKEOUT .F.
                CAPTION "Frame_5"
                BACKCOLOR {0,255,64}
                FONTCOLOR NIL
                OPAQUE .T.
            END FRAME

            DEFINE LABEL Label_4
                ROW    80
                COL    40
                WIDTH  120
                HEIGHT 24
                VALUE "Label_4"
                FONTNAME "Arial"
                FONTSIZE 9
                TOOLTIP ""
                FONTBOLD .F.
                FONTITALIC .F.
                FONTUNDERLINE .F.
                FONTSTRIKEOUT .F.
                HELPID Nil
                VISIBLE .T.
                TRANSPARENT .F.
                ACTION Nil
                AUTOSIZE .F.
                BACKCOLOR {0,255,64}
                FONTCOLOR NIL
            END LABEL

            DEFINE SLIDER Slider_5
                ROW    120
                COL    50
                WIDTH  120
                HEIGHT 35
                RANGEMIN 1
                RANGEMAX 10
                VALUE 0
                TOOLTIP ""
                ONCHANGE Nil
                HELPID Nil
                TABSTOP .T.
                VISIBLE .T.
                BACKCOLOR {0,255,64}
            END SLIDER

            DEFINE RADIOGROUP RadioGroup_5
                ROW    190
                COL    50
                WIDTH  120
                HEIGHT 50
                OPTIONS { 'Option 1','Option 2'}
                VALUE 1
                FONTNAME "Arial"
                FONTSIZE 9
                TOOLTIP ""
                ONCHANGE Nil
                FONTBOLD .F.
                FONTITALIC .F.
                FONTUNDERLINE .F.
                FONTSTRIKEOUT .F.
                HELPID Nil
                TABSTOP .T.
                VISIBLE .T.
                TRANSPARENT .F.
                SPACING 25
                BACKCOLOR {0,255,64}
                FONTCOLOR NIL
                READONLY Nil
                HORIZONTAL .F. 
            END RADIOGROUP

            DEFINE CHECKBOX Check_5
                ROW    270
                COL    50
                WIDTH  100
                HEIGHT 28
                CAPTION "Check_5"
                VALUE .F.
                FONTNAME "Arial"
                FONTSIZE 9
                TOOLTIP ""
                ONCHANGE Nil
                ONGOTFOCUS Nil
                ONLOSTFOCUS Nil
                FONTBOLD .F.
                FONTITALIC .F.
                FONTUNDERLINE .F.
                FONTSTRIKEOUT .F.
                BACKCOLOR {0,255,0}
                FONTCOLOR NIL
                HELPID Nil
                TABSTOP .T.
                VISIBLE .T.
                TRANSPARENT .F.
            END CHECKBOX

            DEFINE BUTTON Button_5
                ROW    310
                COL    40
                WIDTH  100
                HEIGHT 28
                ACTION Nil
                CAPTION "Button_5"
                FONTNAME "Arial"
                FONTSIZE 9
                TOOLTIP ""
                FONTBOLD .F.
                FONTITALIC .F.
                FONTUNDERLINE .F.
                FONTSTRIKEOUT .F.
                ONGOTFOCUS Nil
                ONLOSTFOCUS Nil
                HELPID Nil
                FLAT .F.
                TABSTOP .T.
                VISIBLE .T.
                TRANSPARENT .F.
                MULTILINE .F.
                PICTURE Nil
                PICTALIGNMENT TOP
            END BUTTON

            DEFINE CHECKBUTTON CheckBtn_5
                ROW    310
                COL    170
                WIDTH  100
                HEIGHT 28
                CAPTION "CheckBtn_5"
                VALUE .F.
                FONTNAME "Arial"
                FONTSIZE 9
                TOOLTIP ""
                ONCHANGE Nil
                ONGOTFOCUS Nil
                ONLOSTFOCUS Nil
                FONTBOLD .F.
                FONTITALIC .F.
                FONTUNDERLINE .F.
                FONTSTRIKEOUT .F.
                HELPID Nil
                TABSTOP .T.
                VISIBLE .T.
                PICTURE Nil
            END CHECKBUTTON

        END PAGE 

        PAGE "Page 2"

        END PAGE 

    END TAB 

END WINDOW
Form_1.Center
Form_1.Activate
Return Nil
Top
User avatar
Pablo César
Posts: 4059
Joined: Wed Sep 08, 2010 1:18 pm
Location: Curitiba - Brasil

Transparent property not working properly

Post by Pablo César »

I have note Frames are not working as I wish. I know if we put same backcolor of form forcing the frame backcolor is going to work. But I believe this is not the right way, doens't it ?

Now Javier is showing us some problems in TAB with some transparency in controls and in AERO style. Ths AERO style seems is a headache, would it be an API error or misinterpretation of AREO system ? HMG should adapt our lib to work properly to attend these demands ?
HMGing a better world
"Matter tells space how to curve, space tells matter how to move."
Albert Einstein
Top
Javier Tovar
Posts: 1275
Joined: Tue Sep 03, 2013 4:22 am
Location: Tecámac, México

Re: Transparent property not working properly

Post by Javier Tovar »

Hola Pablo César,

Creo que hay que ver hacia enfrente y adaptar HMG a AERO, ya que la tendencia es quitar varias interfaces gráficas anteriores y solo se van a conservar las de tipo AERO.

////////////////////////////////////////////////////////////////////////////////////////////////////////////
Hi Pablo César,

I think we should look into front and adapt HMG to AERO, since the trend is to remove several previous GUIs and will only retain AERO type.
AERO.jpg
AERO.jpg (117.11 KiB) Viewed 3966 times
Saludos!
Top
User avatar
Pablo César
Posts: 4059
Joined: Wed Sep 08, 2010 1:18 pm
Location: Curitiba - Brasil

Transparent property not working properly

Post by Pablo César »

Yes Javier, I know we have to look forward, non stopping the new features and including new versions of Windows, which we may give us headaches to adapt our HMG library.

These is strange behavior, I even in classic mode, there are not working properly the transparency of some controls.
HMGing a better world
"Matter tells space how to curve, space tells matter how to move."
Albert Einstein
Top
User avatar
Pablo César
Posts: 4059
Joined: Wed Sep 08, 2010 1:18 pm
Location: Curitiba - Brasil

Transparent property not working properly

Post by Pablo César »

Hi Javier,

I do not know if you will agree, but IMHO removing BackColor in all controls helped a lot to identify errors easily and I made this summary and picture comparisons:
  1. Hereunder, tests been done in Windows 7
    1. For Classic mode:
    2. Sliders do not work Transparent at all ( always assumes with BackColor )
    3. Captions of Frames, Transparent never works ( always assumes with BackColor )
    4. When Transparent of RadioGroups inside of Tabs assumes Form BackColor, not assumes Tab BackColor as should be

      Remark: There is no BackColor in Tabs.
      Screen1.png
      Screen1.png (91.35 KiB) Viewed 3884 times
    1. For Aero mode:
    2. Sliders do not work Transparent at all ( always assumes with BackColor )
    3. Captions of Frames, Transparent never works ( always assumes with BackColor )
    4. RadioGroups do not work Transparent ( assuming Nil BackColor )
    5. When Transparent of RadioGroups inside of Tabs assumes gray color or lets say Nil BackColor, not assumes Tab BackColor as should be
    6. When Transparent of CheckButtons inside of Tabs assumes gray color or lets say Nil BackColor, not assumes Tab BackColor as should be

      Remark: There is no BackColor in Tabs.
      Screen2.png
      Screen2.png (157.97 KiB) Viewed 3882 times
  2. Hereunder, tests been done in Windows XP
    1. Sliders do not work Transparent at all ( always assumes with Black Color even define any other BackColor or even Nil BackColor ) :o
    2. Captions of Frames, Transparent never works ( always assumes with BackColor )
    3. When Transparent of RadioGroups inside of Tabs assumes Form BackColor, not assumes Tab BackColor as should be

      Remark: There is no BackColor in Tabs.
      Screen3.png
      Screen3.png (110.56 KiB) Viewed 3881 times
Final remark: All these tests have been done with following code:

Code: Select all

#include <hmg.ch>

Function Main()
Local MY_CYAN  := {0,255,255}
Local MY_GREEN := Nil // {0,255,64}  <== uncomment this to see differences

DEFINE WINDOW Form_1 AT 103 , 13 WIDTH 1169 HEIGHT 476 ;
    TITLE "Demo TRANSPARENCIES" MAIN BACKCOLOR MY_CYAN

    DEFINE LABEL Label_1
        ROW    40
        COL    60
        WIDTH  120
        HEIGHT 24
        VALUE "Label_1"
        FONTNAME "Arial"
        FONTSIZE 9
        TOOLTIP ""
        FONTBOLD .F.
        FONTITALIC .F.
        FONTUNDERLINE .F.
        FONTSTRIKEOUT .F.
        HELPID Nil
        VISIBLE .T.
        TRANSPARENT .T.
        ACTION Nil
        AUTOSIZE .F.
        BACKCOLOR MY_GREEN
        FONTCOLOR NIL
    END LABEL

    DEFINE LABEL Label_5
        ROW    40
        COL    330
        WIDTH  120
        HEIGHT 24
        VALUE "Label_5"
        FONTNAME "Arial"
        FONTSIZE 9
        TOOLTIP ""
        FONTBOLD .F.
        FONTITALIC .F.
        FONTUNDERLINE .F.
        FONTSTRIKEOUT .F.
        HELPID Nil
        VISIBLE .T.
        TRANSPARENT .F.
        ACTION Nil
        AUTOSIZE .F.
        BACKCOLOR MY_GREEN
        FONTCOLOR NIL
    END LABEL

    DEFINE BUTTON Button_2
        ROW    80
        COL    330
        WIDTH  100
        HEIGHT 28
        ACTION Nil
        CAPTION "Button_2"
        FONTNAME "Arial"
        FONTSIZE 9
        TOOLTIP ""
        FONTBOLD .F.
        FONTITALIC .F.
        FONTUNDERLINE .F.
        FONTSTRIKEOUT .F.
        ONGOTFOCUS Nil
        ONLOSTFOCUS Nil
        HELPID Nil
        FLAT .F.
        TABSTOP .T.
        VISIBLE .T.
        TRANSPARENT .F.
        MULTILINE .F.
        PICTURE Nil
        PICTALIGNMENT TOP
    END BUTTON

    DEFINE BUTTON Button_1
        ROW    80
        COL    60
        WIDTH  100
        HEIGHT 28
        ACTION Nil
        CAPTION "Button_1"
        FONTNAME "Arial"
        FONTSIZE 9
        TOOLTIP ""
        FONTBOLD .F.
        FONTITALIC .F.
        FONTUNDERLINE .F.
        FONTSTRIKEOUT .F.
        ONGOTFOCUS Nil
        ONLOSTFOCUS Nil
        HELPID Nil
        FLAT .F.
        TABSTOP .T.
        VISIBLE .T.
        TRANSPARENT .T.
        MULTILINE .F.
        PICTURE Nil
        PICTALIGNMENT TOP
    END BUTTON

    DEFINE CHECKBOX Check_1
        ROW    130
        COL    60
        WIDTH  100
        HEIGHT 28
        CAPTION "Check_1"
        VALUE .F.
        FONTNAME "Arial"
        FONTSIZE 9
        TOOLTIP ""
        ONCHANGE Nil
        ONGOTFOCUS Nil
        ONLOSTFOCUS Nil
        FONTBOLD .F.
        FONTITALIC .F.
        FONTUNDERLINE .F.
        FONTSTRIKEOUT .F.
        BACKCOLOR MY_GREEN
        FONTCOLOR NIL
        HELPID Nil
        TABSTOP .T.
        VISIBLE .T.
        TRANSPARENT .T.
    END CHECKBOX

    DEFINE CHECKBOX Check_4
        ROW    130
        COL    330
        WIDTH  100
        HEIGHT 28
        CAPTION "Check_4"
        VALUE .F.
        FONTNAME "Arial"
        FONTSIZE 9
        TOOLTIP ""
        ONCHANGE Nil
        ONGOTFOCUS Nil
        ONLOSTFOCUS Nil
        FONTBOLD .F.
        FONTITALIC .F.
        FONTUNDERLINE .F.
        FONTSTRIKEOUT .F.
        BACKCOLOR MY_GREEN
        FONTCOLOR NIL
        HELPID Nil
        TABSTOP .T.
        VISIBLE .T.
        TRANSPARENT .F.
    END CHECKBOX

    DEFINE CHECKBUTTON CheckBtn_1
        ROW    180
        COL    60
        WIDTH  100
        HEIGHT 28
        CAPTION "CheckBtn_1"
        VALUE .F.
        FONTNAME "Arial"
        FONTSIZE 9
        TOOLTIP ""
        ONCHANGE Nil
        ONGOTFOCUS Nil
        ONLOSTFOCUS Nil
        FONTBOLD .F.
        FONTITALIC .F.
        FONTUNDERLINE .F.
        FONTSTRIKEOUT .F.
        HELPID Nil
        TABSTOP .T.
        VISIBLE .T.
        PICTURE Nil
    END CHECKBUTTON

    DEFINE CHECKBUTTON CheckBtn_2
        ROW    170
        COL    330
        WIDTH  100
        HEIGHT 28
        CAPTION "CheckBtn_2"
        VALUE .F.
        FONTNAME "Arial"
        FONTSIZE 9
        TOOLTIP ""
        ONCHANGE Nil
        ONGOTFOCUS Nil
        ONLOSTFOCUS Nil
        FONTBOLD .F.
        FONTITALIC .F.
        FONTUNDERLINE .F.
        FONTSTRIKEOUT .F.
        HELPID Nil
        TABSTOP .T.
        VISIBLE .T.
        PICTURE Nil
    END CHECKBUTTON

    DEFINE SLIDER Slider_1
        ROW    240
        COL    60
        WIDTH  120
        HEIGHT 35
        RANGEMIN 1
        RANGEMAX 10
        VALUE 0
        TOOLTIP ""
        ONCHANGE Nil
        HELPID Nil
        TABSTOP .T.
        VISIBLE .T.
        BACKCOLOR MY_GREEN
    END SLIDER

    DEFINE SLIDER Slider_4
        ROW    220
        COL    330
        WIDTH  120
        HEIGHT 35
        RANGEMIN 1
        RANGEMAX 10
        VALUE 0
        TOOLTIP ""
        ONCHANGE Nil
        HELPID Nil
        TABSTOP .T.
        VISIBLE .T.
        BACKCOLOR MY_GREEN
    END SLIDER

    DEFINE RADIOGROUP RadioGroup_4
        ROW    280
        COL    330
        WIDTH  120
        HEIGHT 50
        OPTIONS { 'Option 1','Option 2'}
        VALUE 1
        FONTNAME "Arial"
        FONTSIZE 9
        TOOLTIP ""
        ONCHANGE Nil
        FONTBOLD .F.
        FONTITALIC .F.
        FONTUNDERLINE .F.
        FONTSTRIKEOUT .F.
        HELPID Nil
        TABSTOP .T.
        VISIBLE .T.
        TRANSPARENT .F.
        SPACING 25
        BACKCOLOR MY_GREEN
        FONTCOLOR NIL
        READONLY Nil
        HORIZONTAL .F. 
    END RADIOGROUP

    DEFINE FRAME Frame_3
        ROW    360
        COL    330
        WIDTH  130
        HEIGHT 60
        FONTNAME "Arial"
        FONTSIZE 9
        FONTBOLD .F.
        FONTITALIC .F.
        FONTUNDERLINE .F.
        FONTSTRIKEOUT .F.
        CAPTION "Frame_3"
        BACKCOLOR MY_GREEN
        FONTCOLOR NIL
        OPAQUE .T.
    END FRAME

    DEFINE TIMER Timer_1 INTERVAL 1000 ACTION {|| (Form_1.Label_1.Value := Time()) }
    DEFINE TIMER Timer_2 INTERVAL 1000 ACTION {|| (Form_1.Label_5.Value := Time()) }

    DEFINE RADIOGROUP RadioGroup_1
        ROW    290
        COL    70
        WIDTH  120
        HEIGHT 50
        OPTIONS { 'Option 1','Option 2'}
        VALUE 1
        FONTNAME "Arial"
        FONTSIZE 9
        TOOLTIP ""
        ONCHANGE Nil
        FONTBOLD .F.
        FONTITALIC .F.
        FONTUNDERLINE .F.
        FONTSTRIKEOUT .F.
        HELPID Nil
        TABSTOP .T.
        VISIBLE .T.
        TRANSPARENT .T.
        SPACING 25
        BACKCOLOR MY_GREEN
        FONTCOLOR NIL
        READONLY Nil
        HORIZONTAL .F. 
    END RADIOGROUP

    DEFINE FRAME Frame_1
        ROW    360
        COL    70
        WIDTH  140
        HEIGHT 70
        FONTNAME "Arial"
        FONTSIZE 9
        FONTBOLD .F.
        FONTITALIC .F.
        FONTUNDERLINE .F.
        FONTSTRIKEOUT .F.
        CAPTION "Frame_1"
        BACKCOLOR MY_GREEN
        FONTCOLOR NIL
        OPAQUE .F.
    END FRAME

    DEFINE TAB Tab_1 AT 10 , 480 WIDTH 330 HEIGHT 410 VALUE 1 FONT "Arial" SIZE 9 TOOLTIP "" ON CHANGE Nil

        PAGE "Transparent := .T."

            DEFINE LABEL Label_3
                ROW    60
                COL    20
                WIDTH  120
                HEIGHT 24
                VALUE "Label_3"
                FONTNAME "Arial"
                FONTSIZE 9
                TOOLTIP ""
                FONTBOLD .F.
                FONTITALIC .F.
                FONTUNDERLINE .F.
                FONTSTRIKEOUT .F.
                HELPID Nil
                VISIBLE .T.
                TRANSPARENT .T.
                ACTION Nil
                AUTOSIZE .F.
                BACKCOLOR MY_GREEN
                FONTCOLOR NIL
            END LABEL

            DEFINE TEXTBOX Text_2
                ROW    60
                COL    190
                WIDTH  120
                HEIGHT 24
                FONTNAME "Arial"
                FONTSIZE 9
                TOOLTIP ""
                ONCHANGE Nil
                ONGOTFOCUS Nil
                ONLOSTFOCUS Nil
                FONTBOLD .F.
                FONTITALIC .F.
                FONTUNDERLINE .F.
                FONTSTRIKEOUT .F.
                ONENTER Nil
                HELPID Nil
                TABSTOP .T.
                VISIBLE .T.
                READONLY .F.
                RIGHTALIGN .F.
                DISABLEDBACKCOLOR Nil
                DISABLEDFONTCOLOR Nil
                CASECONVERT NONE
                BACKCOLOR MY_GREEN
                FONTCOLOR NIL
                INPUTMASK Nil
                FORMAT Nil
                VALUE ""
            END TEXTBOX

            DEFINE SLIDER Slider_2
                ROW    120
                COL    20
                WIDTH  120
                HEIGHT 35
                RANGEMIN 1
                RANGEMAX 10
                VALUE 0
                TOOLTIP ""
                ONCHANGE Nil
                HELPID Nil
                TABSTOP .T.
                VISIBLE .T.
                BACKCOLOR MY_GREEN
            END SLIDER

            DEFINE RADIOGROUP RadioGroup_3
                ROW    160
                COL    30
                WIDTH  120
                HEIGHT 50
                OPTIONS { 'Option 1','Option 2'}
                VALUE 1
                FONTNAME "Arial"
                FONTSIZE 9
                TOOLTIP ""
                ONCHANGE Nil
                FONTBOLD .F.
                FONTITALIC .F.
                FONTUNDERLINE .F.
                FONTSTRIKEOUT .F.
                HELPID Nil
                TABSTOP .T.
                VISIBLE .T.
                TRANSPARENT .T.
                SPACING 25
                BACKCOLOR MY_GREEN
                FONTCOLOR NIL
                READONLY Nil
                HORIZONTAL .F. 
            END RADIOGROUP

            DEFINE CHECKBOX Check_2
                ROW    180
                COL    200
                WIDTH  100
                HEIGHT 28
                CAPTION "Check_2"
                VALUE .F.
                FONTNAME "Arial"
                FONTSIZE 9
                TOOLTIP ""
                ONCHANGE Nil
                ONGOTFOCUS Nil
                ONLOSTFOCUS Nil
                FONTBOLD .F.
                FONTITALIC .F.
                FONTUNDERLINE .F.
                FONTSTRIKEOUT .F.
                BACKCOLOR MY_GREEN
                FONTCOLOR NIL
                HELPID Nil
                TABSTOP .T.
                VISIBLE .T.
                TRANSPARENT .T.
            END CHECKBOX

            DEFINE FRAME Frame_2
                ROW    40
                COL    10
                WIDTH  310
                HEIGHT 340
                FONTNAME "Arial"
                FONTSIZE 9
                FONTBOLD .F.
                FONTITALIC .F.
                FONTUNDERLINE .F.
                FONTSTRIKEOUT .F.
                CAPTION "Frame_2"
                BACKCOLOR MY_GREEN
                FONTCOLOR NIL
                OPAQUE .T.
            END FRAME

            DEFINE BUTTON Button_3
                ROW    250
                COL    40
                WIDTH  100
                HEIGHT 28
                ACTION Nil
                CAPTION "Button_3"
                FONTNAME "Arial"
                FONTSIZE 9
                TOOLTIP ""
                FONTBOLD .F.
                FONTITALIC .F.
                FONTUNDERLINE .F.
                FONTSTRIKEOUT .F.
                ONGOTFOCUS Nil
                ONLOSTFOCUS Nil
                HELPID Nil
                FLAT .F.
                TABSTOP .T.
                VISIBLE .T.
                TRANSPARENT .T.
                MULTILINE .F.
                PICTURE Nil
                PICTALIGNMENT TOP
            END BUTTON

            DEFINE CHECKBUTTON CheckBtn_3
                ROW    250
                COL    190
                WIDTH  100
                HEIGHT 28
                CAPTION "CheckBtn_3"
                VALUE .F.
                FONTNAME "Arial"
                FONTSIZE 9
                TOOLTIP ""
                ONCHANGE Nil
                ONGOTFOCUS Nil
                ONLOSTFOCUS Nil
                FONTBOLD .F.
                FONTITALIC .F.
                FONTUNDERLINE .F.
                FONTSTRIKEOUT .F.
                HELPID Nil
                TABSTOP .T.
                VISIBLE .T.
                PICTURE Nil
            END CHECKBUTTON

        END PAGE 

        PAGE "Page 2"
        END PAGE 

    END TAB 

    DEFINE LABEL Label_7
        ROW    10
        COL    60
        WIDTH  120
        HEIGHT 24
        VALUE "Transparente := .T."
        FONTNAME "Arial"
        FONTSIZE 9
        TOOLTIP ""
        FONTBOLD .F.
        FONTITALIC .F.
        FONTUNDERLINE .F.
        FONTSTRIKEOUT .F.
        HELPID Nil
        VISIBLE .T.
        TRANSPARENT .T.
        ACTION Nil
        AUTOSIZE .F.
        BACKCOLOR MY_GREEN
        FONTCOLOR NIL
    END LABEL

    DEFINE LABEL Label_8
        ROW    10
        COL    330
        WIDTH  120
        HEIGHT 24
        VALUE "Transparent := .F."
        FONTNAME "Arial"
        FONTSIZE 9
        TOOLTIP ""
        FONTBOLD .F.
        FONTITALIC .F.
        FONTUNDERLINE .F.
        FONTSTRIKEOUT .F.
        HELPID Nil
        VISIBLE .T.
        TRANSPARENT .F.
        ACTION Nil
        AUTOSIZE .F.
        BACKCOLOR MY_GREEN
        FONTCOLOR NIL
    END LABEL

    DEFINE TAB Tab_2 AT 10 , 820 WIDTH 330 HEIGHT 400 VALUE 1 FONT "Arial" SIZE 9 TOOLTIP "" ON CHANGE Nil

        PAGE "Transparent := .F."

            DEFINE FRAME Frame_5
                ROW    20
                COL    20
                WIDTH  300
                HEIGHT 330
                FONTNAME "Arial"
                FONTSIZE 9
                FONTBOLD .F.
                FONTITALIC .F.
                FONTUNDERLINE .F.
                FONTSTRIKEOUT .F.
                CAPTION "Frame_5"
                BACKCOLOR MY_GREEN
                FONTCOLOR NIL
                OPAQUE .T.
            END FRAME

            DEFINE LABEL Label_4
                ROW    60
                COL    40
                WIDTH  120
                HEIGHT 24
                VALUE "Label_4"
                FONTNAME "Arial"
                FONTSIZE 9
                TOOLTIP ""
                FONTBOLD .F.
                FONTITALIC .F.
                FONTUNDERLINE .F.
                FONTSTRIKEOUT .F.
                HELPID Nil
                VISIBLE .T.
                TRANSPARENT .F.
                ACTION Nil
                AUTOSIZE .F.
                BACKCOLOR MY_GREEN
                FONTCOLOR NIL
            END LABEL
			
			DEFINE TEXTBOX Text_1
                ROW    60
                COL    190
                WIDTH  120
                HEIGHT 24
                FONTNAME "Arial"
                FONTSIZE 9
                TOOLTIP ""
                ONCHANGE Nil
                ONGOTFOCUS Nil
                ONLOSTFOCUS Nil
                FONTBOLD .F.
                FONTITALIC .F.
                FONTUNDERLINE .F.
                FONTSTRIKEOUT .F.
                ONENTER Nil
                HELPID Nil
                TABSTOP .T.
                VISIBLE .T.
                READONLY .F.
                RIGHTALIGN .F.
                DISABLEDBACKCOLOR Nil
                DISABLEDFONTCOLOR Nil
                CASECONVERT NONE
                BACKCOLOR MY_GREEN
                FONTCOLOR NIL
                INPUTMASK Nil
                FORMAT Nil
                VALUE ""
            END TEXTBOX

            DEFINE SLIDER Slider_5
                ROW    140
                COL    50
                WIDTH  120
                HEIGHT 35
                RANGEMIN 1
                RANGEMAX 10
                VALUE 0
                TOOLTIP ""
                ONCHANGE Nil
                HELPID Nil
                TABSTOP .T.
                VISIBLE .T.
                BACKCOLOR MY_GREEN
            END SLIDER

            DEFINE RADIOGROUP RadioGroup_5
                ROW    190
                COL    50
                WIDTH  120
                HEIGHT 50
                OPTIONS { 'Option 1','Option 2'}
                VALUE 1
                FONTNAME "Arial"
                FONTSIZE 9
                TOOLTIP ""
                ONCHANGE Nil
                FONTBOLD .F.
                FONTITALIC .F.
                FONTUNDERLINE .F.
                FONTSTRIKEOUT .F.
                HELPID Nil
                TABSTOP .T.
                VISIBLE .T.
                TRANSPARENT .F.
                SPACING 25
                BACKCOLOR MY_GREEN
                FONTCOLOR NIL
                READONLY Nil
                HORIZONTAL .F. 
            END RADIOGROUP

            DEFINE CHECKBOX Check_5
                ROW    200
                COL    190
                WIDTH  100
                HEIGHT 28
                CAPTION "Check_5"
                VALUE .F.
                FONTNAME "Arial"
                FONTSIZE 9
                TOOLTIP ""
                ONCHANGE Nil
                ONGOTFOCUS Nil
                ONLOSTFOCUS Nil
                FONTBOLD .F.
                FONTITALIC .F.
                FONTUNDERLINE .F.
                FONTSTRIKEOUT .F.
                BACKCOLOR MY_GREEN
                FONTCOLOR NIL
                HELPID Nil
                TABSTOP .T.
                VISIBLE .T.
                TRANSPARENT .F.
            END CHECKBOX

            DEFINE BUTTON Button_5
                ROW    310
                COL    40
                WIDTH  100
                HEIGHT 28
                ACTION Nil
                CAPTION "Button_5"
                FONTNAME "Arial"
                FONTSIZE 9
                TOOLTIP ""
                FONTBOLD .F.
                FONTITALIC .F.
                FONTUNDERLINE .F.
                FONTSTRIKEOUT .F.
                ONGOTFOCUS Nil
                ONLOSTFOCUS Nil
                HELPID Nil
                FLAT .F.
                TABSTOP .T.
                VISIBLE .T.
                TRANSPARENT .F.
                MULTILINE .F.
                PICTURE Nil
                PICTALIGNMENT TOP
            END BUTTON

            DEFINE CHECKBUTTON CheckBtn_5
                ROW    310
                COL    170
                WIDTH  100
                HEIGHT 28
                CAPTION "CheckBtn_5"
                VALUE .F.
                FONTNAME "Arial"
                FONTSIZE 9
                TOOLTIP ""
                ONCHANGE Nil
                ONGOTFOCUS Nil
                ONLOSTFOCUS Nil
                FONTBOLD .F.
                FONTITALIC .F.
                FONTUNDERLINE .F.
                FONTSTRIKEOUT .F.
                HELPID Nil
                TABSTOP .T.
                VISIBLE .T.
                PICTURE Nil
            END CHECKBUTTON

        END PAGE 

        PAGE "Page 2"
        END PAGE 

    END TAB 

END WINDOW
Form_1.Center
Form_1.Activate
Return Nil
I hope to be contributed to clarified in better way, of course with help of Javier. Thanks Javier !

So this is a pending matter, not replied from HMG Development Team. Please be so kind to comment it and observe "WRONG" tagged at some control on transparency deffect.

Thanks all for your attention,

B.Rgds
HMGing a better world
"Matter tells space how to curve, space tells matter how to move."
Albert Einstein
Top
Javier Tovar
Posts: 1275
Joined: Tue Sep 03, 2013 4:22 am
Location: Tecámac, México

Re: Transparent property not working properly

Post by Javier Tovar »

Ok Pablo César, Esta bien!!!

Saludos
Top
Post Reply

Return to “HMG Bug Reports”