acr510_01.dfm.svn-base

一个用Delphi开发的ERP软件

inherited Acr510_01Form: TAcr510_01Form
  Left = -4
  Top = -4
  Width = 808
  Height = 580
  Caption = #38144#21806#21457#31080#32500#25252
  PixelsPerInch = 96
  TextHeight = 12
  inherited CoolBar1: TCoolBar
    Width = 800
    Bands = <
      item
        Control = ToolBar2
        ImageIndex = -1
        MinHeight = 39
        Width = 796
      end>
    inherited ToolBar2: TToolBar
      Width = 783
    end
  end
  inherited Panel1: TPanel
    Width = 800
    inherited Image1: TImage
      Width = 796
    end
    object lblDate: TLabel
      Left = 471
      Top = 12
      Width = 24
      Height = 12
      Anchors = [akTop, akRight]
      Caption = #26085#26399
      Transparent = True
    end
    object sbSearch: TSpeedButton
      Left = 727
      Top = 8
      Width = 57
      Height = 22
      Anchors = [akTop, akRight]
      Caption = #26597#35810
      OnClick = sbSearchClick
    end
    object edtFromDate: TwwDBDateTimePicker
      Left = 503
      Top = 8
      Width = 105
      Height = 20
      Anchors = [akTop, akRight]
      AutoSize = False
      CalendarAttributes.Font.Charset = DEFAULT_CHARSET
      CalendarAttributes.Font.Color = clWindowText
      CalendarAttributes.Font.Height = -11
      CalendarAttributes.Font.Name = 'MS Sans Serif'
      CalendarAttributes.Font.Style = []
      Epoch = 1950
      ImeName = #20013#25991' ('#31616#20307') - '#20840#25340
      ShowButton = True
      TabOrder = 0
    end
    object edtToDate: TwwDBDateTimePicker
      Left = 615
      Top = 8
      Width = 105
      Height = 20
      Anchors = [akTop, akRight]
      AutoSize = False
      CalendarAttributes.Font.Charset = DEFAULT_CHARSET
      CalendarAttributes.Font.Color = clWindowText
      CalendarAttributes.Font.Height = -11
      CalendarAttributes.Font.Name = 'MS Sans Serif'
      CalendarAttributes.Font.Style = []
      Epoch = 1950
      ImeName = #20013#25991' ('#31616#20307') - '#20840#25340
      ShowButton = True
      TabOrder = 1
    end
  end
  inherited ScrollBox1: TScrollBox
    Width = 800
    Height = 473
    inherited dxDBGrid1: TdxDBGrid
      Width = 796
      Height = 469
      OnDblClick = ActUpdateExecute
      Filter.Criteria = {00000000}
      object dxDBGrid1A510A_001: TdxDBGridColumn
        DisableEditor = True
        HeaderAlignment = taCenter
        Width = 156
        BandIndex = 0
        RowIndex = 0
        FieldName = 'A510A_001'
      end
      object dxDBGrid1A510A_002: TdxDBGridMaskColumn
        DisableEditor = True
        HeaderAlignment = taCenter
        BandIndex = 0
        RowIndex = 0
        FieldName = 'A510A_002'
      end
      object dxDBGrid1A510A_003: TdxDBGridMaskColumn
        DisableEditor = True
        HeaderAlignment = taCenter
        BandIndex = 0
        RowIndex = 0
        FieldName = 'A510A_003'
      end
      object dxDBGrid1A510A_004: TdxDBGridDateColumn
        DisableEditor = True
        HeaderAlignment = taCenter
        Width = 112
        BandIndex = 0
        RowIndex = 0
        FieldName = 'A510A_004'
      end
      object dxDBGrid1H150_002: TdxDBGridColumn
        DisableEditor = True
        HeaderAlignment = taCenter
        Width = 124
        BandIndex = 0
        RowIndex = 0
        FieldName = 'H150_002'
      end
      object dxDBGrid1H150_003: TdxDBGridColumn
        DisableEditor = True
        HeaderAlignment = taCenter
        Width = 124
        BandIndex = 0
        RowIndex = 0
        FieldName = 'H150_003'
      end
      object dxDBGrid1A510A_005: TdxDBGridMaskColumn
        DisableEditor = True
        HeaderAlignment = taCenter
        Visible = False
        Width = 63
        BandIndex = 0
        RowIndex = 0
        FieldName = 'A510A_005'
      end
      object dxDBGrid1A510A_006: TdxDBGridColumn
        DisableEditor = True
        HeaderAlignment = taCenter
        Width = 124
        BandIndex = 0
        RowIndex = 0
        FieldName = 'A510A_006'
      end
      object dxDBGrid1G100_002: TdxDBGridColumn
        DisableEditor = True
        HeaderAlignment = taCenter
        BandIndex = 0
        RowIndex = 0
        FieldName = 'G100_002'
      end
      object dxDBGrid1G100_003: TdxDBGridColumn
        DisableEditor = True
        HeaderAlignment = taCenter
        Width = 184
        BandIndex = 0
        RowIndex = 0
        FieldName = 'G100_003'
      end
      object dxDBGrid1A510A_007: TdxDBGridMaskColumn
        DisableEditor = True
        HeaderAlignment = taCenter
        Visible = False
        Width = 63
        BandIndex = 0
        RowIndex = 0
        FieldName = 'A510A_007'
      end
      object dxDBGrid1A510A_008: TdxDBGridMaskColumn
        DisableEditor = True
        HeaderAlignment = taCenter
        BandIndex = 0
        RowIndex = 0
        FieldName = 'A510A_008'
      end
      object dxDBGrid1A510A_009: TdxDBGridMaskColumn
        DisableEditor = True
        HeaderAlignment = taCenter
        BandIndex = 0
        RowIndex = 0
        FieldName = 'A510A_009'
      end
      object dxDBGrid1A510A_010: TdxDBGridMaskColumn
        DisableEditor = True
        HeaderAlignment = taCenter
        BandIndex = 0
        RowIndex = 0
        FieldName = 'A510A_010'
      end
      object dxDBGrid1A510A_011: TdxDBGridMaskColumn
        DisableEditor = True
        HeaderAlignment = taCenter
        BandIndex = 0
        RowIndex = 0
        FieldName = 'A510A_011'
      end
      object dxDBGrid1A510A_012: TdxDBGridMaskColumn
        DisableEditor = True
        HeaderAlignment = taCenter
        Visible = False
        Width = 63
        BandIndex = 0
        RowIndex = 0
        FieldName = 'A510A_012'
      end
      object dxDBGrid1O150_002: TdxDBGridColumn
        DisableEditor = True
        HeaderAlignment = taCenter
        Width = 124
        BandIndex = 0
        RowIndex = 0
        FieldName = 'O150_002'
      end
      object dxDBGrid1O150_003: TdxDBGridColumn
        DisableEditor = True
        HeaderAlignment = taCenter
        Width = 364
        BandIndex = 0
        RowIndex = 0
        FieldName = 'O150_003'
      end
      object dxDBGrid1A510A_013: TdxDBGridMemoColumn
        DisableEditor = True
        HeaderAlignment = taCenter
        Visible = False
        Width = 63
        BandIndex = 0
        RowIndex = 0
        FieldName = 'A510A_013'
      end
      object dxDBGrid1A510A_014: TdxDBGridDateColumn
        DisableEditor = True
        HeaderAlignment = taCenter
        Width = 112
        BandIndex = 0
        RowIndex = 0
        FieldName = 'A510A_014'
      end
      object dxDBGrid1A510A_015: TdxDBGridColumn
        DisableEditor = True
        HeaderAlignment = taCenter
        Width = 124
        BandIndex = 0
        RowIndex = 0
        FieldName = 'A510A_015'
      end
      object dxDBGrid1A510A_016: TdxDBGridDateColumn
        DisableEditor = True
        HeaderAlignment = taCenter
        Width = 112
        BandIndex = 0
        RowIndex = 0
        FieldName = 'A510A_016'
      end
      object dxDBGrid1A510A_017: TdxDBGridColumn
        DisableEditor = True
        HeaderAlignment = taCenter
        Width = 124
        BandIndex = 0
        RowIndex = 0
        FieldName = 'A510A_017'
      end
    end
  end
  inherited ADOQuery1: TADOQuery
    CursorType = ctStatic
    SQL.Strings = (
      'select A.*,'
      '    B.H150_002,B.H150_003,'
      '    C.G100_002,C.G100_003,'
      '    D.O150_002,D.O150_003'
      'from ACR510A A,Hrm150 B,GLD100 C,ORD150 D'
      
        'where A.A510A_005=B.H150_001 and A.A510A_007=C.G100_001 and A.A5' +
        '10A_012=D.O150_001'
      'order by A.A510A_001')
    object ADOQuery1A510A_001: TWideStringField
      DisplayLabel = #21457#31080#32534#21495
      FieldName = 'A510A_001'
      Size = 30
    end
    object ADOQuery1A510A_002: TSmallintField
      DisplayLabel = #21457#31080#31867#22411
      FieldName = 'A510A_002'
      OnGetText = ADOQuery1A510A_002GetText
    end
    object ADOQuery1A510A_003: TSmallintField
      DisplayLabel = #21457#31080#29366#24577
      FieldName = 'A510A_003'
      OnGetText = ADOQuery1A510A_003GetText
    end
    object ADOQuery1A510A_004: TDateTimeField
      DisplayLabel = #21457#31080#26085#26399
      FieldName = 'A510A_004'
    end
    object ADOQuery1H150_002: TWideStringField
      DisplayLabel = #24320#31080#21592#21495
      FieldName = 'H150_002'
    end
    object ADOQuery1H150_003: TWideStringField
      DisplayLabel = #24320#31080#21592#21517
      FieldName = 'H150_003'
    end
    object ADOQuery1A510A_005: TIntegerField
      FieldName = 'A510A_005'
      Visible = False
    end
    object ADOQuery1A510A_006: TWideStringField
      DisplayLabel = #21407#22987#21333#21495
      FieldName = 'A510A_006'
    end
    object ADOQuery1G100_002: TWideStringField
      DisplayLabel = #24065#21035#32534#21495
      FieldName = 'G100_002'
      Size = 10
    end
    object ADOQuery1G100_003: TWideStringField
      DisplayLabel = #24065#21035#21517#31216
      FieldName = 'G100_003'
      Size = 30
    end
    object ADOQuery1A510A_007: TIntegerField
      FieldName = 'A510A_007'
      Visible = False
    end
    object ADOQuery1A510A_008: TFloatField
      DisplayLabel = #24065#21035#27719#29575
      FieldName = 'A510A_008'
    end
    object ADOQuery1A510A_009: TFloatField
      DisplayLabel = #21457#31080#37329#39069
      FieldName = 'A510A_009'
    end
    object ADOQuery1A510A_010: TFloatField
      DisplayLabel = #21457#31080#31246#39069
      FieldName = 'A510A_010'
    end
    object ADOQuery1A510A_011: TFloatField
      DisplayLabel = #24212#25910#37329#39069
      FieldName = 'A510A_011'
    end
    object ADOQuery1A510A_012: TIntegerField
      FieldName = 'A510A_012'
      Visible = False
    end
    object ADOQuery1O150_002: TWideStringField
      DisplayLabel = #23458#25143#32534#21495
      FieldName = 'O150_002'
    end
    object ADOQuery1O150_003: TWideStringField
      DisplayLabel = #23458#25143#21517#31216
      FieldName = 'O150_003'
      Size = 60
    end
    object ADOQuery1A510A_013: TMemoField
      DisplayLabel = #22791#27880#35828#26126
      FieldName = 'A510A_013'
      Visible = False
      BlobType = ftMemo
    end
    object ADOQuery1A510A_014: TDateTimeField
      DisplayLabel = #21046#21333#26085#26399
      FieldName = 'A510A_014'
    end
    object ADOQuery1A510A_015: TWideStringField
      DisplayLabel = #21046#21333#20154#21592
      FieldName = 'A510A_015'
    end
    object ADOQuery1A510A_016: TDateTimeField
      DisplayLabel = #20462#25913#26085#26399
      FieldName = 'A510A_016'
    end
    object ADOQuery1A510A_017: TWideStringField
      DisplayLabel = #20462#25913#20154#21592
      FieldName = 'A510A_017'
    end
  end
end