shuoyin.dfm

一个不错的信息管理系统

object Form26: TForm26
  Left = 156
  Top = 198
  BorderStyle = bsDialog
  Caption = #37325#26032#24314#31435#32034#24341
  ClientHeight = 318
  ClientWidth = 703
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Position = poMainFormCenter
  OnClose = FormClose
  PixelsPerInch = 96
  TextHeight = 13
  object Panel1: TPanel
    Left = 0
    Top = 0
    Width = 703
    Height = 318
    Align = alClient
    BevelInner = bvRaised
    BorderStyle = bsSingle
    TabOrder = 0
    object DBGrid1: TDBGrid
      Left = 4
      Top = 48
      Width = 692
      Height = 265
      DataSource = DataSource1
      ReadOnly = True
      TabOrder = 0
      TitleFont.Charset = DEFAULT_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -11
      TitleFont.Name = 'MS Sans Serif'
      TitleFont.Style = []
    end
    object Panel2: TPanel
      Left = 3
      Top = 2
      Width = 695
      Height = 43
      BevelInner = bvSpace
      BorderStyle = bsSingle
      TabOrder = 1
      object Label1: TLabel
        Left = 2
        Top = 130
        Width = 360
        Height = 20
        Caption = #35831#28857#20987#32034#24341#26465#20214#25353#38062#20197#20415#37325#26032#24314#31435#32034#24341#65306
        Font.Charset = GB2312_CHARSET
        Font.Color = clWindowText
        Font.Height = -20
        Font.Name = #23435#20307
        Font.Style = []
        ParentFont = False
      end
      object Label2: TLabel
        Left = 18
        Top = 10
        Width = 360
        Height = 20
        Caption = #35831#28857#20987#32034#24341#26465#20214#25353#38062#20197#20415#37325#26032#24314#31435#32034#24341#65306
        Font.Charset = GB2312_CHARSET
        Font.Color = clBlue
        Font.Height = -20
        Font.Name = #23435#20307
        Font.Style = []
        ParentFont = False
      end
      object Button2: TButton
        Left = 451
        Top = 7
        Width = 75
        Height = 25
        Caption = #32034#24341#26465#20214
        Font.Charset = GB2312_CHARSET
        Font.Color = clWindowText
        Font.Height = -13
        Font.Name = #23435#20307
        Font.Style = []
        ParentFont = False
        TabOrder = 0
        OnClick = Button2Click
      end
      object Button1: TButton
        Left = 576
        Top = 7
        Width = 75
        Height = 25
        Caption = #36864#20986
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -13
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        TabOrder = 1
        OnClick = Button1Click
      end
    end
  end
  object ADOConnection1: TADOConnection
    ConnectionString = 
      'Provider=Microsoft.Jet.OLEDB.4.0;User ID=Admin;Data Source=ganbu' +
      'system.mdb;Mode=Share Deny None;Extended Properties="";Persist S' +
      'ecurity Info=False;Jet OLEDB:System database="";Jet OLEDB:Regist' +
      'ry Path="";Jet OLEDB:Database Password="";Jet OLEDB:Engine Type=' +
      '5;Jet OLEDB:Database Locking Mode=1;Jet OLEDB:Global Partial Bul' +
      'k Ops=2;Jet OLEDB:Global Bulk Transactions=1;Jet OLEDB:New Datab' +
      'ase Password="";Jet OLEDB:Create System Database=False;Jet OLEDB' +
      ':Encrypt Database=False;Jet OLEDB:Don'#39't Copy Locale on Compact=F' +
      'alse;Jet OLEDB:Compact Without Replica Repair=False;Jet OLEDB:SF' +
      'P=False'
    LoginPrompt = False
    Provider = 'Microsoft.Jet.OLEDB.4.0'
    Left = 80
    Top = 104
  end
  object DataSource1: TDataSource
    DataSet = ADOQuery1
    Left = 56
    Top = 144
  end
  object ADOQuery1: TADOQuery
    Connection = ADOConnection1
    Parameters = <>
    Left = 152
    Top = 88
  end
end