What is xbp syntax?


El 25/05/2010 01:28 p.m., Massimo Belgrano escribió:
you can easy convert your source to gui adding a similar template

so you can maintain your source whith little modification


and then start adding gui element

in systax compatible with xbp but with vgw prefix


Please revise my untested source


// hbmk2 sample.prg -gtwvg -gui

REQUEST HB_GT_WVG_DEFAULT

REQUEST HB_GT_WVG

#INCLUDE "HBGTINFO.CH"
function main
    set color to "N/W,N/BG,,,N/W*"
    cls

   SETMODE(25,80)

    hb_gtInfo( HB_GTI_ICONFILE, "sample.ico" )
    hb_gtInfo( HB_GTI_WINTITLE, "Programm Title" )
    Hb_GtInfo( HB_GTI_SELECTCOPY,.T.)
    Hb_GtInfo( HB_GTI_RESIZABLE, .T. )
    HB_GTINFO( HB_GTI_CLOSABLE, .T. )

    HB_GTINFO( HB_GTI_RESIZABLE, .T. )

    HB_GTINFO( HB_GTI_CODEPAGE, 255 )

    Hb_GTInfo(HB_GTI_MOUSESTATUS, 1 )

    screenHeight:= HB_GTINFO( HB_GTI_SCREENWIDTH, HB_GTINFO(
HB_GTI_DESKTOPWIDTH ) )

    screenHeight:HB_GTINFO( HB_GTI_SCREENHEIGHT, HB_GTINFO(
HB_GTI_DESKTOPHEIGHT ) - 50 )

*SETMODE( GTINFO( GTI_DESKTOPROWS ) - 5, GTINFO( GTI_DESKTOPCOLS ) )

    HB_GTInfo(HB_GTI_FONTNAME, "Courier New")

    HB_GTInfo(HB_GTI_FONTQUALITY,HB_GTI_FONTQ_HIGH )

    if screenWidth>=  1920

     Hb_GtInfo( HB_GTI_FONTWIDTH, 21  )

     HB_GTInfo(HB_GTI_FONTSIZE, 40)

    ELSEIF screenWidth>= 1600               // 1280 *960

     Hb_GtInfo( HB_GTI_FONTWIDTH, 18  )

       HB_GTInfo(HB_GTI_FONTSIZE, 32)

    elseif screenWidth>= 1280               // 1280 *960

     Hb_GtInfo( HB_GTI_FONTWIDTH, 13  )

       HB_GTInfo(HB_GTI_FONTSIZE, 20)                     // 15*80=1200
   36*25=900

    elseif screenWidth>= 1024           // 1024*760

     Hb_GtInfo( HB_GTI_FONTWIDTH, 12.5  )

       HB_GTInfo(HB_GTI_FONTSIZE, 20)

    elseif screenWidth>= 800

     Hb_GtInfo( HB_GTI_FONTWIDTH, 10  )

       HB_GTInfo(HB_GTI_FONTSIZE, 18)

    ELSE

       Hb_GtInfo( HB_GTI_FONTWIDTH, 14  )

       HB_GTInfo(HB_GTI_FONTSIZE, 8)

    ENDIF



return


2010/5/25 Richard Acosta<eyela...@gmail.com>

How could i know how to make things work with gtwvg?...

Are you suggesting me to not use gtwvg?


El 20/05/2010 01:07 p.m., Pritpal Bedi escribió:

  Hi




At this moment, i am at 35 pages, and about 1500 lines of code of about
4500 lines of code... so this sample program is about 135/140 pages...
¿how to track anything?


Simple,

don't track anything...


Regards


_______________________________________________
Harbour-users mailing list (attachment size limit: 40KB)
Harbour-users@harbour-project.org
http://lists.harbour-project.org/mailman/listinfo/harbour-users

Reply via email to