main.dfm

对金智能试卷软件的功能补充

      OnClick = SpeedButton2Click
    end
  end
  object Panel1: TPanel
    Left = 0
    Top = 65
    Width = 185
    Height = 366
    Align = alLeft
    Caption = 'Panel1'
    TabOrder = 1
    object Splitter2: TSplitter
      Left = 1
      Top = 201
      Width = 183
      Height = 2
      Cursor = crVSplit
      Align = alTop
    end
    object Panel4: TPanel
      Left = 1
      Top = 1
      Width = 183
      Height = 200
      Align = alTop
      Caption = 'Panel4'
      TabOrder = 0
      object CoolBar2: TCoolBar
        Left = 1
        Top = 1
        Width = 181
        Height = 26
        AutoSize = True
        Bands = <
          item
            Control = ShellComboBox1
            ImageIndex = -1
            MinHeight = 22
            Width = 177
          end>
        object ShellComboBox1: TShellComboBox
          Left = 9
          Top = 0
          Width = 164
          Height = 22
          Root = 'rfDesktop'
          ShellListView = ShellListView1
          UseShellImages = True
          DropDownCount = 8
          TabOrder = 0
        end
      end
      object ShellListView1: TShellListView
        Left = 1
        Top = 27
        Width = 181
        Height = 172
        ObjectTypes = [otFolders, otNonFolders]
        Root = 'rfDesktop'
        ShellComboBox = ShellComboBox1
        Sorted = True
        Align = alClient
        ReadOnly = False
        HideSelection = False
        TabOrder = 1
        ViewStyle = vsList
      end
    end
    object Panel5: TPanel
      Left = 1
      Top = 203
      Width = 183
      Height = 162
      Align = alClient
      Caption = 'Panel5'
      TabOrder = 1
      object TreeView1: TTreeView
        Left = 1
        Top = 1
        Width = 181
        Height = 160
        Align = alClient
        Indent = 19
        TabOrder = 0
        OnClick = TreeView1Click
      end
    end
  end
  object Panel2: TPanel
    Left = 187
    Top = 65
    Width = 411
    Height = 366
    Align = alClient
    Caption = 'Panel2'
    TabOrder = 2
    object Splitter3: TSplitter
      Left = 1
      Top = 265
      Width = 409
      Height = 3
      Cursor = crVSplit
      Align = alTop
    end
    object Panel6: TPanel
      Left = 1
      Top = 1
      Width = 409
      Height = 264
      Align = alTop
      Caption = 'Panel6'
      TabOrder = 0
      object DBGrid1: TDBGrid
        Left = 1
        Top = 1
        Width = 407
        Height = 262
        Align = alClient
        DataSource = DataSource1
        TabOrder = 0
        TitleFont.Charset = DEFAULT_CHARSET
        TitleFont.Color = clWindowText
        TitleFont.Height = -11
        TitleFont.Name = 'MS Sans Serif'
        TitleFont.Style = []
        OnCellClick = DBGrid1CellClick
      end
    end
    object Panel7: TPanel
      Left = 1
      Top = 268
      Width = 409
      Height = 97
      Align = alClient
      Caption = 'Panel7'
      TabOrder = 1
      object PageControl1: TPageControl
        Left = 1
        Top = 1
        Width = 407
        Height = 95
        ActivePage = TabSheet1
        Align = alClient
        TabOrder = 0
        object TabSheet1: TTabSheet
          Caption = #35797#39064
          object Memo1: TMemo
            Left = 0
            Top = 0
            Width = 399
            Height = 67
            Align = alClient
            Font.Charset = DEFAULT_CHARSET
            Font.Color = clWindowText
            Font.Height = -13
            Font.Name = 'MS Sans Serif'
            Font.Style = []
            Lines.Strings = (
              '')
            ParentFont = False
            ReadOnly = True
            TabOrder = 0
          end
        end
        object TabSheet2: TTabSheet
          Caption = #31572#26696
          ImageIndex = 1
          object Memo2: TMemo
            Left = 0
            Top = 0
            Width = 399
            Height = 67
            Align = alClient
            Font.Charset = DEFAULT_CHARSET
            Font.Color = clWindowText
            Font.Height = -13
            Font.Name = 'MS Sans Serif'
            Font.Style = []
            Lines.Strings = (
              '')
            ParentFont = False
            ReadOnly = True
            TabOrder = 0
          end
        end
      end
    end
  end
  object StatusBar1: TStatusBar
    Left = 0
    Top = 431
    Width = 598
    Height = 24
    Panels = <
      item
        Width = 180
      end
      item
        Width = 180
      end
      item
        Width = 200
      end>
  end
  object MainMenu1: TMainMenu
    Left = 384
    object N1: TMenuItem
      Caption = #25991#20214
      object N5: TMenuItem
        Caption = #36830#25509
        OnClick = N5Click
      end
      object N12: TMenuItem
        Caption = '-'
      end
      object N8: TMenuItem
        Caption = #36864#20986
        OnClick = N8Click
      end
    end
    object N3: TMenuItem
      Caption = #21151#33021
      object N13: TMenuItem
        Caption = #32534#36753
        OnClick = N13Click
      end
      object N14: TMenuItem
        Caption = #23384#26723
        OnClick = N14Click
      end
      object N15: TMenuItem
        Caption = '-'
      end
      object N6: TMenuItem
        Caption = #23548#20986#21040' Word'
        OnClick = N6Click
      end
      object N7: TMenuItem
        Caption = #26684#24335#35843#25972
        OnClick = N7Click
      end
      object N16: TMenuItem
        Caption = #25209#37327#20462#25913
        OnClick = N16Click
      end
    end
    object N2: TMenuItem
      Caption = #35774#32622
      object N10: TMenuItem
        Caption = #26684#24335#35774#23450
        OnClick = N10Click
      end
      object N11: TMenuItem
        Caption = #32534#36753#37197#32622#25991#20214
        OnClick = N11Click
      end
    end
    object N4: TMenuItem
      Caption = #24110#21161
      object N9: TMenuItem
        Caption = #20851#20110
        OnClick = N9Click
      end
    end
  end
  object DataSource1: TDataSource
    DataSet = Tbl_tk
    Left = 448
  end
  object SaveDialog1: TSaveDialog
    DefaultExt = '.doc'
    Filter = 'doc'
    Left = 480
  end
  object Tbl_tk: TTable
    Left = 416
  end
end