form_develop_0a.~dfm

用Delphi编写的生产管理系统源码

inherited Frm_develop_0A: TFrm_develop_0A
  Left = 227
  Top = 173
  Width = 708
  Height = 486
  ActiveControl = FrameDataEdit1.FlatTabControl1
  Caption = #23433#35215#36039#26009#36664#20837
  OldCreateOrder = True
  PixelsPerInch = 96
  TextHeight = 13
  inherited FlatSplitter1: TFlatSplitter
    Top = 248
    Width = 700
    Height = 11
  end
  inherited FlatTitlebar1: TFlatTitlebar
    Width = 700
  end
  inherited FlatPanel1: TFlatPanel
    Width = 700
    Height = 229
    object FlatPanel3: TFlatPanel
      Left = 1
      Top = 1
      Width = 698
      Height = 227
      ParentColor = True
      Align = alClient
      TabOrder = 0
      object Label1: TLabel
        Left = 40
        Top = 8
        Width = 24
        Height = 13
        Caption = #20195#34399
        FocusControl = DBEdit1
      end
      object Label2: TLabel
        Left = 200
        Top = 8
        Width = 24
        Height = 13
        Caption = #21517#31281
        FocusControl = DBEdit2
      end
      object Label3: TLabel
        Left = 40
        Top = 64
        Width = 24
        Height = 13
        Caption = #35498#21517
        FocusControl = DBEdit3
      end
      object Label4: TLabel
        Left = 40
        Top = 120
        Width = 345
        Height = 81
        AutoSize = False
        Caption = #23433#35215#30340#22522#26412#36039#26009#38656#26377#23529#25209#27402#38480#30340#29992#25142#24314#31435'!'#13#10#22914#26524#26222#36890#29992#25142#24314','#21063#38656#23529#25209#25165#21487#25104#28858#27491#24335#36039#26009'!'
        Color = clGradientActiveCaption
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clRed
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentColor = False
        ParentFont = False
      end
      object DBEdit1: TDBEdit
        Tag = 1110
        Left = 40
        Top = 24
        Width = 134
        Height = 21
        DataField = #20195#34399
        DataSource = MainDataSource
        TabOrder = 0
      end
      object DBEdit2: TDBEdit
        Tag = 1110
        Left = 200
        Top = 24
        Width = 264
        Height = 21
        DataField = #21517#31281
        DataSource = MainDataSource
        TabOrder = 1
      end
      object DBEdit3: TDBEdit
        Tag = 1110
        Left = 40
        Top = 80
        Width = 425
        Height = 21
        DataField = #35498#21517
        DataSource = MainDataSource
        TabOrder = 2
      end
    end
  end
  inherited FlatPanel2: TFlatPanel
    Top = 259
    Width = 700
    inherited FrameDataEdit1: TFrameDataEdit
      Width = 698
      inherited FlatSplitter1: TFlatSplitter
        Width = 698
      end
      inherited FlatPanelEnd: TFlatPanel
        Width = 698
        inherited DBGrid1: TDBGrid
          Width = 696
        end
      end
      inherited FlatPanelTop: TFlatPanel
        Width = 698
        inherited FlatTabControl1: TFlatTabControl
          Width = 696
          inherited FlatPanelBrowser: TFlatPanel
            Width = 694
          end
          inherited FlatPanelSort: TFlatPanel
            Width = 694
          end
          inherited FlatPanelSUM: TFlatPanel
            Width = 694
          end
          inherited FlatPanelLookup: TFlatPanel
            Width = 694
          end
          inherited FlatPanelEdit: TFlatPanel
            Width = 694
          end
        end
      end
      inherited MainDataSource: TDataSource
        Left = 400
        Top = 160
      end
      inherited ADODataSet1: TADODataSet
        Top = 160
      end
    end
  end
  inherited MainDataSource: TDataSource
    Top = 32
  end
  inherited MainADODataSet: TADODataSet
    Active = True
    CursorType = ctStatic
    BeforeClose = MainADODataSetBeforeClose
    CommandText = 'select *  from '#23433#35215
    Left = 640
    Top = 32
    object MainADODataSetDSDesigner4: TStringField
      FieldName = #20195#34399
      FixedChar = True
      Size = 10
    end
    object MainADODataSetDSDesigner5: TStringField
      FieldName = #21517#31281
      FixedChar = True
    end
    object MainADODataSetDSDesigner6: TStringField
      FieldName = #35498#21517
      FixedChar = True
      Size = 50
    end
  end
end