'*********************** '* COMPILER DIRECTIVES * '*********************** $APPTYPE GUI $TYPECHECK ON $INCLUDE "RAPIDQ.INC" $OPTION ICON "Console 2\cicon.ico" 'Resources... $RESOURCE AppIcon AS "Console 2\cicon.ico" $RESOURCE SplashBmp AS "Console 2\Splash.bmp" $RESOURCE CMBX_Message AS "Console 2\CMBX_Message.bmp" $RESOURCE CMBX_Error AS "Console 2\CMBX_Error.bmp" $RESOURCE CMBX_Warning AS "Console 2\CMBX_Warning.bmp" $RESOURCE BFTop AS "Console 2\BFTop.bmp" $RESOURCE BETop AS "Console 2\BETop.bmp" $RESOURCE OPTop AS "Console 2\OPTop.bmp" $RESOURCE EFTop AS "Console 2\EFTop.bmp" $RESOURCE SFTop AS "Console 2\SFTop.bmp" $RESOURCE IFTop AS "Console 2\IFTop.bmp" $RESOURCE ABTop AS "Console 2\ABTop.bmp" 'Bind editor icons... $RESOURCE ExecBmp AS "Console 2\exec.bmp" $RESOURCE FileBmp AS "Console 2\file.bmp" $RESOURCE FoldBmp AS "Console 2\Fold.bmp" $RESOURCE WebBmp AS "Console 2\web.bmp" $RESOURCE ControlBmp AS "Console 2\Control.bmp" $RESOURCE CustBmp AS "Console 2\cust.bmp" '************************** '* DECLARE SUBS/FUNCTIONS * '************************** $INCLUDE "Console 2\Declares.bas" '********************* '* PROGRAM CONSTANTS * '********************* '******************** '* GLOBAL VARIABLES * '******************** $INCLUDE "Console 2\Variables.bas" '***************** '* FORM CREATION * '***************** $INCLUDE "Console 2\Forms.bas" '************* '* FUNCTIONS * '************* '******** '* SUBS * '******** $INCLUDE "Console 2\GenSubs.bas" $INCLUDE "Console 2\Database.bas" $INCLUDE "Console 2\Others.bas" '********************* '* MAIN PROGRAM CODE * '********************* SplashForm.Show SplashForm.Repaint Initialise SplashForm.Visible = False HideTimer.Enabled = True Form.ShowModal