⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 mdigp3.frm

📁 A good aplication to see some components like better button and vertical menu. Works with GP3 to con
💻 FRM
📖 第 1 页 / 共 2 页
字号:
VERSION 5.00
Object = "{3EF16C9D-EC6F-11D2-B926-00AA00597EDB}#2.2#0"; "VARBETTERBUTTON.OCX"
Object = "{831FDD16-0C5C-11D2-A9FC-0000F8754DA1}#2.0#0"; "MSCOMCTL.OCX"
Object = "{48E59290-9880-11CF-9754-00AA00C00908}#1.0#0"; "MSINET.OCX"
Object = "{6FBA474E-43AC-11CE-9A0E-00AA0062BB4C}#1.0#0"; "SYSINFO.OCX"
Object = "{628CC7D5-A6CF-11D0-B997-00805F024BFD}#1.0#0"; "VERTMENU.OCX"
Begin VB.MDIForm MDIGP3 
   BackColor       =   &H00C0C0C0&
   Caption         =   "GP3 Manager"
   ClientHeight    =   5940
   ClientLeft      =   165
   ClientTop       =   450
   ClientWidth     =   2775
   Icon            =   "MDIgp3.frx":0000
   LinkTopic       =   "MDIForm1"
   NegotiateToolbars=   0   'False
   Picture         =   "MDIgp3.frx":0442
   ScrollBars      =   0   'False
   StartUpPosition =   2  'CenterScreen
   Begin SysInfoLib.SysInfo SysInfo1 
      Left            =   1860
      Top             =   900
      _ExtentX        =   1005
      _ExtentY        =   1005
      _Version        =   393216
   End
   Begin VB.PictureBox Picture2 
      Align           =   3  'Align Left
      Height          =   4785
      Left            =   0
      ScaleHeight     =   4725
      ScaleWidth      =   1440
      TabIndex        =   7
      Top             =   855
      Width           =   1500
      Begin VertMenu.VerticalMenu vtmMenu 
         Height          =   4635
         Left            =   60
         TabIndex        =   8
         Top             =   60
         Width           =   1335
         _ExtentX        =   2355
         _ExtentY        =   8176
         Enabled         =   -1  'True
         MenusMax        =   4
         MenuCur         =   3
         MenuStartup     =   3
         MenuCaption1    =   "Tempos"
         MenuItemsMax1   =   3
         MenuItemIcon11  =   "MDIgp3.frx":163A2
         MenuItemCaption11=   "Treino"
         MenuItemIcon12  =   "MDIgp3.frx":16B1F
         MenuItemCaption12=   "Corrida"
         MenuItemIcon13  =   "MDIgp3.frx":17CF1
         MenuItemCaption13=   "Records"
         MenuCaption2    =   "Ferramentas"
         MenuItemsMax2   =   3
         MenuItemIcon21  =   "MDIgp3.frx":1C0BA
         MenuItemCaption21=   "Importar Textos"
         MenuItemIcon22  =   "MDIgp3.frx":1C3D4
         MenuItemCaption22=   "Ver Importados"
         MenuItemIcon23  =   "MDIgp3.frx":1C6EE
         MenuItemCaption23=   "Ver log"
         MenuCaption3    =   "Atalhos"
         MenuItemsMax3   =   3
         MenuItemIcon31  =   "MDIgp3.frx":1CA08
         MenuItemCaption31=   "Atalho (1)"
         MenuItemIcon32  =   "MDIgp3.frx":1CD22
         MenuItemCaption32=   "Atalho (2)"
         MenuItemIcon33  =   "MDIgp3.frx":1D03C
         MenuItemCaption33=   "Atalho (3)"
         MenuCaption4    =   "Outros"
         MenuItemsMax4   =   3
         MenuItemIcon41  =   "MDIgp3.frx":1D356
         MenuItemCaption41=   "Class. Pilotos"
         MenuItemIcon42  =   "MDIgp3.frx":1E3B7
         MenuItemCaption42=   "Class. Equipes"
         MenuItemIcon43  =   "MDIgp3.frx":1F066
         MenuItemCaption43=   "N鷐eros"
         Enabled         =   -1  'True
      End
   End
   Begin VB.Timer Timer1 
      Interval        =   150
      Left            =   60
      Top             =   900
   End
   Begin MSComctlLib.StatusBar stbStatus 
      Align           =   2  'Align Bottom
      Height          =   300
      Left            =   0
      TabIndex        =   2
      Top             =   5640
      Width           =   2775
      _ExtentX        =   4895
      _ExtentY        =   529
      _Version        =   393216
      BeginProperty Panels {8E3867A5-8586-11D1-B16A-00C0F0283628} 
         NumPanels       =   6
         BeginProperty Panel1 {8E3867AB-8586-11D1-B16A-00C0F0283628} 
            Bevel           =   0
            Enabled         =   0   'False
            Object.Width           =   3
            MinWidth        =   3
            Text            =   "."
            TextSave        =   "."
         EndProperty
         BeginProperty Panel2 {8E3867AB-8586-11D1-B16A-00C0F0283628} 
            Bevel           =   2
            Object.Width           =   11094
            MinWidth        =   11094
         EndProperty
         BeginProperty Panel3 {8E3867AB-8586-11D1-B16A-00C0F0283628} 
            Style           =   1
            Enabled         =   0   'False
            Object.Width           =   953
            MinWidth        =   953
            TextSave        =   "CAPS"
         EndProperty
         BeginProperty Panel4 {8E3867AB-8586-11D1-B16A-00C0F0283628} 
            Style           =   2
            Object.Width           =   952
            MinWidth        =   952
            TextSave        =   "NUM"
         EndProperty
         BeginProperty Panel5 {8E3867AB-8586-11D1-B16A-00C0F0283628} 
            Style           =   6
            Object.Width           =   1764
            MinWidth        =   1764
            TextSave        =   "17/10/01"
         EndProperty
         BeginProperty Panel6 {8E3867AB-8586-11D1-B16A-00C0F0283628} 
            Style           =   5
            Object.Width           =   1129
            MinWidth        =   1129
            TextSave        =   "18:35"
         EndProperty
      EndProperty
   End
   Begin VB.PictureBox picAtalhos 
      Align           =   1  'Align Top
      BackColor       =   &H00800000&
      Height          =   855
      Left            =   0
      ScaleHeight     =   795
      ScaleWidth      =   2715
      TabIndex        =   0
      Top             =   0
      Width           =   2775
      Begin varBetterButton.BetterButton cmdEquipes 
         Height          =   675
         Left            =   5100
         TabIndex        =   1
         ToolTipText     =   "Classifica玢o por Equipes"
         Top             =   60
         Width           =   1215
         _ExtentX        =   2143
         _ExtentY        =   1191
         Caption         =   "&Equipes"
         BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851} 
            Name            =   "MS Sans Serif"
            Size            =   8.25
            Charset         =   0
            Weight          =   700
            Underline       =   0   'False
            Italic          =   0   'False
            Strikethrough   =   0   'False
         EndProperty
         ForeColor       =   8454143
         HighlightColor  =   14671839
         ShadowColor     =   8355711
         BorderColor     =   0
         DisabledColor   =   8355711
         Picture         =   "MDIgp3.frx":1F380
         PictureOver     =   "MDIgp3.frx":20772
         PictureAlignment=   2
         PictureSpacing  =   1
         ShowFocus       =   0   'False
         ShowDefault     =   0   'False
         Style           =   1
         MousePointer    =   0
      End
      Begin varBetterButton.BetterButton cmdPilotos 
         Height          =   675
         Left            =   3840
         TabIndex        =   3
         ToolTipText     =   "Classifica玢o por Pilotos"
         Top             =   60
         Width           =   1215
         _ExtentX        =   2143
         _ExtentY        =   1191
         Caption         =   "&Pilotos"
         BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851} 
            Name            =   "MS Sans Serif"
            Size            =   8.25
            Charset         =   0
            Weight          =   700
            Underline       =   0   'False
            Italic          =   0   'False
            Strikethrough   =   0   'False
         EndProperty
         ForeColor       =   8454143
         HighlightColor  =   14671839
         ShadowColor     =   8355711
         BorderColor     =   0
         DisabledColor   =   8355711
         Picture         =   "MDIgp3.frx":21421
         PictureOver     =   "MDIgp3.frx":2223C
         PictureAlignment=   2
         PictureSpacing  =   1
         ShowFocus       =   0   'False
         ShowDefault     =   0   'False
         Style           =   1
         MousePointer    =   0
      End
      Begin varBetterButton.BetterButton cmdTreino 
         Height          =   675
         Left            =   1320
         TabIndex        =   4
         ToolTipText     =   "Tempos do Treino"
         Top             =   60
         Width           =   1215
         _ExtentX        =   2143
         _ExtentY        =   1191
         Caption         =   "&Treino"
         BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851} 
            Name            =   "MS Sans Serif"
            Size            =   8.25
            Charset         =   0
            Weight          =   700
            Underline       =   0   'False
            Italic          =   0   'False
            Strikethrough   =   0   'False
         EndProperty
         ForeColor       =   8454143
         HighlightColor  =   14671839
         ShadowColor     =   8355711
         BorderColor     =   0
         DisabledColor   =   8355711
         Picture         =   "MDIgp3.frx":2329D
         PictureOver     =   "MDIgp3.frx":239C0
         PictureAlignment=   2
         PictureSpacing  =   1
         ShowFocus       =   0   'False
         ShowDefault     =   0   'False
         Style           =   1
         MousePointer    =   0
      End
      Begin varBetterButton.BetterButton cmdCorrida 
         Height          =   675
         Left            =   2580
         TabIndex        =   5
         ToolTipText     =   "Tempos da Corrida"
         Top             =   60
         Width           =   1215
         _ExtentX        =   2143
         _ExtentY        =   1191
         Caption         =   "&Corrida"
         BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851} 
            Name            =   "MS Sans Serif"
            Size            =   8.25
            Charset         =   0
            Weight          =   700
            Underline       =   0   'False
            Italic          =   0   'False
            Strikethrough   =   0   'False
         EndProperty
         ForeColor       =   8454143
         HighlightColor  =   14671839
         ShadowColor     =   8355711
         BorderColor     =   0
         DisabledColor   =   8355711
         Picture         =   "MDIgp3.frx":2413D
         PictureOver     =   "MDIgp3.frx":2509A
         PictureAlignment=   2
         PictureSpacing  =   1
         ShowFocus       =   0   'False
         ShowDefault     =   0   'False
         Style           =   1
         MousePointer    =   0
      End
      Begin varBetterButton.BetterButton cmdAjuda 
         Height          =   675
         Left            =   7850
         TabIndex        =   6
         ToolTipText     =   "Ajuda do GP3 Manager"
         Top             =   60
         Width           =   1215
         _ExtentX        =   2143
         _ExtentY        =   1191
         Caption         =   "&Ajuda"
         BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851} 
            Name            =   "MS Sans Serif"
            Size            =   8.25
            Charset         =   0
            Weight          =   700
            Underline       =   0   'False
            Italic          =   0   'False
            Strikethrough   =   0   'False
         EndProperty
         BackColor       =   8388608
         ForeColor       =   8454143
         HighlightColor  =   16727871
         ShadowColor     =   5570560
         BorderColor     =   0
         DisabledColor   =   5570560
         PictureAlignment=   2
         PictureSpacing  =   1
         ShowFocus       =   0   'False
         ShowDefault     =   0   'False
         Style           =   1
         MousePointer    =   0
      End
      Begin varBetterButton.BetterButton cmdOpcoes 
         Height          =   675
         Left            =   60
         TabIndex        =   9
         ToolTipText     =   "Op珲es do GP3 Manager"
         Top             =   60
         Width           =   1215
         _ExtentX        =   2143
         _ExtentY        =   1191
         Caption         =   "&Op珲es"
         BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851} 
            Name            =   "MS Sans Serif"
            Size            =   8.25
            Charset         =   0
            Weight          =   700
            Underline       =   0   'False
            Italic          =   0   'False
            Strikethrough   =   0   'False
         EndProperty
         BackColor       =   8388608
         ForeColor       =   8454143
         HighlightColor  =   16727871
         ShadowColor     =   5570560
         BorderColor     =   0
         DisabledColor   =   5570560
         PictureOver     =   "MDIgp3.frx":2626C
         PictureAlignment=   2
         PictureSpacing  =   1
         ShowFocus       =   0   'False
         ShowDefault     =   0   'False
         Style           =   1
         MousePointer    =   0
      End
   End
   Begin InetCtlsObjects.Inet Inet1 
      Left            =   0
      Top             =   0
      _ExtentX        =   1005
      _ExtentY        =   1005
      _Version        =   393216
      Protocol        =   2
      RemoteHost      =   "ftp.portalvirtualnet.hpg.ig.com.br"
      RemotePort      =   21
      URL             =   "ftp://portalvirtualnet:portal@ftp.portalvirtualnet.hpg.ig.com.br/index.htm"
      Document        =   "index.htm"
      UserName        =   "portalvirtualnet"
      Password        =   "portal"
      RequestTimeout  =   30
   End
   Begin VB.Menu mnuSistema 
      Caption         =   "&Sistema"
      Begin VB.Menu mnuOp珲es 
         Caption         =   "&Op珲es"
      End
      Begin VB.Menu mnuSep1 
         Caption         =   "-"
      End

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -