home *** CD-ROM | disk | FTP | other *** search
/ Planet Source Code Jumbo …e CD Visual Basic 1 to 7 / 5_2007-2008.ISO / data / Zips / Desktop_Or205759412007.psc / frmHelp.frm < prev    next >
Text File  |  2006-10-19  |  26KB  |  704 lines
  1. VERSION 5.00
  2. Object = "{BDC217C8-ED16-11CD-956C-0000C04E4C0A}#1.1#0"; "Tabctl32.ocx"
  3. Begin VB.Form frmHelp 
  4.    Caption         =   " ORGANISER HELP"
  5.    ClientHeight    =   10110
  6.    ClientLeft      =   1800
  7.    ClientTop       =   675
  8.    ClientWidth     =   11805
  9.    Icon            =   "frmHelp.frx":0000
  10.    LinkTopic       =   "Form1"
  11.    ScaleHeight     =   10110
  12.    ScaleWidth      =   11805
  13.    Begin VB.CommandButton Command1 
  14.       Caption         =   "E&XIT"
  15.       Height          =   495
  16.       Left            =   10680
  17.       TabIndex        =   1
  18.       Top             =   9480
  19.       Width           =   975
  20.    End
  21.    Begin TabDlg.SSTab SSTab1 
  22.       Height          =   10095
  23.       Left            =   0
  24.       TabIndex        =   0
  25.       Top             =   -15
  26.       Width           =   11805
  27.       _ExtentX        =   20823
  28.       _ExtentY        =   17806
  29.       _Version        =   393216
  30.       Style           =   1
  31.       Tabs            =   6
  32.       TabsPerRow      =   6
  33.       TabHeight       =   520
  34.       BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851} 
  35.          Name            =   "Arial"
  36.          Size            =   8.25
  37.          Charset         =   0
  38.          Weight          =   400
  39.          Underline       =   0   'False
  40.          Italic          =   0   'False
  41.          Strikethrough   =   0   'False
  42.       EndProperty
  43.       TabCaption(0)   =   "DESKTOP ORGANISER"
  44.       TabPicture(0)   =   "frmHelp.frx":0CCA
  45.       Tab(0).ControlEnabled=   -1  'True
  46.       Tab(0).Control(0)=   "Label1"
  47.       Tab(0).Control(0).Enabled=   0   'False
  48.       Tab(0).Control(1)=   "Image1"
  49.       Tab(0).Control(1).Enabled=   0   'False
  50.       Tab(0).Control(2)=   "Image2"
  51.       Tab(0).Control(2).Enabled=   0   'False
  52.       Tab(0).Control(3)=   "Label2(14)"
  53.       Tab(0).Control(3).Enabled=   0   'False
  54.       Tab(0).Control(4)=   "Image11"
  55.       Tab(0).Control(4).Enabled=   0   'False
  56.       Tab(0).Control(5)=   "Label6"
  57.       Tab(0).Control(5).Enabled=   0   'False
  58.       Tab(0).ControlCount=   6
  59.       TabCaption(1)   =   "PROGRAM SETUP"
  60.       TabPicture(1)   =   "frmHelp.frx":0CE6
  61.       Tab(1).ControlEnabled=   0   'False
  62.       Tab(1).Control(0)=   "Image5"
  63.       Tab(1).Control(1)=   "Label2(4)"
  64.       Tab(1).Control(2)=   "Label2(3)"
  65.       Tab(1).Control(3)=   "Label2(2)"
  66.       Tab(1).Control(4)=   "Label3"
  67.       Tab(1).Control(5)=   "Label2(1)"
  68.       Tab(1).Control(6)=   "Label2(0)"
  69.       Tab(1).Control(7)=   "Image3"
  70.       Tab(1).Control(8)=   "Image4"
  71.       Tab(1).ControlCount=   9
  72.       TabCaption(2)   =   "ORGANISER"
  73.       TabPicture(2)   =   "frmHelp.frx":0D02
  74.       Tab(2).ControlEnabled=   0   'False
  75.       Tab(2).Control(0)=   "Label2(13)"
  76.       Tab(2).Control(1)=   "Label2(12)"
  77.       Tab(2).Control(2)=   "Label2(11)"
  78.       Tab(2).Control(3)=   "Label2(10)"
  79.       Tab(2).Control(4)=   "Label4"
  80.       Tab(2).Control(5)=   "Image6"
  81.       Tab(2).ControlCount=   6
  82.       TabCaption(3)   =   "PATH LIST"
  83.       TabPicture(3)   =   "frmHelp.frx":0D1E
  84.       Tab(3).ControlEnabled=   0   'False
  85.       Tab(3).Control(0)=   "Label2(16)"
  86.       Tab(3).Control(1)=   "Label2(15)"
  87.       Tab(3).Control(2)=   "Label2(8)"
  88.       Tab(3).Control(3)=   "Label2(7)"
  89.       Tab(3).Control(4)=   "Label2(6)"
  90.       Tab(3).Control(5)=   "Label2(5)"
  91.       Tab(3).Control(6)=   "Label5"
  92.       Tab(3).Control(7)=   "Image9"
  93.       Tab(3).Control(8)=   "Image7"
  94.       Tab(3).ControlCount=   9
  95.       TabCaption(4)   =   "TAB NAMES"
  96.       TabPicture(4)   =   "frmHelp.frx":0D3A
  97.       Tab(4).ControlEnabled=   0   'False
  98.       Tab(4).Control(0)=   "Label2(17)"
  99.       Tab(4).Control(1)=   "Label7"
  100.       Tab(4).Control(2)=   "Image10"
  101.       Tab(4).Control(3)=   "Label2(9)"
  102.       Tab(4).Control(4)=   "Image8"
  103.       Tab(4).ControlCount=   5
  104.       TabCaption(5)   =   "OTHER INFORMATION"
  105.       TabPicture(5)   =   "frmHelp.frx":0D56
  106.       Tab(5).ControlEnabled=   0   'False
  107.       Tab(5).Control(0)=   "Frame1"
  108.       Tab(5).ControlCount=   1
  109.       Begin VB.Frame Frame1 
  110.          Caption         =   "ABOUT THIS PROGRAM"
  111.          BeginProperty Font 
  112.             Name            =   "MS Sans Serif"
  113.             Size            =   13.5
  114.             Charset         =   0
  115.             Weight          =   400
  116.             Underline       =   0   'False
  117.             Italic          =   0   'False
  118.             Strikethrough   =   0   'False
  119.          EndProperty
  120.          Height          =   5580
  121.          Left            =   -74400
  122.          TabIndex        =   26
  123.          Top             =   2265
  124.          Width           =   10605
  125.          Begin VB.Label Label8 
  126.             Alignment       =   2  'Center
  127.             Caption         =   "FOR WINDOWS VERSIONS 2000 && XP "
  128.             BeginProperty Font 
  129.                Name            =   "MS Sans Serif"
  130.                Size            =   13.5
  131.                Charset         =   0
  132.                Weight          =   400
  133.                Underline       =   0   'False
  134.                Italic          =   0   'False
  135.                Strikethrough   =   0   'False
  136.             EndProperty
  137.             Height          =   495
  138.             Left            =   360
  139.             TabIndex        =   32
  140.             Top             =   2160
  141.             Width           =   9975
  142.          End
  143.          Begin VB.Label lblProductName 
  144.             Alignment       =   2  'Center
  145.             BackStyle       =   0  'Transparent
  146.             Caption         =   "Product"
  147.             BeginProperty Font 
  148.                Name            =   "Arial"
  149.                Size            =   32.25
  150.                Charset         =   0
  151.                Weight          =   700
  152.                Underline       =   0   'False
  153.                Italic          =   0   'False
  154.                Strikethrough   =   0   'False
  155.             EndProperty
  156.             ForeColor       =   &H00C00000&
  157.             Height          =   765
  158.             Left            =   120
  159.             TabIndex        =   31
  160.             Top             =   600
  161.             Width           =   10275
  162.          End
  163.          Begin VB.Label lblPlatform 
  164.             BackStyle       =   0  'Transparent
  165.             Caption         =   "Platform"
  166.             BeginProperty Font 
  167.                Name            =   "Arial"
  168.                Size            =   14.25
  169.                Charset         =   0
  170.                Weight          =   700
  171.                Underline       =   0   'False
  172.                Italic          =   0   'False
  173.                Strikethrough   =   0   'False
  174.             EndProperty
  175.             ForeColor       =   &H00FFFFFF&
  176.             Height          =   2040
  177.             Left            =   1680
  178.             TabIndex        =   30
  179.             Top             =   2760
  180.             Width           =   5850
  181.          End
  182.          Begin VB.Label lblVersion 
  183.             BackStyle       =   0  'Transparent
  184.             Caption         =   "Version"
  185.             BeginProperty Font 
  186.                Name            =   "Arial"
  187.                Size            =   18
  188.                Charset         =   0
  189.                Weight          =   700
  190.                Underline       =   0   'False
  191.                Italic          =   0   'False
  192.                Strikethrough   =   0   'False
  193.             EndProperty
  194.             ForeColor       =   &H00FF0000&
  195.             Height          =   435
  196.             Left            =   3480
  197.             TabIndex        =   29
  198.             Top             =   1560
  199.             Width           =   6840
  200.          End
  201.          Begin VB.Label lblCompany 
  202.             Caption         =   "Company"
  203.             BeginProperty Font 
  204.                Name            =   "Arial"
  205.                Size            =   8.25
  206.                Charset         =   0
  207.                Weight          =   400
  208.                Underline       =   0   'False
  209.                Italic          =   0   'False
  210.                Strikethrough   =   0   'False
  211.             EndProperty
  212.             ForeColor       =   &H00800080&
  213.             Height          =   255
  214.             Left            =   4080
  215.             TabIndex        =   28
  216.             Top             =   5160
  217.             Width           =   3045
  218.          End
  219.          Begin VB.Label lblCopyright 
  220.             Caption         =   "Copyright"
  221.             BeginProperty Font 
  222.                Name            =   "Arial"
  223.                Size            =   8.25
  224.                Charset         =   0
  225.                Weight          =   700
  226.                Underline       =   0   'False
  227.                Italic          =   0   'False
  228.                Strikethrough   =   0   'False
  229.             EndProperty
  230.             ForeColor       =   &H000000FF&
  231.             Height          =   255
  232.             Left            =   4080
  233.             TabIndex        =   27
  234.             Top             =   4920
  235.             Width           =   3525
  236.          End
  237.       End
  238.       Begin VB.Label Label2 
  239.          BackStyle       =   0  'Transparent
  240.          Height          =   360
  241.          Index           =   17
  242.          Left            =   -74580
  243.          TabIndex        =   25
  244.          Top             =   735
  245.          Width           =   9105
  246.       End
  247.       Begin VB.Label Label2 
  248.          BackStyle       =   0  'Transparent
  249.          Enabled         =   0   'False
  250.          Height          =   375
  251.          Index           =   16
  252.          Left            =   -70515
  253.          TabIndex        =   24
  254.          Top             =   7935
  255.          Width           =   1185
  256.       End
  257.       Begin VB.Label Label2 
  258.          BackStyle       =   0  'Transparent
  259.          Enabled         =   0   'False
  260.          Height          =   375
  261.          Index           =   15
  262.          Left            =   -71460
  263.          TabIndex        =   23
  264.          Top             =   7920
  265.          Width           =   870
  266.       End
  267.       Begin VB.Label Label7 
  268.          Appearance      =   0  'Flat
  269.          BeginProperty Font 
  270.             Name            =   "MS Sans Serif"
  271.             Size            =   13.5
  272.             Charset         =   0
  273.             Weight          =   400
  274.             Underline       =   0   'False
  275.             Italic          =   0   'False
  276.             Strikethrough   =   0   'False
  277.          EndProperty
  278.          ForeColor       =   &H80000008&
  279.          Height          =   4020
  280.          Left            =   -68160
  281.          TabIndex        =   22
  282.          Top             =   5265
  283.          Width           =   4590
  284.       End
  285.       Begin VB.Label Label6 
  286.          BeginProperty Font 
  287.             Name            =   "MS Sans Serif"
  288.             Size            =   13.5
  289.             Charset         =   0
  290.             Weight          =   400
  291.             Underline       =   0   'False
  292.             Italic          =   0   'False
  293.             Strikethrough   =   0   'False
  294.          EndProperty
  295.          Height          =   915
  296.          Left            =   1035
  297.          TabIndex        =   21
  298.          Top             =   7260
  299.          Width           =   9420
  300.       End
  301.       Begin VB.Image Image11 
  302.          Height          =   480
  303.          Left            =   8400
  304.          Picture         =   "frmHelp.frx":0D72
  305.          Top             =   5355
  306.          Width           =   480
  307.       End
  308.       Begin VB.Label Label2 
  309.          BackStyle       =   0  'Transparent
  310.          Height          =   330
  311.          Index           =   14
  312.          Left            =   1035
  313.          TabIndex        =   20
  314.          Top             =   9660
  315.          Width           =   2370
  316.       End
  317.       Begin VB.Label Label2 
  318.          BackStyle       =   0  'Transparent
  319.          Height          =   615
  320.          Index           =   13
  321.          Left            =   -74445
  322.          TabIndex        =   19
  323.          Top             =   1275
  324.          Width           =   2055
  325.       End
  326.       Begin VB.Label Label2 
  327.          BackStyle       =   0  'Transparent
  328.          Height          =   390
  329.          Index           =   12
  330.          Left            =   -65685
  331.          TabIndex        =   18
  332.          Top             =   1620
  333.          Width           =   870
  334.       End
  335.       Begin VB.Label Label2 
  336.          BackStyle       =   0  'Transparent
  337.          Height          =   435
  338.          Index           =   11
  339.          Left            =   -65220
  340.          TabIndex        =   17
  341.          Top             =   1155
  342.          Width           =   405
  343.       End
  344.       Begin VB.Label Label2 
  345.          BackStyle       =   0  'Transparent
  346.          Height          =   450
  347.          Index           =   10
  348.          Left            =   -74670
  349.          TabIndex        =   16
  350.          Top             =   675
  351.          Width           =   9975
  352.       End
  353.       Begin VB.Image Image10 
  354.          Height          =   3975
  355.          Left            =   -74580
  356.          Picture         =   "frmHelp.frx":0EC4
  357.          Stretch         =   -1  'True
  358.          Top             =   4725
  359.          Visible         =   0   'False
  360.          Width           =   3435
  361.       End
  362.       Begin VB.Label Label2 
  363.          BackStyle       =   0  'Transparent
  364.          Height          =   330
  365.          Index           =   9
  366.          Left            =   -65880
  367.          TabIndex        =   15
  368.          Top             =   4140
  369.          Width           =   1695
  370.       End
  371.       Begin VB.Label Label2 
  372.          BackStyle       =   0  'Transparent
  373.          Height          =   2280
  374.          Index           =   8
  375.          Left            =   -73815
  376.          TabIndex        =   14
  377.          Top             =   2130
  378.          Width           =   7410
  379.       End
  380.       Begin VB.Label Label2 
  381.          BackStyle       =   0  'Transparent
  382.          Height          =   330
  383.          Index           =   7
  384.          Left            =   -68040
  385.          TabIndex        =   13
  386.          Top             =   1740
  387.          Width           =   1665
  388.       End
  389.       Begin VB.Label Label2 
  390.          BackStyle       =   0  'Transparent
  391.          Height          =   330
  392.          Index           =   6
  393.          Left            =   -73830
  394.          TabIndex        =   12
  395.          Top             =   1740
  396.          Width           =   1665
  397.       End
  398.       Begin VB.Label Label2 
  399.          BackStyle       =   0  'Transparent
  400.          Height          =   270
  401.          Index           =   5
  402.          Left            =   -73800
  403.          TabIndex        =   11
  404.          Top             =   1380
  405.          Width           =   7410
  406.       End
  407.       Begin VB.Label Label5 
  408.          Appearance      =   0  'Flat
  409.          BeginProperty Font 
  410.             Name            =   "MS Sans Serif"
  411.             Size            =   13.5
  412.             Charset         =   0
  413.             Weight          =   400
  414.             Underline       =   0   'False
  415.             Italic          =   0   'False
  416.             Strikethrough   =   0   'False
  417.          EndProperty
  418.          ForeColor       =   &H80000008&
  419.          Height          =   4020
  420.          Left            =   -68160
  421.          TabIndex        =   10
  422.          Top             =   5280
  423.          Width           =   4590
  424.       End
  425.       Begin VB.Label Label4 
  426.          Appearance      =   0  'Flat
  427.          BeginProperty Font 
  428.             Name            =   "MS Sans Serif"
  429.             Size            =   13.5
  430.             Charset         =   0
  431.             Weight          =   400
  432.             Underline       =   0   'False
  433.             Italic          =   0   'False
  434.             Strikethrough   =   0   'False
  435.          EndProperty
  436.          ForeColor       =   &H80000008&
  437.          Height          =   4020
  438.          Left            =   -68160
  439.          TabIndex        =   9
  440.          Top             =   5265
  441.          Width           =   4590
  442.       End
  443.       Begin VB.Image Image9 
  444.          Height          =   3735
  445.          Left            =   -74760
  446.          Picture         =   "frmHelp.frx":2B9A
  447.          Stretch         =   -1  'True
  448.          Top             =   4680
  449.          Visible         =   0   'False
  450.          Width           =   6285
  451.       End
  452.       Begin VB.Image Image8 
  453.          Height          =   4605
  454.          Left            =   -74640
  455.          Picture         =   "frmHelp.frx":6371
  456.          Stretch         =   -1  'True
  457.          Top             =   480
  458.          Width           =   10635
  459.       End
  460.       Begin VB.Image Image7 
  461.          Height          =   4605
  462.          Left            =   -74640
  463.          Picture         =   "frmHelp.frx":AEE7
  464.          Stretch         =   -1  'True
  465.          Top             =   480
  466.          Width           =   10635
  467.       End
  468.       Begin VB.Image Image6 
  469.          Height          =   1845
  470.          Left            =   -74760
  471.          Picture         =   "frmHelp.frx":FA5D
  472.          Top             =   600
  473.          Width           =   10275
  474.       End
  475.       Begin VB.Image Image5 
  476.          Height          =   7785
  477.          Left            =   -74610
  478.          Picture         =   "frmHelp.frx":12264
  479.          Stretch         =   -1  'True
  480.          Top             =   1695
  481.          Visible         =   0   'False
  482.          Width           =   4170
  483.       End
  484.       Begin VB.Label Label2 
  485.          BackStyle       =   0  'Transparent
  486.          Height          =   3270
  487.          Index           =   4
  488.          Left            =   -66540
  489.          TabIndex        =   8
  490.          Top             =   1215
  491.          Width           =   2130
  492.       End
  493.       Begin VB.Label Label2 
  494.          BackStyle       =   0  'Transparent
  495.          Height          =   3270
  496.          Index           =   3
  497.          Left            =   -73140
  498.          TabIndex        =   7
  499.          Top             =   1215
  500.          Width           =   5430
  501.       End
  502.       Begin VB.Label Label2 
  503.          BackStyle       =   0  'Transparent
  504.          Height          =   435
  505.          Index           =   2
  506.          Left            =   -65985
  507.          TabIndex        =   6
  508.          Top             =   4590
  509.          Width           =   1890
  510.       End
  511.       Begin VB.Label Label3 
  512.          Appearance      =   0  'Flat
  513.          BackStyle       =   0  'Transparent
  514.          BeginProperty Font 
  515.             Name            =   "MS Sans Serif"
  516.             Size            =   13.5
  517.             Charset         =   0
  518.             Weight          =   400
  519.             Underline       =   0   'False
  520.             Italic          =   0   'False
  521.             Strikethrough   =   0   'False
  522.          EndProperty
  523.          ForeColor       =   &H80000008&
  524.          Height          =   4020
  525.          Left            =   -68160
  526.          TabIndex        =   5
  527.          Top             =   5280
  528.          Width           =   4590
  529.       End
  530.       Begin VB.Label Label2 
  531.          BackStyle       =   0  'Transparent
  532.          Height          =   3255
  533.          Index           =   1
  534.          Left            =   -67635
  535.          TabIndex        =   4
  536.          Top             =   1230
  537.          Width           =   255
  538.       End
  539.       Begin VB.Label Label2 
  540.          BackStyle       =   0  'Transparent
  541.          Height          =   3270
  542.          Index           =   0
  543.          Left            =   -74415
  544.          TabIndex        =   3
  545.          Top             =   1215
  546.          Width           =   285
  547.       End
  548.       Begin VB.Image Image3 
  549.          Height          =   4605
  550.          Left            =   -74640
  551.          Picture         =   "frmHelp.frx":23BE8
  552.          Stretch         =   -1  'True
  553.          Top             =   480
  554.          Width           =   10635
  555.       End
  556.       Begin VB.Image Image2 
  557.          Height          =   660
  558.          Left            =   120
  559.          Picture         =   "frmHelp.frx":27E7D
  560.          Top             =   9360
  561.          Width           =   3675
  562.       End
  563.       Begin VB.Image Image1 
  564.          Height          =   1845
  565.          Left            =   120
  566.          Picture         =   "frmHelp.frx":289A9
  567.          Top             =   480
  568.          Width           =   10275
  569.       End
  570.       Begin VB.Label Label1 
  571.          Caption         =   $"frmHelp.frx":2B1B0
  572.          BeginProperty Font 
  573.             Name            =   "MS Sans Serif"
  574.             Size            =   18
  575.             Charset         =   0
  576.             Weight          =   400
  577.             Underline       =   0   'False
  578.             Italic          =   0   'False
  579.             Strikethrough   =   0   'False
  580.          EndProperty
  581.          Height          =   4125
  582.          Left            =   1515
  583.          TabIndex        =   2
  584.          Top             =   2730
  585.          Width           =   8775
  586.       End
  587.       Begin VB.Image Image4 
  588.          Height          =   3360
  589.          Left            =   -74640
  590.          Picture         =   "frmHelp.frx":2B39F
  591.          Stretch         =   -1  'True
  592.          Top             =   5205
  593.          Visible         =   0   'False
  594.          Width           =   6255
  595.       End
  596.    End
  597. End
  598. Attribute VB_Name = "frmHelp"
  599. Attribute VB_GlobalNameSpace = False
  600. Attribute VB_Creatable = False
  601. Attribute VB_PredeclaredId = True
  602. Attribute VB_Exposed = False
  603. Option Explicit
  604.  
  605. Private Sub Command1_Click()
  606. Unload Me
  607. End Sub
  608.  
  609. Private Sub Form_Load()
  610. SSTab1.Tab = 0
  611. lblVersion.Caption = "Version " & App.Major & "." & App.Minor & "." & App.Revision
  612.     lblProductName.Caption = App.Title
  613.     lblCompany.Caption = "D.Steer Trading as " & App.CompanyName
  614.     lblCopyright.Caption = App.LegalCopyright
  615.     lblPlatform.Caption = App.Comments
  616. End Sub
  617.  
  618. Private Sub Label2_Click(Index As Integer)
  619. Select Case Index
  620. Case 0
  621. Image4.Visible = True
  622. Image5.Visible = False
  623. Label3.Caption = "These buttons display the the pathlist dialogue. As seen, scroll through the list of program locations and click on the one you wish to use. To exit the dialogue click on the button with a cross on it"
  624. Case 1
  625. Image5.Visible = True
  626. Image4.Visible = False
  627. Label3.Caption = "These buttons display the the icon selector dialogue. As seen, select the icon from the display and click on the one you wish to use. To exit the dialogue click on the button with a cross on it."
  628. Case 2
  629. Image5.Visible = False
  630. Image4.Visible = False
  631. Label3.Caption = "Saves the set up of the program and closes the program. New settings are applied on restarting the program."
  632. Case 3
  633. Image5.Visible = False
  634. Image4.Visible = False
  635. Label3.Caption = "Displays the full path of the selected program."
  636. Case 4
  637. Image5.Visible = False
  638. Image4.Visible = False
  639. Label3.Caption = "Displays the name of the selected icon."
  640. Case 5
  641. Label2(15).Enabled = False
  642. Label2(16).Enabled = False
  643. Image9.Visible = False
  644. Label5.Caption = "Either type the full program path in this box or use the path finder dialogue to locate and send the full program path."
  645. Case 6
  646. Label2(15).Enabled = True
  647. Label2(16).Enabled = True
  648. Image9.Visible = True
  649. Label5.Caption = "Displays the Path finder dialogue allowing the user to extract the full program paths of the applications you intend to use. The dialogue will only display windows .exe files at present."
  650. Case 7
  651. Label2(15).Enabled = False
  652. Label2(16).Enabled = False
  653. Image9.Visible = False
  654. Label5.Caption = "Adds the full program path(location) to the box below and saves it. This button is activated as soon as the Path box is typed in or filled by the send button."
  655. Case 8
  656. Label2(15).Enabled = False
  657. Label2(16).Enabled = False
  658. Image9.Visible = False
  659. Label5.Caption = "Displays all the saved program locations for use later."
  660. Case 9
  661. Image10.Visible = True
  662. Label7.Caption = "Displays the change Tab Names dialogue. Just type in the new Tab namesand click the SAVE TAB NAMES button then click the X button to close the dialogue. All changes are made the next time you restart the program."
  663. Case 10
  664. Label4.Caption = "The Tabs 9 of them with upto 12 buttons on thats 108 programmable short cut buttons. The Tab names themselves can be changed to suit the individual user."
  665. Case 11
  666. Label4.Caption = "Close the entire program down."
  667. Case 12
  668. Label4.Caption = "YOU ARE HERE! displays the help files."
  669. Case 13
  670. Label4.Caption = "Program shortcut buttons, up to 12 on each tab. Programmable for different applications and changing icons."
  671. Case 14
  672. Label6.Caption = "Program Setup is permanently in the windows taskbar. Click on it to bring the Program setup window into view."
  673. Case 15
  674. Label5.Caption = "Sends the extracted program location (full path) to the main window for adding and saving."
  675. Case 16
  676. Label5.Caption = "Gets the full program path ready to be sent."
  677. Case 17
  678. Image10.Visible = False
  679. Label7.Caption = "Program Setup Tab names will always correspond to the Organiser tab names:- If you change the Organiser Tabs then the Setup Tabs change as well."
  680. End Select
  681. End Sub
  682.  
  683. Private Sub Label2_MouseMove(Index As Integer, Button As Integer, Shift As Integer, X As Single, Y As Single)
  684. For Index = 0 To 17
  685.  Label2(Index).MousePointer = 99
  686. Label2(Index).MouseIcon = LoadResPicture(101, vbResCursor)
  687. Next Index
  688. End Sub
  689.  
  690. Private Sub SSTab1_Click(PreviousTab As Integer)
  691. Image5.Visible = False
  692. Image4.Visible = False
  693. Image9.Visible = False
  694. Image10.Visible = False
  695. Label3.Caption = ""
  696. Label4.Caption = ""
  697. Label5.Caption = ""
  698. Label6.Caption = ""
  699. Label7.Caption = ""
  700. Label2(15).Enabled = False
  701. Label2(16).Enabled = False
  702. End Sub
  703.  
  704.