Re: Colorear las PAGE
Posted: Tue Nov 15, 2016 7:52 pm
Hello Serge,serge_girard wrote:Hello Grigory,
On my W7 all is yellow?
You are right!
There is only one color for the all Tab's pages by design
Exclusive forum for HMG, a Free / Open Source xBase WIN32/64 Bits / GUI Development System
http://www.hmgforum.com/
Hello Serge,serge_girard wrote:Hello Grigory,
On my W7 all is yellow?
Code: Select all
#include "hmg.ch"
***********************************************
FUNCTION Main()
DEFINE WINDOW Form_1 AT 50,50 WIDTH 800 HEIGHT 500 NOMAXIMIZE NOSIZE TITLE "TAB with LABELS By AndyGlezL" MAIN
ON KEY ESCAPE OF FORM_1 ACTION Form_1.Release
// ******** TAB SIMULADO
@ 15,010 LABEL L0 PARENT Form_1 WIDTH 050 HEIGHT 020 VALUE "UNO" FONT "Verdana" SIZE 09 CENTERALIGN ;
FONTCOLOR BLACK BACKCOLOR { 102 , 255 , 204 } ACTION Form_1.L5.BACKCOLOR := Form_1.L0.BACKCOLOR
@ 15,061 LABEL L1 PARENT Form_1 WIDTH 050 HEIGHT 020 VALUE "DOS" FONT "Verdana" SIZE 09 CENTERALIGN ;
FONTCOLOR BLACK BACKCOLOR { 153 , 153 , 102 } ACTION Form_1.L5.BACKCOLOR := Form_1.L1.BACKCOLOR
@ 15,112 LABEL L2 PARENT Form_1 WIDTH 050 HEIGHT 020 VALUE "TRES" FONT "Verdana" SIZE 09 CENTERALIGN ;
FONTCOLOR BLACK BACKCOLOR { 255 , 153 , 153 } ACTION Form_1.L5.BACKCOLOR := Form_1.L2.BACKCOLOR
@ 15,163 LABEL L3 PARENT Form_1 WIDTH 050 HEIGHT 020 VALUE "CUATRO" FONT "Verdana" SIZE 09 CENTERALIGN ;
FONTCOLOR BLACK BACKCOLOR { 255 , 51 , 153 } ACTION Form_1.L5.BACKCOLOR := Form_1.L3.BACKCOLOR
@ 15,214 LABEL L4 PARENT Form_1 WIDTH 050 HEIGHT 020 VALUE "CINCO" FONT "Verdana" SIZE 09 CENTERALIGN ;
FONTCOLOR BLACK BACKCOLOR { 204 , 204 , 255 } ACTION Form_1.L5.BACKCOLOR := Form_1.L4.BACKCOLOR
@ 36,010 LABEL L5 PARENT Form_1 WIDTH 350 HEIGHT 200 VALUE "" FONT "Verdana" SIZE 09 ;
FONTCOLOR BLACK BACKCOLOR { 102 , 255 , 204 }
// ******** TAB SIMULADO
END WINDOW
CENTER WINDOW Form_1
ACTIVATE WINDOW Form_1
RETURN NIL
Hello Serge,serge_girard wrote:Hello Grigory,
On my W7 all is yellow?
WOW Grigory !gfilatov wrote:I've attached a new version of the colored Tab control for a next MiniguiEx build.
Hope that useful
+1mol wrote:Fine work, GRigorij!
Is it possible to have sucha a solution in HMG?