        Help on line  - Ajuda do Sistema:

        O Gerador de Sistemas Para FiveWin,  Muito Simples:
        Voc Somente Precisa Ter no  Diretrio de Trabalho,
        Um Banco de Dados Com os Campos Que Voc Deseja
        Criar o Mdulo do Programa(.PRG) e o Dialogo(Tela).

        <Click> no Boto: <Browse>, e Escolha o Diretrio,
        Onde Est o Banco de Dados(.DBF), Que Voc Deseja
        Gerar o Mdulo do Programa(.PRG) e o Dialogo(Tela).
        Depois de Escolher o Banco de Dados, <Click> no
        Boto: <Gerar>, Para Criar o Mdulo e o Dialogo.
        Lembrando Que  Obrigatrio, Que o BANCO de DADOS
        Esteja no Mesmo Diretrio em Que Est Instalado o
        Programa Gerador: GASFW.EXE. Em Contrrio, No
        Funcionar Corretamente a Criao do Aplicativo.
        Por Isso, Antes de Iniciar a Operao, COPIE Todos
        os Bancos de Dados Para o Diretrio do GASFW.EXE.

        No Boto: Caminhos(Path), Informe ao Programa, Onde
        Estao os Caminhos(Path) da Biblioteca do FIVEWIN,
        do Compilador [x]HARBOUR, e do Compilador BORLAND.
        Exemplos:
        Biblioteca do FIVEWIN: C:\FWH ou C:\FWH27 - Atente.

        Compilador [x]HARBOUR: C:\XHARBOUR      ou Onde Voc
        Instalou o Compilador: HARBOUR.EXE.

        Compilador BORLAND:    C:\BORLAND\BCC55 ou Onde Voc
        Instalou o Compilador Borland.  Preste Ateno.

        WORKSHOP.EXE - Gerador e Editor de Dialogos(Telas)
        Apos Gerar o Mdulo, o Programa Gera Automaticamente
        Um Arquivo no Formato .RC, Para Ve-lo ou Modific-lo
        <Click> no Boto: <WorkShop.Exe> Que o WorkShop.Exe
        Ir Edit-lo Para Que Voc Possa Ver ou Modificar.
        O GASFW.EXE, Gera o Dialogo(Tela) Com o Mesmo Nome
        do Banco de Dados Que Voc Escolheu Para Gerar o
        Mdulo do Programa(.PRG). Modifique a Gosto.
        Voc Obrigatoriamente, Precisa Ter Instalado o BRW
        BORLAND RESOURCES WORKSHOP no Diretrio Correto:
        C:\WORKSHOP\BIN\WORKSHOP.EXE

        No Boto: Compilar Mdulo, Voc Pode Testar se o
        Mdulo(.PRG)  Foi Gerado Corretamente, Desde Que
        Voc Tenha Informado os Caminhos(Path) Corretamente.
        Depois de Testado, Incorpore ao Seu Projeto.

        No Seu Diretrio de Trabalho, o Programa Gerar
        Automaticamente, um ARQUIVO.BAT Para Se Compilar o
        Mdulo(.PRG), Ex.: COMP.BAT / COMP.LNK.  Verifique!

        Gerar Tambm, Um Arquivo no FORMATO.RES Que Ser     
        Incorporado Pelo Compilador BORLAND ao Aplicativo.    
        Ento, Foram Gerados Dois Arquivos de Recursos:       
        Ex.: FERIADOS.RC e FERIADOS.RES - Verifique.          

        Agora Voc Est, Totalmente em 32 Bits.        

        Obrigado Por Usar o GASFW.EXE. All Right Reserved.

        Joo Santos - So Paulo - Brasil

        (11) 3106-2832 / 95150-7341 - kapiabafwh@gmail.com

        Abraos.

        Best Regards, saludos, saudaes a todos os Queridos amigos.

        http://www.fivewin.com.br
-

Exemplo de Relatorio Usando a Classe REPORT.PRG em C:\FWH\SOURCE\CLASSES

STATIC FUNCTION IMPRIMIR( lAppend, DbFornece, DeOndeVem )

    LOCAL oPen1, oPen2
    LOCAL oFon1, oFon2, oFon3, oFon4
    LOCAL oReport

    PUBLIC XDA, XNOMEEMP, XFANTASIA

    EXTERNAL ISPRINTER
    IF .NOT. ISPRINTER()
        SndPlaySound(".\Erro.wav" )
        CHECA_IMP() // Checar Se a Impressora Est Ativa..
        RETURN NIL
    ENDIF

    //-> Para Desenhar o BOX das Bordas e Colorir Como se Fosse Caneta(pen)
    DEFINE PEN oPen1 WIDTH 2 COLOR CLR_HBLUE
    DEFINE PEN oPen2 WIDTH 1 COLOR CLR_BLACK

    DEFINE FONT oFon1 NAME "Arial"       SIZE 0,-11
    DEFINE FONT oFon2 NAME "Arial"       SIZE 0,-11
    DEFINE FONT oFon3 NAME "COURIER NEW" SIZE 0, 11   // Para Imprimir MEMOS

    SELECT ( DbFornece:cAlias )
    DbFornece:SetOrder( 2 )    // Ordenado Pelo Nome do Fornecedor
    GO TOP

    REPORT oReport TITLE "LISTAGEM DOS FORNECEDORES" ;
        CAPTION "Catlogo: Fornecedores"             ;
        HEADER  "EMPRESA:- "+XNOMEEMP+" -",          ;
               "Data:  "+DToC(DATE()),               ;
              "Pgina: "+STR(oReport:nPage,3)        ;
        FOOTER "- FORNECEDORES -" CENTER             ;
        FONT oFon1, oFon2, oFon3                     ;
        PEN oPen1,  oPen2                            ;   // Tipo de linea a usar en Cabezera
        PREVIEW

        //-> Para o Preview Maximizar e Nao Ficar no Rodape do Windows
        oReport:oDevice:lPrvModal := .T.
        oReport:oDevice:SetPage(9)     //-> A4 //9

        COLUMN TITLE "CDIGO E NOME: " DATA ( DbFornece:cAlias )->MATRICULA  ;
                     +[ - ]+           ( DbFornece:cAlias )->RAZAO,    ;
                     +[CGC: ]+         ( DbFornece:cAlias )->CGC,      ;
                     +[FONES: ]+       ( DbFornece:cAlias )->TEL,      ;
                                       ( DbFornece:cAlias )->TEL2,     ;
                                       ( DbFornece:cAlias )->TEL3,     ;
                     +[CONTATO: ]+     ( DbFornece:cAlias )->CONTATO,  ;
                     +[FORNECE: ]+     ( DbFornece:cAlias )->PRODUTO    FONT 3

        COLUMN TITLE "ENDEREO: " DATA ( DbFornece:cAlias )->END,      ;
                                       ( DbFornece:cAlias )->BAI,      ;
                                       ( DbFornece:cAlias )->CID,      ;
                                       ( DbFornece:cAlias )->CEP,      ;
                     +[EMAIL: ]+       ( DbFornece:cAlias )->E_MAIL,   ;
                     +[HOME: ]+        ( DbFornece:cAlias )->HOMEPAGE, ;
               +[ULT. COMPRA: ]+( DTOC(( DbFornece:cAlias )->ULTCOMPRA) ) FONT 3

    END REPORT

    oReport:CellView()

    IF !oReport:lCreated
        RETURN NIL
    ENDIF

    /*
    Change some colors -> Trocar as Cores do Texto
    */
    oReport:SetTxtColor( CLR_BLACK, 1 )
    oReport:SetTxtColor( CLR_HRED,  2 )
    oReport:SetTxtColor( CLR_BLACK, 3 )

    ACTIVATE REPORT oReport ON INIT oReport:oTitle:aFont[1] := { || 2 }

    oPen1:End()
    oPen2:End()
    oFon1:End()
    oFon2:End()
    oFon3:End()

    GO TOP

RETURN NIL

//-----------------------------------------------------------------------------

FUNCTION CHECA_IMP()

    MsgStop( "Ateno:                            " + CRLF + ;
             "Sua Impressora No Esta Ligada!!!   " + CRLF + ;
             "Ou Voc No Tem Uma Impressora      " + CRLF + ;
             "Instalada na PASTA de Impressoras   " + CRLF + ;
             "do WINDOWS.            VERIFIQUE!!! " + CRLF + ;
             "Na Janela do WINDOWS: Boto Iniciar " + CRLF + ;
             "Configuraes - Impressoras.        " + CRLF + ;
             "Instale um DRIVE de Impressora.     " + CRLF + ;
             "TIPO: Epson LX-300 ou Outra...      " + CRLF + ;
             "Favor Verificar Para Poder Imprimir." + CRLF + ;
             "Se Errar, Tente Novamente...        ",         ;
             "Por Favor, Pare! Cad a Impressora? " )

RETURN NIL

-

Exemplo de LISTBOX:

    REDEFINE LISTBOX oLbx FIELDS                                        ;
             ( cAlias )->FE_DATA                                      , ;
             ( cAlias )->FE_DESCRIC                                   , ;
             ( cAlias )->FE_PROXUTI                                   , ;
             SPACE(01)                                                  ;
             HEADERS ( OemToAnsi( "DATA:         "   ) )              , ;
                     ( OemToAnsi( "DESCRICAO:    "   ) )              , ;
                     ( OemToAnsi( "DIA UTIL:     "   ) )              , ;
                     ( OemToAnsi( " - "              ) )                ;
             FIELDSIZES 090, 300, 090, 001                              ;
             COLOR CLR_BROWN, CLR_LGREEN                                ;
             CURSOR oCurDedo  FONT oFnt                                 ;
             UPDATE                                                     ;
             ON CHANGE ( CarFER(oLbx), lGuarda := .F., lEsAlta := .F.,  ;
                                       lEsModi := .F. )                 ;
             ID 1013 OF oDlg

    //-> Disparos Automticos na ListBox dos FERIADOs----------------------//
    oLbx:bKeyDown := { | nKey | FAZ_PESQUISA( nKey,                          ;
                            ( cAlias ), oLbx, oSay,                          ;
                              oLbx:Refresh(), oLbx:SetFocus() ),             ;
                         IF ( nKey = VK_RETURN,                              ;
                            ( "" ),                                          ;
                         IF ( nKey = VK_INSERT,                              ;
                            ( "" ),                                          ;
                         IF ( nKey = VK_DELETE,                              ;
                            ( "" ), ) ) ) }

    //---------------------------------------------------------------------
    oLbx:nClrBackHead  := CLR_LGREEN  // Cor do Fundo do Cabealho
    oLbx:nClrText      := { || nRGB( 165,  42,  42 ) }
    oLbx:nClrBackFocus := CLR_HRED    // Cor do Cursor Em Cima do tem
    oLbx:nClrForeFocus := CLR_AMARELO // cor da letra da barra ativa
    oLbx:nClrForeHead  := CLR_HRED    // Cor nos Headers - Cabealhos
    // Cor no Pano de Fundo da Browse() Listbox-Legal - abaixo o comando
    oLbx:nClrPane      := { || IIF( ( oLbx:cAlias )->( OrdKeyNo() ) %2 == 0, ;
                               CLR_LGREEN, CLR_LGRAY ) }
    oLbx:nColAct    := 2 //-> Onde o Cursor Vai Iniciar qual coluna?
    oLbx:nLineStyle    := 3           // Estilo das linhas nos dados da Browse
    oLbx:lCellStyle    := .T.         // S Pinta a celula que o cursor est
    // Justifica As Colunas dos Campos Esq. .T. = Centro
    oLbx:aJustify      := { .T., .F., .T., .F., .F., .F., .F., .F., .F. }
    oLbx:lMChange      := .F.         // Desabilita Mousemove
    oLbx:SetFocus()                   // Refocus on The Browse
    oLbx:Refresh()                    // Estabiliza o Browse/Listbox
                                      // ( Pinta os Dados Novamente )

-

// Pesquisa Incremental - Exemplo
Static Function Faz_Pesquisa( nKey, Alias, oSay, oLbx )

    Local nOldPos := ( Alias )->( Recno() )

    Memvar cPesq

    cPesq := ""

    // Backspace Para Apagar Caracteres Digitados
    If nKey==VK_BACK

        If Len(cPesq) > 0
            cPesq:=Left(cPesq,Len(cPesq)-1)
         Else
            Tone(500,1)
            Return(.F.)
        Endif

    Endif

    If ( nKey >=  32   .And. ;
         nKey <= 255 ) .Or.  ;
         nKey=VK_BACK

        If nKey!=VK_BACK

            cPesq+=UPPER(Chr(nKey))

        Endif

        If !(Alias)->(DbSeek(cPesq))

            cPesq := Left( cPesq, Len( cPesq ) -1 )
            DbGoto( nOldPos )
            SndPlaySound(".\Erro.wav" )
            Return( .F. )

        Endif

    Endif

    If oSay!=Nil

        oSay:cTitle(cPesq) // Mostra o que foi digitado

    Endif

Return( .T. )

-

// ***************Modelos de Cores Para Seus Programas**************** //

#DEFINE CLR_Snow                RGB(255, 250, 250)    //   #FFFAFA    Snow
#DEFINE CLR_GhostWhite          RGB(248, 248, 255)    //   #F8F8FF    GhostWhite
#DEFINE CLR_WhiteSmoke          RGB(245, 245, 245)    //   #F5F5F5    WhiteSmoke
#DEFINE CLR_Gainsboro           RGB(220, 220, 220)    //   #DCDCDC    Gainsboro
#DEFINE CLR_FloralWhite         RGB(255, 250, 240)    //   #FFFAF0    FloralWhite
#DEFINE CLR_OldLace             RGB(253, 245, 230)    //   #FDF5E6    OldLace
#DEFINE CLR_Linen               RGB(250, 240, 230)    //   #FAF0E6    Linen
#DEFINE CLR_AntiqueWhite        RGB(250, 235, 215)    //   #FAEBD7    AntiqueWhite
#DEFINE CLR_PapayaWhip          RGB(255, 239, 213)    //   #FFEFD5    PapayaWhip
#DEFINE CLR_BlanchedAlmond      RGB(255, 235, 205)    //   #FFEBCD    BlanchedAlmond
#DEFINE CLR_Bisque              RGB(255, 228, 196)    //   #FFE4C4    Bisque
#DEFINE CLR_PeachPuff           RGB(255, 218, 185)    //   #FFDAB9    PeachPuff
#DEFINE CLR_NavajoWhite         RGB(255, 222, 173)    //   #FFDEAD    NavajoWhite
#DEFINE CLR_Moccasin            RGB(255, 228, 181)    //   #FFE4B5    Moccasin
#DEFINE CLR_Cornsilk            RGB(255, 248, 220)    //   #FFF8DC    Cornsilk
#DEFINE CLR_Ivory               RGB(255, 255, 240)    //   #FFFFF0    Ivory
#DEFINE CLR_LemonChiffon        RGB(255, 250, 205)    //   #FFFACD    LemonChiffon
#DEFINE CLR_Seashell            RGB(255, 245, 238)    //   #FFF5EE    Seashell
#DEFINE CLR_Honeydew            RGB(240, 255, 240)    //   #F0FFF0    Honeydew
#DEFINE CLR_MintCream           RGB(245, 255, 250)    //   #F5FFFA    MintCream
#DEFINE CLR_Azure               RGB(240, 255, 255)    //   #F0FFFF    Azure
#DEFINE CLR_AliceBlue           RGB(240, 248, 255)    //   #F0F8FF    AliceBlue
#DEFINE CLR_lavender            RGB(230, 230, 250)    //   #E6E6FA    lavender
#DEFINE CLR_LavenderBlush       RGB(255, 240, 245)    //   #FFF0F5    LavenderBlush
#DEFINE CLR_MistyRose           RGB(255, 228, 225)    //   #FFE4E1    MistyRose
#DEFINE CLR_White               RGB(255, 255, 255)    //   #FFFFFF    White
#DEFINE CLR_Black               RGB(  0,   0,   0)    //   #000000    Black
#DEFINE CLR_DarkSlateGray       RGB( 47,  79,  79)    //   #2F4F4F    DarkSlateGray
#DEFINE CLR_DimGrey             RGB(105, 105, 105)    //   #696969    DimGrey
#DEFINE CLR_SlateGrey           RGB(112, 128, 144)    //   #708090    SlateGrey
#DEFINE CLR_LightSlateGray      RGB(119, 136, 153)    //   #778899    LightSlateGray
#DEFINE CLR_Grey                RGB(190, 190, 190)    //   #BEBEBE    Grey
#DEFINE CLR_LightGray           RGB(211, 211, 211)    //   #D3D3D3    LightGray
#DEFINE CLR_MidnightBlue        RGB( 25,  25, 112)    //   #191970    MidnightBlue
#DEFINE CLR_NavyBlue            RGB(  0,   0, 128)    //   #000080    NavyBlue
#DEFINE CLR_CornflowerBlue      RGB(100, 149, 237)    //   #6495ED    CornflowerBlue
#DEFINE CLR_DarkSlateBlue       RGB( 72,  61, 139)    //   #483D8B    DarkSlateBlue
#DEFINE CLR_SlateBlue           RGB(106,  90, 205)    //   #6A5ACD    SlateBlue
#DEFINE CLR_MediumSlateBlue     RGB(123, 104, 238)    //   #7B68EE    MediumSlateBlue
#DEFINE CLR_LightSlateBlue      RGB(132, 112, 255)    //   #8470FF    LightSlateBlue
#DEFINE CLR_MediumBlue          RGB(  0,   0, 205)    //   #0000CD    MediumBlue
#DEFINE CLR_RoyalBlue           RGB( 65, 105, 225)    //   #4169E1    RoyalBlue
#DEFINE CLR_Blue                RGB(  0,   0, 255)    //   #0000FF    Blue
#DEFINE CLR_DodgerBlue          RGB( 30, 144, 255)    //   #1E90FF    DodgerBlue
#DEFINE CLR_DeepSkyBlue         RGB(  0, 191, 255)    //   #00BFFF    DeepSkyBlue
#DEFINE CLR_SkyBlue             RGB(135, 206, 235)    //   #87CEEB    SkyBlue
#DEFINE CLR_LightSkyBlue        RGB(135, 206, 250)    //   #87CEFA    LightSkyBlue
#DEFINE CLR_SteelBlue           RGB( 70, 130, 180)    //   #4682B4    SteelBlue
#DEFINE CLR_LightSteelBlue      RGB(176, 196, 222)    //   #B0C4DE    LightSteelBlue
#DEFINE CLR_LightBlue           RGB(173, 216, 230)    //   #ADD8E6    LightBlue
#DEFINE CLR_PowderBlue          RGB(176, 224, 230)    //   #B0E0E6    PowderBlue
#DEFINE CLR_PaleTurquoise       RGB(175, 238, 238)    //   #AFEEEE    PaleTurquoise
#DEFINE CLR_DarkTurquoise       RGB(  0, 206, 209)    //   #00CED1    DarkTurquoise
#DEFINE CLR_MediumTurquoise     RGB( 72, 209, 204)    //   #48D1CC    MediumTurquoise
#DEFINE CLR_Turquoise           RGB( 64, 224, 208)    //   #40E0D0    Turquoise
#DEFINE CLR_Cyan                RGB(  0, 255, 255)    //   #00FFFF    Cyan
#DEFINE CLR_LightCyan           RGB(224, 255, 255)    //   #E0FFFF    LightCyan
#DEFINE CLR_CadetBlue           RGB( 95, 158, 160)    //   #5F9EA0    CadetBlue
#DEFINE CLR_MediumAquamarine    RGB(102, 205, 170)    //   #66CDAA    MediumAquamarine
#DEFINE CLR_Aquamarine          RGB(127, 255, 212)    //   #7FFFD4    Aquamarine
#DEFINE CLR_DarkGreen           RGB(  0, 100,   0)    //   #006400    DarkGreen
#DEFINE CLR_DarkOliveGreen      RGB( 85, 107,  47)    //   #556B2F    DarkOliveGreen
#DEFINE CLR_DarkSeaGreen        RGB(143, 188, 143)    //   #8FBC8F    DarkSeaGreen
#DEFINE CLR_SeaGreen            RGB( 46, 139,  87)    //   #2E8B57    SeaGreen
#DEFINE CLR_MediumSeaGreen      RGB( 60, 179, 113)    //   #3CB371    MediumSeaGreen
#DEFINE CLR_LightSeaGreen       RGB( 32, 178, 170)    //   #20B2AA    LightSeaGreen
#DEFINE CLR_PaleGreen           RGB(152, 251, 152)    //   #98FB98    PaleGreen
#DEFINE CLR_SpringGreen         RGB(  0, 255, 127)    //   #00FF7F    SpringGreen
#DEFINE CLR_LawnGreen           RGB(124, 252,   0)    //   #7CFC00    LawnGreen
#DEFINE CLR_Green               RGB(  0, 255,   0)    //   #00FF00    Green
#DEFINE CLR_Chartreuse          RGB(127, 255,   0)    //   #7FFF00    Chartreuse
#DEFINE CLR_MedSpringGreen      RGB(  0, 250, 154)    //   #00FA9A    MedSpringGreen
#DEFINE CLR_GreenYellow         RGB(173, 255,  47)    //   #ADFF2F    GreenYellow
#DEFINE CLR_LimeGreen           RGB( 50, 205,  50)    //   #32CD32    LimeGreen
#DEFINE CLR_YellowGreen         RGB(154, 205,  50)    //   #9ACD32    YellowGreen
#DEFINE CLR_ForestGreen         RGB( 34, 139,  34)    //   #228B22    ForestGreen
#DEFINE CLR_OliveDrab           RGB(107, 142,  35)    //   #6B8E23    OliveDrab
#DEFINE CLR_DarkKhaki           RGB(189, 183, 107)    //   #BDB76B    DarkKhaki
#DEFINE CLR_PaleGoldenrod       RGB(238, 232, 170)    //   #EEE8AA    PaleGoldenrod
#DEFINE CLR_LtGoldenrodYello    RGB(250, 250, 210)    //   #FAFAD2    LtGoldenrodYello
#DEFINE CLR_LightYellow         RGB(255, 255, 224)    //   #FFFFE0    LightYellow
#DEFINE CLR_Yellow              RGB(255, 255,   0)    //   #FFFF00    Yellow
#DEFINE CLR_Gold                RGB(255, 215,   0)    //   #FFD700    Gold
#DEFINE CLR_LightGoldenrod      RGB(238, 221, 130)    //   #EEDD82    LightGoldenrod
#DEFINE CLR_goldenrod           RGB(218, 165,  32)    //   #DAA520    goldenrod
#DEFINE CLR_DarkGoldenrod       RGB(184, 134,  11)    //   #B8860B    DarkGoldenrod
#DEFINE CLR_RosyBrown           RGB(188, 143, 143)    //   #BC8F8F    RosyBrown
#DEFINE CLR_IndianRed           RGB(205,  92,  92)    //   #CD5C5C    IndianRed
#DEFINE CLR_SaddleBrown         RGB(139,   6,9 19)    //   #8B4513    SaddleBrown
#DEFINE CLR_Sienna              RGB(160,   8,2 45)    //   #A0522D    Sienna
#DEFINE CLR_Peru                RGB(205,  13,3 63)    //   #CD853F    Peru
#DEFINE CLR_Burlywood           RGB(222, 184, 135)    //   #DEB887    Burlywood
#DEFINE CLR_Beige               RGB(245, 245, 220)    //   #F5F5DC    Beige
#DEFINE CLR_Wheat               RGB(245, 222, 179)    //   #F5DEB3    Wheat
#DEFINE CLR_SandyBrown          RGB(244, 164,  96)    //   #F4A460    SandyBrown
#DEFINE CLR_Tan                 RGB(210, 180, 140)    //   #D2B48C    Tan
#DEFINE CLR_Chocolate           RGB(210, 105,  30)    //   #D2691E    Chocolate
#DEFINE CLR_Firebrick           RGB(178,  34,  34)    //   #B22222    Firebrick
#DEFINE CLR_Brown               RGB(165,  42,  42)    //   #A52A2A    Brown
#DEFINE CLR_DarkSalmon          RGB(233, 150, 122)    //   #E9967A    DarkSalmon
#DEFINE CLR_Salmon              RGB(250, 128, 114)    //   #FA8072    Salmon
#DEFINE CLR_LightSalmon         RGB(255, 160, 122)    //   #FFA07A    LightSalmon
#DEFINE CLR_Orange              RGB(255, 165,   0)    //   #FFA500    Orange
#DEFINE CLR_DarkOrange          RGB(255, 140,   0)    //   #FF8C00    DarkOrange
#DEFINE CLR_Coral               RGB(255, 127,  80)    //   #FF7F50    Coral
#DEFINE CLR_LightCoral          RGB(240, 128, 128)    //   #F08080    LightCoral
#DEFINE CLR_Tomato              RGB(255,  99,  71)    //   #FF6347    Tomato
#DEFINE CLR_OrangeRed           RGB(255,  69,   0)    //   #FF4500    OrangeRed
#DEFINE CLR_Red                 RGB(255,   0,   0)    //   #FF0000    Red
#DEFINE CLR_HotPink             RGB(255, 105, 180)    //   #FF69B4    HotPink
#DEFINE CLR_DeepPink            RGB(255,  20, 147)    //   #FF1493    DeepPink
#DEFINE CLR_Pink                RGB(255, 192, 203)    //   #FFC0CB    Pink
#DEFINE CLR_LightPink           RGB(255, 182, 193)    //   #FFB6C1    LightPink
#DEFINE CLR_PaleVioletRed       RGB(219, 112, 147)    //   #DB7093    PaleVioletRed
#DEFINE CLR_Maroon              RGB(176,  48,  96)    //   #B03060    Maroon
#DEFINE CLR_MediumVioletRed     RGB(199,  21, 133)    //   #C71585    MediumVioletRed
#DEFINE CLR_VioletRed           RGB(208,  32, 144)    //   #D02090    VioletRed
#DEFINE CLR_Magenta             RGB(255,   0, 255)    //   #FF00FF    Magenta
#DEFINE CLR_Violet              RGB(238, 130, 238)    //   #EE82EE    Violet
#DEFINE CLR_Plum                RGB(221, 160, 221)    //   #DDA0DD    Plum
#DEFINE CLR_Orchid              RGB(218, 112, 214)    //   #DA70D6    Orchid
#DEFINE CLR_MediumOrchid        RGB(186,  85, 211)    //   #BA55D3    MediumOrchid
#DEFINE CLR_DarkOrchid          RGB(153,  50, 204)    //   #9932CC    DarkOrchid
#DEFINE CLR_DarkViolet          RGB(148,   0, 211)    //   #9400D3    DarkViolet
#DEFINE CLR_BlueViolet          RGB(138,  43, 226)    //   #8A2BE2    BlueViolet
#DEFINE CLR_Purple              RGB(160,  32, 240)    //   #A020F0    Purple
#DEFINE CLR_MediumPurple        RGB(147, 112, 219)    //   #9370DB    MediumPurple
#DEFINE CLR_Thistle             RGB(216, 191, 216)    //   #D8BFD8    Thistle
#DEFINE CLR_Snow1               RGB(255, 250, 250)    //   #FFFAFA    Snow1
#DEFINE CLR_Snow2               RGB(238, 233, 233)    //   #EEE9E9    Snow2
#DEFINE CLR_Snow3               RGB(205, 201, 201)    //   #CDC9C9    Snow3
#DEFINE CLR_Snow4               RGB(139, 137, 137)    //   #8B8989    Snow4
#DEFINE CLR_Seashell1           RGB(255, 245, 238)    //   #FFF5EE    Seashell1
#DEFINE CLR_Seashell2           RGB(238, 229, 222)    //   #EEE5DE    Seashell2
#DEFINE CLR_Seashell3           RGB(205, 197, 191)    //   #CDC5BF    Seashell3
#DEFINE CLR_Seashell4           RGB(139, 134, 130)    //   #8B8682    Seashell4
#DEFINE CLR_AntiqueWhite1       RGB(255, 239, 219)    //   #FFEFDB    AntiqueWhite1
#DEFINE CLR_AntiqueWhite2       RGB(238, 223, 204)    //   #EEDFCC    AntiqueWhite2
#DEFINE CLR_AntiqueWhite3       RGB(205, 192, 176)    //   #CDC0B0    AntiqueWhite3
#DEFINE CLR_AntiqueWhite4       RGB(139, 131, 120)    //   #8B8378    AntiqueWhite4
#DEFINE CLR_Bisque1             RGB(255, 228, 196)    //   #FFE4C4    Bisque1
#DEFINE CLR_Bisque2             RGB(238, 213, 183)    //   #EED5B7    Bisque2
#DEFINE CLR_Bisque3             RGB(205, 183, 158)    //   #CDB79E    Bisque3
#DEFINE CLR_Bisque4             RGB(139, 125, 107)    //   #8B7D6B    Bisque4
#DEFINE CLR_PeachPuff1          RGB(255, 218, 185)    //   #FFDAB9    PeachPuff1
#DEFINE CLR_PeachPuff2          RGB(238, 203, 173)    //   #EECBAD    PeachPuff2
#DEFINE CLR_PeachPuff3          RGB(205, 175, 149)    //   #CDAF95    PeachPuff3
#DEFINE CLR_PeachPuff4          RGB(139, 119, 101)    //   #8B7765    PeachPuff4
#DEFINE CLR_NavajoWhite1        RGB(255, 222, 173)    //   #FFDEAD    NavajoWhite1
#DEFINE CLR_NavajoWhite2        RGB(238, 207, 161)    //   #EECFA1    NavajoWhite2
#DEFINE CLR_NavajoWhite3        RGB(205, 179, 139)    //   #CDB38B    NavajoWhite3
#DEFINE CLR_NavajoWhite4        RGB(139, 121, 94 )    //   #8B795E    NavajoWhite4
#DEFINE CLR_LemonChiffon1       RGB(255, 250, 205)    //   #FFFACD    LemonChiffon1
#DEFINE CLR_LemonChiffon2       RGB(238, 233, 191)    //   #EEE9BF    LemonChiffon2
#DEFINE CLR_LemonChiffon3       RGB(205, 201, 165)    //   #CDC9A5    LemonChiffon3
#DEFINE CLR_LemonChiffon4       RGB(139, 137, 112)    //   #8B8970    LemonChiffon4
#DEFINE CLR_Cornsilk1           RGB(255, 248, 220)    //   #FFF8DC    Cornsilk1
#DEFINE CLR_Cornsilk2           RGB(238, 232, 205)    //   #EEE8CD    Cornsilk2
#DEFINE CLR_Cornsilk3           RGB(205, 200, 177)    //   #CDC8B1    Cornsilk3
#DEFINE CLR_Cornsilk4           RGB(139, 136, 120)    //   #8B8878    Cornsilk4
#DEFINE CLR_Ivory1              RGB(255, 255, 240)    //   #FFFFF0    Ivory1
#DEFINE CLR_Ivory2              RGB(238, 238, 224)    //   #EEEEE0    Ivory2
#DEFINE CLR_Ivory3              RGB(205, 205, 193)    //   #CDCDC1    Ivory3
#DEFINE CLR_Ivory4              RGB(139, 139, 131)    //   #8B8B83    Ivory4
#DEFINE CLR_Honeydew1           RGB(240, 255, 240)    //   #F0FFF0    Honeydew1
#DEFINE CLR_Honeydew2           RGB(224, 238, 224)    //   #E0EEE0    Honeydew2
#DEFINE CLR_Honeydew3           RGB(193, 205, 193)    //   #C1CDC1    Honeydew3
#DEFINE CLR_Honeydew4           RGB(131, 139, 131)    //   #838B83    Honeydew4
#DEFINE CLR_LavenderBlush1      RGB(255, 240, 245)    //   #FFF0F5    LavenderBlush1
#DEFINE CLR_LavenderBlush2      RGB(238, 224, 229)    //   #EEE0E5    LavenderBlush2
#DEFINE CLR_LavenderBlush3      RGB(205, 193, 197)    //   #CDC1C5    LavenderBlush3
#DEFINE CLR_LavenderBlush4      RGB(139, 131, 134)    //   #8B8386    LavenderBlush4
#DEFINE CLR_MistyRose1          RGB(255, 228, 225)    //   #FFE4E1    MistyRose1
#DEFINE CLR_MistyRose2          RGB(238, 213, 210)    //   #EED5D2    MistyRose2
#DEFINE CLR_MistyRose3          RGB(205, 183, 181)    //   #CDB7B5    MistyRose3
#DEFINE CLR_MistyRose4          RGB(139, 125, 123)    //   #8B7D7B    MistyRose4
#DEFINE CLR_Azure1              RGB(240, 255, 255)    //   #F0FFFF    Azure1
#DEFINE CLR_Azure2              RGB(224, 238, 238)    //   #E0EEEE    Azure2
#DEFINE CLR_Azure3              RGB(193, 205, 205)    //   #C1CDCD    Azure3
#DEFINE CLR_Azure4              RGB(131, 139, 139)    //   #838B8B    Azure4
#DEFINE CLR_SlateBlue1          RGB(131, 111, 255)    //   #836FFF    SlateBlue1
#DEFINE CLR_SlateBlue2          RGB(122, 103, 238)    //   #7A67EE    SlateBlue2
#DEFINE CLR_SlateBlue3          RGB(105,  89, 205)    //   #6959CD    SlateBlue3
#DEFINE CLR_SlateBlue4          RGB( 71,  60, 139)    //   #473C8B    SlateBlue4
#DEFINE CLR_RoyalBlue1          RGB( 72, 118, 255)    //   #4876FF    RoyalBlue1
#DEFINE CLR_RoyalBlue2          RGB( 67, 110, 238)    //   #436EEE    RoyalBlue2
#DEFINE CLR_RoyalBlue3          RGB( 58,  95, 205)    //   #3A5FCD    RoyalBlue3
#DEFINE CLR_RoyalBlue4          RGB( 39,  64, 139)    //   #27408B    RoyalBlue4
#DEFINE CLR_Blue1               RGB(  0,   0, 255)    //   #0000FF    Blue1
#DEFINE CLR_Blue2               RGB(  0,   0, 238)    //   #0000EE    Blue2
#DEFINE CLR_Blue3               RGB(  0,   0, 205)    //   #0000CD    Blue3
#DEFINE CLR_Blue4               RGB(  0,   0, 139)    //   #00008B    Blue4
#DEFINE CLR_DodgerBlue1         RGB( 30, 144, 255)    //   #1E90FF    DodgerBlue1
#DEFINE CLR_DodgerBlue2         RGB( 28, 134, 238)    //   #1C86EE    DodgerBlue2
#DEFINE CLR_DodgerBlue3         RGB( 24, 116, 205)    //   #1874CD    DodgerBlue3
#DEFINE CLR_DodgerBlue4         RGB( 16,  78, 139)    //   #104E8B    DodgerBlue4
#DEFINE CLR_SteelBlue1          RGB( 99, 184, 255)    //   #63B8FF    SteelBlue1
#DEFINE CLR_SteelBlue2          RGB( 92, 172, 238)    //   #5CACEE    SteelBlue2
#DEFINE CLR_SteelBlue3          RGB( 79, 148, 205)    //   #4F94CD    SteelBlue3
#DEFINE CLR_SteelBlue4          RGB( 54, 100, 139)    //   #36648B    SteelBlue4
#DEFINE CLR_DeepSkyBlue1        RGB(  0, 191, 255)    //   #00BFFF    DeepSkyBlue1
#DEFINE CLR_DeepSkyBlue2        RGB(  0, 178, 238)    //   #00B2EE    DeepSkyBlue2
#DEFINE CLR_DeepSkyBlue3        RGB(  0, 154, 205)    //   #009ACD    DeepSkyBlue3
#DEFINE CLR_DeepSkyBlue4        RGB(  0, 104, 139)    //   #00688B    DeepSkyBlue4
#DEFINE CLR_SkyBlue1            RGB(135, 206, 255)    //   #87CEFF    SkyBlue1
#DEFINE CLR_SkyBlue2            RGB(126, 192, 238)    //   #7EC0EE    SkyBlue2
#DEFINE CLR_SkyBlue3            RGB(108, 166, 205)    //   #6CA6CD    SkyBlue3
#DEFINE CLR_SkyBlue4            RGB( 74, 112, 139)    //   #4A708B    SkyBlue4
#DEFINE CLR_LightSkyBlue1       RGB(176, 226, 255)    //   #B0E2FF    LightSkyBlue1
#DEFINE CLR_LightSkyBlue2       RGB(164, 211, 238)    //   #A4D3EE    LightSkyBlue2
#DEFINE CLR_LightSkyBlue3       RGB(141, 182, 205)    //   #8DB6CD    LightSkyBlue3
#DEFINE CLR_LightSkyBlue4       RGB( 96, 123, 139)    //   #607B8B    LightSkyBlue4
#DEFINE CLR_SlateGray1          RGB(198, 226, 255)    //   #C6E2FF    SlateGray1
#DEFINE CLR_SlateGray2          RGB(185, 211, 238)    //   #B9D3EE    SlateGray2
#DEFINE CLR_SlateGray3          RGB(159, 182, 205)    //   #9FB6CD    SlateGray3
#DEFINE CLR_SlateGray4          RGB(108, 123, 139)    //   #6C7B8B    SlateGray4
#DEFINE CLR_LightSteelBlue1     RGB(202, 225, 255)    //   #CAE1FF    LightSteelBlue1
#DEFINE CLR_LightSteelBlue2     RGB(188, 210, 238)    //   #BCD2EE    LightSteelBlue2
#DEFINE CLR_LightSteelBlue3     RGB(162, 181, 205)    //   #A2B5CD    LightSteelBlue3
#DEFINE CLR_LightSteelBlue4     RGB(110, 123, 139)    //   #6E7B8B    LightSteelBlue4
#DEFINE CLR_LightBlue1          RGB(191, 239, 255)    //   #BFEFFF    LightBlue1
#DEFINE CLR_LightBlue2          RGB(178, 223, 238)    //   #B2DFEE    LightBlue2
#DEFINE CLR_LightBlue3          RGB(154, 192, 205)    //   #9AC0CD    LightBlue3
#DEFINE CLR_LightBlue4          RGB(104, 131, 139)    //   #68838B    LightBlue4
#DEFINE CLR_LightCyan1          RGB(224, 255, 255)    //   #E0FFFF    LightCyan1
#DEFINE CLR_LightCyan2          RGB(209, 238, 238)    //   #D1EEEE    LightCyan2
#DEFINE CLR_LightCyan3          RGB(180, 205, 205)    //   #B4CDCD    LightCyan3
#DEFINE CLR_LightCyan4          RGB(122, 139, 139)    //   #7A8B8B    LightCyan4
#DEFINE CLR_PaleTurquoise1      RGB(187, 255, 255)    //   #BBFFFF    PaleTurquoise1
#DEFINE CLR_PaleTurquoise2      RGB(174, 238, 238)    //   #AEEEEE    PaleTurquoise2
#DEFINE CLR_PaleTurquoise3      RGB(150, 205, 205)    //   #96CDCD    PaleTurquoise3
#DEFINE CLR_PaleTurquoise4      RGB(102, 139, 139)    //   #668B8B    PaleTurquoise4
#DEFINE CLR_CadetBlue1          RGB(152, 245, 255)    //   #98F5FF    CadetBlue1
#DEFINE CLR_CadetBlue2          RGB(142, 229, 238)    //   #8EE5EE    CadetBlue2
#DEFINE CLR_CadetBlue3          RGB(122, 197, 205)    //   #7AC5CD    CadetBlue3
#DEFINE CLR_CadetBlue4          RGB( 83, 134, 139)    //   #53868B    CadetBlue4
#DEFINE CLR_Turquoise1          RGB(  0, 245, 255)    //   #00F5FF    Turquoise1
#DEFINE CLR_Turquoise2          RGB(  0, 229, 238)    //   #00E5EE    Turquoise2
#DEFINE CLR_Turquoise3          RGB(  0, 197, 205)    //   #00C5CD    Turquoise3
#DEFINE CLR_Turquoise4          RGB(  0, 134, 139)    //   #00868B    Turquoise4
#DEFINE CLR_Cyan1               RGB(  0, 255, 255)    //   #00FFFF    Cyan1
#DEFINE CLR_Cyan2               RGB(  0, 238, 238)    //   #00EEEE    Cyan2
#DEFINE CLR_Cyan3               RGB(  0, 205, 205)    //   #00CDCD    Cyan3
#DEFINE CLR_Cyan4               RGB(  0, 139, 139)    //   #008B8B    Cyan4
#DEFINE CLR_DarkSlateGray1      RGB(151, 255, 255)    //   #97FFFF    DarkSlateGray1
#DEFINE CLR_DarkSlateGray2      RGB(141, 238, 238)    //   #8DEEEE    DarkSlateGray2
#DEFINE CLR_DarkSlateGray3      RGB(121, 205, 205)    //   #79CDCD    DarkSlateGray3
#DEFINE CLR_DarkSlateGray4      RGB( 82, 139, 139)    //   #528B8B    DarkSlateGray4
#DEFINE CLR_Aquamarine1         RGB(127, 255, 212)    //   #7FFFD4    Aquamarine1
#DEFINE CLR_Aquamarine2         RGB(118, 238, 198)    //   #76EEC6    Aquamarine2
#DEFINE CLR_Aquamarine3         RGB(102, 205, 170)    //   #66CDAA    Aquamarine3
#DEFINE CLR_Aquamarine4         RGB( 69, 139, 116)    //   #458B74    Aquamarine4
#DEFINE CLR_DarkSeaGreen1       RGB(193, 255, 193)    //   #C1FFC1    DarkSeaGreen1
#DEFINE CLR_DarkSeaGreen2       RGB(180, 238, 180)    //   #B4EEB4    DarkSeaGreen2
#DEFINE CLR_DarkSeaGreen3       RGB(155, 205, 155)    //   #9BCD9B    DarkSeaGreen3
#DEFINE CLR_DarkSeaGreen4       RGB(105, 139, 105)    //   #698B69    DarkSeaGreen4
#DEFINE CLR_SeaGreen1           RGB( 84, 255, 159)    //   #54FF9F    SeaGreen1
#DEFINE CLR_SeaGreen2           RGB( 78, 238, 148)    //   #4EEE94    SeaGreen2
#DEFINE CLR_SeaGreen3           RGB( 67, 205, 128)    //   #43CD80    SeaGreen3
#DEFINE CLR_SeaGreen4           RGB( 46, 139,  87)    //   #2E8B57    SeaGreen4
#DEFINE CLR_PaleGreen1          RGB(154, 255, 154)    //   #9AFF9A    PaleGreen1
#DEFINE CLR_PaleGreen2          RGB(144, 238, 144)    //   #90EE90    PaleGreen2
#DEFINE CLR_PaleGreen3          RGB(124, 205, 124)    //   #7CCD7C    PaleGreen3
#DEFINE CLR_PaleGreen4          RGB( 84, 139,  84)    //   #548B54    PaleGreen4
#DEFINE CLR_SpringGreen1        RGB(  0, 255, 127)    //   #00FF7F    SpringGreen1
#DEFINE CLR_SpringGreen2        RGB(  0, 238, 118)    //   #00EE76    SpringGreen2
#DEFINE CLR_SpringGreen3        RGB(  0, 205, 102)    //   #00CD66    SpringGreen3
#DEFINE CLR_SpringGreen4        RGB(  0, 139,  69)    //   #008B45    SpringGreen4
#DEFINE CLR_Green1              RGB(  0, 255,   0)    //   #00FF00    Green1
#DEFINE CLR_Green2              RGB(  0, 238,   0)    //   #00EE00    Green2
#DEFINE CLR_Green3              RGB(  0, 205,   0)    //   #00CD00    Green3
#DEFINE CLR_Green4              RGB(  0, 139,   0)    //   #008B00    Green4
#DEFINE CLR_Chartreuse1         RGB(127, 255,   0)    //   #7FFF00    Chartreuse1
#DEFINE CLR_Chartreuse2         RGB(118, 238,   0)    //   #76EE00    Chartreuse2
#DEFINE CLR_Chartreuse3         RGB(102, 205,   0)    //   #66CD00    Chartreuse3
#DEFINE CLR_Chartreuse4         RGB( 69, 139,   0)    //   #458B00    Chartreuse4
#DEFINE CLR_OliveDrab1          RGB(192, 255,  62)    //   #C0FF3E    OliveDrab1
#DEFINE CLR_OliveDrab2          RGB(179, 238,  58)    //   #B3EE3A    OliveDrab2
#DEFINE CLR_OliveDrab3          RGB(154, 205,  50)    //   #9ACD32    OliveDrab3
#DEFINE CLR_OliveDrab4          RGB(105, 139,  34)    //   #698B22    OliveDrab4
#DEFINE CLR_DarkOliveGreen1     RGB(202, 255, 112)    //   #CAFF70    DarkOliveGreen1
#DEFINE CLR_DarkOliveGreen2     RGB(188, 238, 104)    //   #BCEE68    DarkOliveGreen2
#DEFINE CLR_DarkOliveGreen3     RGB(162, 205,  90)    //   #A2CD5A    DarkOliveGreen3
#DEFINE CLR_DarkOliveGreen4     RGB(110, 139,  61)    //   #6E8B3D    DarkOliveGreen4
#DEFINE CLR_Khaki1              RGB(255, 246, 143)    //   #FFF68F    Khaki1
#DEFINE CLR_Khaki2              RGB(238, 230, 133)    //   #EEE685    Khaki2
#DEFINE CLR_Khaki3              RGB(205, 198, 115)    //   #CDC673    Khaki3
#DEFINE CLR_Khaki4              RGB(139, 134,  78)    //   #8B864E    Khaki4
#DEFINE CLR_LightGoldenrod1     RGB(255, 236, 139)    //   #FFEC8B    LightGoldenrod1
#DEFINE CLR_LightGoldenrod2     RGB(238, 220, 130)    //   #EEDC82    LightGoldenrod2
#DEFINE CLR_LightGoldenrod3     RGB(205, 190, 112)    //   #CDBE70    LightGoldenrod3
#DEFINE CLR_LightGoldenrod4     RGB(139, 129,  76)    //   #8B814C    LightGoldenrod4
#DEFINE CLR_LightYellow1        RGB(255, 255, 224)    //   #FFFFE0    LightYellow1
#DEFINE CLR_LightYellow2        RGB(238, 238, 209)    //   #EEEED1    LightYellow2
#DEFINE CLR_LightYellow3        RGB(205, 205, 180)    //   #CDCDB4    LightYellow3
#DEFINE CLR_LightYellow4        RGB(139, 139, 122)    //   #8B8B7A    LightYellow4
#DEFINE CLR_Yellow1             RGB(255, 255,   0)    //   #FFFF00    Yellow1
#DEFINE CLR_Yellow2             RGB(238, 238,   0)    //   #EEEE00    Yellow2
#DEFINE CLR_Yellow3             RGB(205, 205,   0)    //   #CDCD00    Yellow3
#DEFINE CLR_Yellow4             RGB(139, 139,   0)    //   #8B8B00    Yellow4
#DEFINE CLR_Gold1               RGB(255, 215,   0)    //   #FFD700    Gold1
#DEFINE CLR_Gold2               RGB(238, 201,   0)    //   #EEC900    Gold2
#DEFINE CLR_Gold3               RGB(205, 173,   0)    //   #CDAD00    Gold3
#DEFINE CLR_Gold4               RGB(139, 117,   0)    //   #8B7500    Gold4
#DEFINE CLR_Goldenrod1          RGB(255, 193,  37)    //   #FFC125    Goldenrod1
#DEFINE CLR_Goldenrod2          RGB(238, 180,  34)    //   #EEB422    Goldenrod2
#DEFINE CLR_Goldenrod3          RGB(205, 155,  29)    //   #CD9B1D    Goldenrod3
#DEFINE CLR_Goldenrod4          RGB(139, 105,  20)    //   #8B6914    Goldenrod4
#DEFINE CLR_DarkGoldenrod1      RGB(255, 185,  15)    //   #FFB90F    DarkGoldenrod1
#DEFINE CLR_DarkGoldenrod2      RGB(238, 173,  14)    //   #EEAD0E    DarkGoldenrod2
#DEFINE CLR_DarkGoldenrod3      RGB(205, 149,  12)    //   #CD950C    DarkGoldenrod3
#DEFINE CLR_DarkGoldenrod4      RGB(139, 101,   8)    //   #8B658B    DarkGoldenrod4
#DEFINE CLR_RosyBrown1          RGB(255, 193, 193)    //   #FFC1C1    RosyBrown1
#DEFINE CLR_RosyBrown2          RGB(238, 180, 180)    //   #EEB4B4    RosyBrown2
#DEFINE CLR_RosyBrown3          RGB(205, 155, 155)    //   #CD9B9B    RosyBrown3
#DEFINE CLR_RosyBrown4          RGB(139, 105, 105)    //   #8B6969    RosyBrown4
#DEFINE CLR_IndianRed1          RGB(255, 106, 106)    //   #FF6A6A    IndianRed1
#DEFINE CLR_IndianRed2          RGB(238,  99,  99)    //   #EE6363    IndianRed2
#DEFINE CLR_IndianRed3          RGB(205,  85,  85)    //   #CD5555    IndianRed3
#DEFINE CLR_IndianRed4          RGB(139,  58,  58)    //   #8B3A3A    IndianRed4
#DEFINE CLR_Sienna1             RGB(255, 130,  71)    //   #FF8247    Sienna1
#DEFINE CLR_Sienna2             RGB(238, 121,  66)    //   #EE7942    Sienna2
#DEFINE CLR_Sienna3             RGB(205, 104,  57)    //   #CD6839    Sienna3
#DEFINE CLR_Sienna4             RGB(139,  71,  38)    //   #8B4726    Sienna4
#DEFINE CLR_Burlywood1          RGB(255, 211, 155)    //   #FFD39B    Burlywood1
#DEFINE CLR_Burlywood2          RGB(238, 197, 145)    //   #EEC591    Burlywood2
#DEFINE CLR_Burlywood3          RGB(205, 170, 125)    //   #CDAA7D    Burlywood3
#DEFINE CLR_Burlywood4          RGB(139, 115,  85)    //   #8B7355    Burlywood4
#DEFINE CLR_Wheat1              RGB(255, 231, 186)    //   #FFE7BA    Wheat1
#DEFINE CLR_Wheat2              RGB(238, 216, 174)    //   #EED8AE    Wheat2
#DEFINE CLR_Wheat3              RGB(205, 186, 150)    //   #CDBA96    Wheat3
#DEFINE CLR_Wheat4              RGB(139, 126, 102)    //   #8B7E66    Wheat4
#DEFINE CLR_Tan1                RGB(255, 165,  79)    //   #FFA54F    Tan1
#DEFINE CLR_Tan2                RGB(238, 154,  73)    //   #EE9A49    Tan2
#DEFINE CLR_Tan3                RGB(205, 133,  63)    //   #CD853F    Tan3
#DEFINE CLR_Tan4                RGB(139,  90,  43)    //   #8B5A2B    Tan4
#DEFINE CLR_Chocolate1          RGB(255, 127,  36)    //   #FF7F24    Chocolate1
#DEFINE CLR_Chocolate2          RGB(238, 118,  33)    //   #EE7621    Chocolate2
#DEFINE CLR_Chocolate3          RGB(205, 102,  29)    //   #CD661D    Chocolate3
#DEFINE CLR_Chocolate4          RGB(139,  69,  19)    //   #8B4513    Chocolate4
#DEFINE CLR_Firebrick1          RGB(255,  48,  48)    //   #FF3030    Firebrick1
#DEFINE CLR_Firebrick2          RGB(238,  44,  44)    //   #EE2C2C    Firebrick2
#DEFINE CLR_Firebrick3          RGB(205,  38,  38)    //   #CD2626    Firebrick3
#DEFINE CLR_Firebrick4          RGB(139,  26,  26)    //   #8B1A1A    Firebrick4
#DEFINE CLR_Brown1              RGB(255,  64,  64)    //   #FF4040    Brown1
#DEFINE CLR_Brown2              RGB(238,  59,  59)    //   #EE3B3B    Brown2
#DEFINE CLR_Brown3              RGB(205,  51,  51)    //   #CD3333    Brown3
#DEFINE CLR_Brown4              RGB(139,  35,  35)    //   #8B2323    Brown4
#DEFINE CLR_Salmon1             RGB(255, 140, 105)    //   #FF8C69    Salmon1
#DEFINE CLR_Salmon2             RGB(238, 130,  98)    //   #EE8262    Salmon2
#DEFINE CLR_Salmon3             RGB(205, 112,  84)    //   #CD7054    Salmon3
#DEFINE CLR_Salmon4             RGB(139,  76,  57)    //   #8B4C39    Salmon4
#DEFINE CLR_LightSalmon1        RGB(255, 160, 122)    //   #FFA07A    LightSalmon1
#DEFINE CLR_LightSalmon2        RGB(238, 149, 114)    //   #EE9572    LightSalmon2
#DEFINE CLR_LightSalmon3        RGB(205, 129,  98)    //   #CD8162    LightSalmon3
#DEFINE CLR_LightSalmon4        RGB(139,  87,  66)    //   #8B5742    LightSalmon4
#DEFINE CLR_Orange1             RGB(255, 165,   0)    //   #FFA500    Orange1
#DEFINE CLR_Orange2             RGB(238, 154,   0)    //   #EE9A00    Orange2
#DEFINE CLR_Orange3             RGB(205, 133,   0)    //   #CD8500    Orange3
#DEFINE CLR_Orange4             RGB(139,  90,   0)    //   #8B5A00    Orange4
#DEFINE CLR_DarkOrange1         RGB(255, 127,   0)    //   #FF7F00    DarkOrange1
#DEFINE CLR_DarkOrange2         RGB(238, 118,   0)    //   #EE7600    DarkOrange2
#DEFINE CLR_DarkOrange3         RGB(205, 102,   0)    //   #CD6600    DarkOrange3
#DEFINE CLR_DarkOrange4         RGB(139,  69,   0)    //   #8B4500    DarkOrange4
#DEFINE CLR_Coral1              RGB(255, 114,  86)    //   #FF7256    Coral1
#DEFINE CLR_Coral2              RGB(238, 106,  80)    //   #EE6A50    Coral2
#DEFINE CLR_Coral3              RGB(205,  91,  69)    //   #CD5B45    Coral3
#DEFINE CLR_Coral4              RGB(139,  62,  47)    //   #8B3E2F    Coral4
#DEFINE CLR_Tomato1             RGB(255,  99,  71)    //   #FF6347    Tomato1
#DEFINE CLR_Tomato2             RGB(238,  92,  66)    //   #EE5C42    Tomato2
#DEFINE CLR_Tomato3             RGB(205,  79,  57)    //   #CD4F39    Tomato3
#DEFINE CLR_Tomato4             RGB(139,  54,  38)    //   #8B3626    Tomato4
#DEFINE CLR_OrangeRed1          RGB(255,  69,   0)    //   #FF4500    OrangeRed1
#DEFINE CLR_OrangeRed2          RGB(238,  64,   0)    //   #EE4000    OrangeRed2
#DEFINE CLR_OrangeRed3          RGB(205,  55,   0)    //   #CD3700    OrangeRed3
#DEFINE CLR_OrangeRed4          RGB(139,  37,   0)    //   #8B2500    OrangeRed4
#DEFINE CLR_Red1                RGB(255,   0,   0)    //   #FF0000    Red1
#DEFINE CLR_Red2                RGB(238,   0,   0)    //   #EE0000    Red2
#DEFINE CLR_Red3                RGB(205,   0,   0)    //   #CD0000    Red3
#DEFINE CLR_Red4                RGB(139,   0,   0)    //   #8B0000    Red4
#DEFINE CLR_DeepPink1           RGB(255,  20, 147)    //   #FF1493    DeepPink1
#DEFINE CLR_DeepPink2           RGB(238,  18, 137)    //   #EE1289    DeepPink2
#DEFINE CLR_DeepPink3           RGB(205,  16, 118)    //   #CD1076    DeepPink3
#DEFINE CLR_DeepPink4           RGB(139,  10,  80)    //   #8B0A50    DeepPink4
#DEFINE CLR_HotPink1            RGB(255, 110, 180)    //   #FF6EB4    HotPink1
#DEFINE CLR_HotPink2            RGB(238, 106, 167)    //   #EE6AA7    HotPink2
#DEFINE CLR_HotPink3            RGB(205,  96, 144)    //   #CD6090    HotPink3
#DEFINE CLR_HotPink4            RGB(139,  58,  98)    //   #8B3A62    HotPink4
#DEFINE CLR_Pink1               RGB(255, 181, 197)    //   #FFB5C5    Pink1
#DEFINE CLR_Pink2               RGB(238, 169, 184)    //   #EEA9B8    Pink2
#DEFINE CLR_Pink3               RGB(205, 145, 158)    //   #CD919E    Pink3
#DEFINE CLR_Pink4               RGB(139,  99, 108)    //   #8B636C    Pink4
#DEFINE CLR_LightPink1          RGB(255, 174, 185)    //   #FFAEB9    LightPink1
#DEFINE CLR_LightPink2          RGB(238, 162, 173)    //   #EEA2AD    LightPink2
#DEFINE CLR_LightPink3          RGB(205, 140, 149)    //   #CD8C95    LightPink3
#DEFINE CLR_LightPink4          RGB(139,  95, 101)    //   #8B5F65    LightPink4
#DEFINE CLR_PaleVioletRed1      RGB(255, 130, 171)    //   #FF82AB    PaleVioletRed1
#DEFINE CLR_PaleVioletRed2      RGB(238, 121, 159)    //   #EE799F    PaleVioletRed2
#DEFINE CLR_PaleVioletRed3      RGB(205, 104, 137)    //   #CD6889    PaleVioletRed3
#DEFINE CLR_PaleVioletRed4      RGB(139,  71,  93)    //   #8B475D    PaleVioletRed4
#DEFINE CLR_Maroon1             RGB(255,  52, 179)    //   #FF34B3    Maroon1
#DEFINE CLR_Maroon2             RGB(238,  48, 167)    //   #EE30A7    Maroon2
#DEFINE CLR_Maroon3             RGB(205,  41, 144)    //   #CD2990    Maroon3
#DEFINE CLR_Maroon4             RGB(139,  28,  98)    //   #8B1C62    Maroon4
#DEFINE CLR_VioletRed1          RGB(255,  62, 150)    //   #FF3E96    VioletRed1
#DEFINE CLR_VioletRed2          RGB(238,  58, 140)    //   #EE3A8C    VioletRed2
#DEFINE CLR_VioletRed3          RGB(205,  50, 120)    //   #CD3278    VioletRed3
#DEFINE CLR_VioletRed4          RGB(139,  34,  82)    //   #8B2252    VioletRed4
#DEFINE CLR_Magenta1            RGB(255,   0, 255)    //   #FF00FF    Magenta1
#DEFINE CLR_Magenta2            RGB(238,   0, 238)    //   #EE00EE    Magenta2
#DEFINE CLR_Magenta3            RGB(205,   0, 205)    //   #CD00CD    Magenta3
#DEFINE CLR_Magenta4            RGB(139,   0, 139)    //   #8B008B    Magenta4
#DEFINE CLR_Orchid1             RGB(255, 131, 250)    //   #FF83FA    Orchid1
#DEFINE CLR_Orchid2             RGB(238, 122, 233)    //   #EE7AE9    Orchid2
#DEFINE CLR_Orchid3             RGB(205, 105, 201)    //   #CD69C9    Orchid3
#DEFINE CLR_Orchid4             RGB(139,  71, 137)    //   #8B4789    Orchid4
#DEFINE CLR_Plum1               RGB(255, 187, 255)    //   #FFBBFF    Plum1
#DEFINE CLR_Plum2               RGB(238, 174, 238)    //   #EEAEEE    Plum2
#DEFINE CLR_Plum3               RGB(205, 150, 205)    //   #CD96CD    Plum3
#DEFINE CLR_Plum4               RGB(139, 102, 139)    //   #8B668B    Plum4
#DEFINE CLR_MediumOrchid1       RGB(224, 102, 255)    //   #E066FF    MediumOrchid1
#DEFINE CLR_MediumOrchid2       RGB(209,  95, 238)    //   #D15FEE    MediumOrchid2
#DEFINE CLR_MediumOrchid3       RGB(180,  82, 205)    //   #B452CD    MediumOrchid3
#DEFINE CLR_MediumOrchid4       RGB(122,  55, 139)    //   #7A378B    MediumOrchid4
#DEFINE CLR_DarkOrchid1         RGB(191,  62, 255)    //   #BF3EFF    DarkOrchid1
#DEFINE CLR_DarkOrchid2         RGB(178,  58, 238)    //   #B23AEE    DarkOrchid2
#DEFINE CLR_DarkOrchid3         RGB(154,  50, 205)    //   #9A32CD    DarkOrchid3
#DEFINE CLR_DarkOrchid4         RGB(104,  34, 139)    //   #68228B    DarkOrchid4
#DEFINE CLR_Purple1             RGB(155,  48, 255)    //   #9B30FF    Purple1
#DEFINE CLR_Purple2             RGB(145,  44, 238)    //   #912CEE    Purple2
#DEFINE CLR_Purple3             RGB(125,  38, 205)    //   #7D26CD    Purple3
#DEFINE CLR_Purple4             RGB( 85,  26, 139)    //   #551A8B    Purple4
#DEFINE CLR_MediumPurple1       RGB(171, 130, 255)    //   #AB82FF    MediumPurple1
#DEFINE CLR_MediumPurple2       RGB(159, 121, 238)    //   #9F79EE    MediumPurple2
#DEFINE CLR_MediumPurple3       RGB(137, 104, 205)    //   #8968CD    MediumPurple3
#DEFINE CLR_MediumPurple4       RGB( 93,  71, 139)    //   #5D478B    MediumPurple4
#DEFINE CLR_Thistle1            RGB(255, 225, 255)    //   #FFE1FF    Thistle1
#DEFINE CLR_Thistle2            RGB(238, 210, 238)    //   #EED2EE    Thistle2
#DEFINE CLR_Thistle3            RGB(205, 181, 205)    //   #CDB5CD    Thistle3
#DEFINE CLR_Thistle4            RGB(139, 123, 139)    //   #8B7B8B    Thistle4
#DEFINE CLR_grey11              RGB( 28,  28,  28)    //   #1C1C1C    grey11
#DEFINE CLR_grey21              RGB( 54,  54,  54)    //   #363636    grey21
#DEFINE CLR_grey31              RGB( 79,  79,  79)    //   #4F4F4F    grey31
#DEFINE CLR_grey41              RGB(105, 105, 105)    //   #696969    grey41
#DEFINE CLR_grey51              RGB(130, 130, 130)    //   #828282    grey51
#DEFINE CLR_grey61              RGB(156, 156, 156)    //   #9C9C9C    grey61
#DEFINE CLR_grey71              RGB(181, 181, 181)    //   #B5B5B5    grey71
#DEFINE CLR_gray81              RGB(207, 207, 207)    //   #CFCFCF    gray81
#DEFINE CLR_gray91              RGB(232, 232, 232)    //   #E8E8E8    gray91
#DEFINE CLR_DarkGrey            RGB(169, 169, 169)    //   #A9A9A9    DarkGrey
#DEFINE CLR_DarkBlue            RGB(  0,   0, 139)    //   #00008B    DarkBlue
#DEFINE CLR_DarkCyan            RGB(  0, 139, 139)    //   #008B8B    DarkCyan
#DEFINE CLR_DarkMagenta         RGB(139,   0, 139)    //   #8B008B    DarkMagenta
#DEFINE CLR_DarkRed             RGB(139,   0,   0)    //   #8B0000    DarkRed
#DEFINE CLR_LightGreen          RGB(144, 238, 144)    //   #90EE90    LightGreen

// ******************************************************************* //

-

//-> Verifique, que junto ao GASFW.EXE, segue dois EDITORES de Programas.

1 - EDITOR.COM   - Modo DOS(Console)
2 - EDITPAD.EXE  - Modo Grafico(Windows) - Ou Use o XDEV.EXE By Vailton Renato.
3 - Vailton Renato, distribuidor oficial da SQLLIB no Brasil:
4 - (11) 5523-4359 / 5523-7825 - renato@kssoftware.com.br - Sao Paulo - Brasil
5 - Adquira sua SQLLIB e agende um curso com Vailton Renato.

-

O Editor de Banco de Dados .DBF, FOX.EXE, Voce encontra na Pagina do
FIVEWIN BRASIL. Equivalente e mais moderno que o DBASEIII Plus.

Na Internet, voce encontra outros EDITORES da BANCOS DE DADOS .DBF
Tipo o Editor do FOXPRO dentre outros, eu prefiro o FOXBASE+ 2.10 da FOX SOFTWARE

http://www.fivewin.com.br   - Em dicas mais dicas... 

-

//-> Ponha Cores Nos Seus GETS, Salve Como: CORGET.PRG e Incorpore ao Sistema.

#Include "FiveWin.CH"

#Define CLR_VERMELHO  nRGB( 255, 000, 000 ) //--> Vermelho Para a Letra
#Define CLR_AMARELO   nRgb( 255, 255, 000 ) //--> Amarelo Para o Fundo

Class CorGet From TGet  // Herdando todas as caractisticas da classe TGet

    Data nClrForeFocus INIT CLR_VERMELHO  // --> Nova Cor Para Letras
    Data nClrBackFocus INIT CLR_AMARELO   // --> Nova Cor Para o Fundo
    Data nOldClrFore
    Data nOldClrBack

    Method GotFocus()    // -----------> Ambos metodos j existem, mas faremos
    Method LostFocus( hCtlFocus)//-----> algumas alteracoes na sua funcionalidade padrao

EndClass

Method GotFocus() Class CorGet

    If ::nClrForeFocus!=Nil.and.::nClrBackFocus!=Nil
        // utiliza metodo que foi herdado da class tget
        ::nOldClrFore:=::nClrText
        ::nOldClrBack:=::nClrPane
        ::SetColor(::nClrForeFocus,::nClrbackFocus)
    Endif

    // Super-> faz o metodo continuar seu processo normal

Return Super:GotFocus()

Method LostFocus( hCtlFocus) Class CorGet

    If ::nClrForeFocus!=Nil.and.::nClrBackFocus!=Nil
        // utiliza metodo que foi herdado da class tget e ;
        // tambem as propriedades
        // que contem a informacao da cor do controle
        ::SetColor(::nOldClrFore,::nOldClrBack)
    Endif

    // Super-> faz o metodo continuar seu processo normal

Return Super:LostFocus( hCtlFocus)

-

Bom Trabalho.

Estamos a disposicao para duvidas e sugestoes.

Abracos.

Joao Santos - Sao Paulo - Brasil.

