std_machine.dfm

主要是介绍DELPHI三层应用以及分布式数据库的应用

object Form_std_machine: TForm_std_machine
  Left = 72
  Top = 57
  Width = 727
  Height = 586
  VertScrollBar.Range = 550
  BorderStyle = bsSingle
  Caption = #26426#22411#26631#20934#34920
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  FormStyle = fsMDIChild
  OldCreateOrder = False
  Position = poDefault
  Visible = True
  WindowState = wsMaximized
  OnClose = FormClose
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object Panel1: TPanel
    Left = 0
    Top = 0
    Width = 719
    Height = 559
    Align = alClient
    Caption = 'Panel1'
    TabOrder = 0
    object Panel2: TPanel
      Left = 1
      Top = 1
      Width = 717
      Height = 48
      Align = alTop
      TabOrder = 0
      object Label95: TLabel
        Left = 299
        Top = 15
        Width = 110
        Height = 21
        Caption = #26426#22411#26631#20934#34920
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -21
        Font.Name = #23435#20307
        Font.Style = [fsBold]
        ParentFont = False
      end
    end
    object Panel3: TPanel
      Left = 1
      Top = 489
      Width = 717
      Height = 69
      Align = alBottom
      BevelOuter = bvNone
      TabOrder = 1
      object btn_first1: TButton
        Left = 7
        Top = 21
        Width = 70
        Height = 25
        Caption = #39318#35760#24405
        Font.Charset = ANSI_CHARSET
        Font.Color = clPurple
        Font.Height = -13
        Font.Name = #23435#20307
        Font.Style = []
        ParentFont = False
        TabOrder = 0
        OnClick = btn_first1Click
      end
      object btn_prev1: TButton
        Left = 77
        Top = 21
        Width = 70
        Height = 25
        Caption = #21069#19968#26465
        Font.Charset = ANSI_CHARSET
        Font.Color = clPurple
        Font.Height = -13
        Font.Name = #23435#20307
        Font.Style = []
        ParentFont = False
        TabOrder = 1
        OnClick = btn_prev1Click
      end
      object btn_next1: TButton
        Left = 147
        Top = 21
        Width = 70
        Height = 25
        Caption = #21518#19968#26465
        Font.Charset = ANSI_CHARSET
        Font.Color = clPurple
        Font.Height = -13
        Font.Name = #23435#20307
        Font.Style = []
        ParentFont = False
        TabOrder = 2
        OnClick = btn_next1Click
      end
      object btn_last1: TButton
        Left = 217
        Top = 21
        Width = 70
        Height = 25
        Caption = #23614#35760#24405
        Font.Charset = ANSI_CHARSET
        Font.Color = clPurple
        Font.Height = -13
        Font.Name = #23435#20307
        Font.Style = []
        ParentFont = False
        TabOrder = 3
        OnClick = btn_last1Click
      end
      object btn_addnew1: TButton
        Left = 287
        Top = 21
        Width = 70
        Height = 25
        Caption = #26032#22686
        Font.Charset = ANSI_CHARSET
        Font.Color = clPurple
        Font.Height = -13
        Font.Name = #23435#20307
        Font.Style = []
        ParentFont = False
        TabOrder = 4
        OnClick = btn_addnew1Click
      end
      object btn_edit1: TButton
        Left = 357
        Top = 21
        Width = 70
        Height = 25
        Caption = #20462#25913
        Font.Charset = ANSI_CHARSET
        Font.Color = clPurple
        Font.Height = -13
        Font.Name = #23435#20307
        Font.Style = []
        ParentFont = False
        TabOrder = 5
        OnClick = btn_edit1Click
      end
      object btn_save1: TButton
        Left = 497
        Top = 21
        Width = 70
        Height = 25
        Caption = #20445#23384
        Font.Charset = ANSI_CHARSET
        Font.Color = clPurple
        Font.Height = -13
        Font.Name = #23435#20307
        Font.Style = []
        ParentFont = False
        TabOrder = 6
        OnClick = btn_save1Click
      end
      object btn_cancel1: TButton
        Left = 567
        Top = 21
        Width = 70
        Height = 25
        Caption = #21462#28040
        Font.Charset = ANSI_CHARSET
        Font.Color = clPurple
        Font.Height = -13
        Font.Name = #23435#20307
        Font.Style = []
        ParentFont = False
        TabOrder = 7
        OnClick = btn_cancel1Click
      end
      object btn_exit: TButton
        Left = 637
        Top = 21
        Width = 70
        Height = 25
        Caption = #36864#20986
        Font.Charset = GB2312_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = #23435#20307
        Font.Style = []
        ParentFont = False
        TabOrder = 8
        OnClick = btn_exitClick
      end
      object btn_del: TButton
        Left = 427
        Top = 21
        Width = 70
        Height = 25
        Caption = #21024#38500
        Font.Charset = GB2312_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = #23435#20307
        Font.Style = []
        ParentFont = False
        TabOrder = 9
        OnClick = btn_delClick
      end
    end
    object DBGrid1: TDBGrid
      Left = 1
      Top = 49
      Width = 717
      Height = 440
      Align = alClient
      Color = clInfoBk
      DataSource = DataSource1
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
      ReadOnly = True
      TabOrder = 2
      TitleFont.Charset = DEFAULT_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -11
      TitleFont.Name = 'MS Sans Serif'
      TitleFont.Style = []
      Columns = <
        item
          Expanded = False
          FieldName = #26426#22411
          Title.Font.Charset = GB2312_CHARSET
          Title.Font.Color = clWindowText
          Title.Font.Height = -14
          Title.Font.Name = #23435#20307
          Title.Font.Style = []
          Width = 159
          Visible = True
        end
        item
          Expanded = False
          FieldName = #22791#27880
          Title.Caption = #25511#21046#31995#32479
          Title.Font.Charset = GB2312_CHARSET
          Title.Font.Color = clWindowText
          Title.Font.Height = -14
          Title.Font.Name = #23435#20307
          Title.Font.Style = []
          Width = 205
          Visible = True
        end
        item
          Expanded = False
          FieldName = #35745#20323#24213#20215
          Title.Font.Charset = GB2312_CHARSET
          Title.Font.Color = clWindowText
          Title.Font.Height = -14
          Title.Font.Name = #23435#20307
          Title.Font.Style = []
          Width = 192
          Visible = True
        end
        item
          Expanded = False
          FieldName = #21544#20301#26159#21542#22823#20110'600t'
          PickList.Strings = (
            #26159
            #21542)
          Title.Font.Charset = GB2312_CHARSET
          Title.Font.Color = clWindowText
          Title.Font.Height = -14
          Title.Font.Name = #23435#20307
          Title.Font.Style = []
          Width = 138
          Visible = True
        end>
    end
  end
  object DataSource1: TDataSource
    DataSet = Query1
    Left = 56
    Top = 16
  end
  object Query1: TADOQuery
    Connection = dm_wxp.ADOConnection1
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      'select * from std_machine'
      'order by '#26426#22411)
    Left = 16
    Top = 16
    object Query1DSDesigner: TAutoIncField
      FieldName = #24207#21495
      ReadOnly = True
    end
    object Query1DSDesigner2: TStringField
      FieldName = #26426#22411
    end
    object Query1DSDesigner3: TBCDField
      FieldName = #35745#20323#24213#20215
      Precision = 19
    end
    object Query1DSDesigner600t: TStringField
      FieldName = #21544#20301#26159#21542#22823#20110'600t'
      FixedChar = True
      Size = 10
    end
    object Query1DSDesigner4: TStringField
      FieldName = #22791#27880
      Size = 40
    end
  end
end