firstdealcorppassfrm.dfm

来自「群星医药系统源码」· DFM 代码 · 共 391 行

inherited FmFirstDealCorpPass: TFmFirstDealCorpPass
  Left = 227
  Caption = #39318#33829#20225#19994#31649#29702' - '#23457#25209
  PixelsPerInch = 96
  TextHeight = 13
  inherited plMain: TPanel
    inherited Label12: TLabel
      Left = 372
      Top = 183
    end
    inherited Label15: TLabel
      Top = 207
    end
    inherited Label16: TLabel
      Left = 372
      Top = 207
    end
    inherited Label18: TLabel
      Top = 230
    end
    inherited Label20: TLabel
      Top = 254
    end
    inherited Label21: TLabel
      Top = 278
    end
    inherited Label34: TLabel
      Top = 302
    end
    inherited Bevel2: TBevel
      Top = 397
    end
    inherited Label35: TLabel
      Top = 420
    end
    inherited Label36: TLabel
      Top = 420
    end
    object Label39: TLabel [23]
      Left = 32
      Top = 334
      Width = 84
      Height = 13
      Caption = #30003#35831#37096#38376#24847#35265#65306
    end
    object Label40: TLabel [24]
      Left = 44
      Top = 356
      Width = 72
      Height = 13
      Caption = #36136#26816#37096#24847#35265#65306
    end
    object Label41: TLabel [25]
      Left = 32
      Top = 378
      Width = 84
      Height = 13
      Caption = #32463#29702#23457#25209#24847#35265#65306
    end
    object Label44: TLabel [26]
      Left = 424
      Top = 334
      Width = 60
      Height = 13
      Caption = #23457#25209#32467#35770#65306
    end
    object Label45: TLabel [27]
      Left = 424
      Top = 356
      Width = 60
      Height = 13
      Caption = #23457#25209#32467#35770#65306
    end
    object Label46: TLabel [28]
      Left = 424
      Top = 378
      Width = 60
      Height = 13
      Caption = #23457#25209#32467#35770#65306
    end
    object Label49: TLabel [29]
      Left = 580
      Top = 356
      Width = 72
      Height = 13
      Caption = #36136#26816#36127#36131#20154#65306
    end
    object Label50: TLabel [30]
      Left = 580
      Top = 334
      Width = 72
      Height = 13
      Caption = #37096#38376#36127#36131#20154#65306
    end
    object Label51: TLabel [31]
      Left = 592
      Top = 378
      Width = 60
      Height = 13
      Caption = #32463#12288#12288#29702#65306
    end
    inherited edBillNo: TRzDBEdit
      Tag = -2
      ReadOnly = True
      Color = 15790320
    end
    inherited edDepart: TRzDBButtonEdit
      Tag = -2
      Color = 15790320
      ButtonVisible = False
    end
    inherited RzDBDateTimePicker1: TRzDBDateTimePicker
      Tag = -2
      Color = 15790320
      ReadOnly = True
    end
    inherited RzDBEdit3: TRzDBEdit
      Tag = -2
      ReadOnly = True
      Color = 15790320
    end
    inherited RzDBEdit4: TRzDBEdit
      Tag = -2
      ReadOnly = True
      Color = 15790320
    end
    inherited RzDBEdit5: TRzDBEdit
      Tag = -2
      ReadOnly = True
      Color = 15790320
    end
    inherited RzDBEdit6: TRzDBEdit
      Tag = -2
      ReadOnly = True
      Color = 15790320
    end
    inherited RzDBEdit7: TRzDBEdit
      Tag = -2
      ReadOnly = True
      Color = 15790320
    end
    inherited RzDBEdit9: TRzDBEdit
      Tag = -2
      ReadOnly = True
      Color = 15790320
    end
    inherited RzDBEdit10: TRzDBEdit
      Tag = -2
      ReadOnly = True
      Color = 15790320
    end
    inherited RzDBEdit11: TRzDBEdit
      Tag = -2
      Left = 432
      Top = 178
      ReadOnly = True
      Color = 15790320
    end
    inherited RzDBEdit12: TRzDBEdit
      Tag = -2
      ReadOnly = True
      Color = 15790320
    end
    inherited RzDBEdit13: TRzDBEdit
      Tag = -2
      Top = 202
      ReadOnly = True
      Color = 15790320
    end
    inherited RzDBEdit14: TRzDBEdit
      Tag = -2
      Left = 432
      Top = 202
      ReadOnly = True
      Color = 15790320
    end
    inherited RzDBEdit15: TRzDBEdit
      Tag = -2
      ReadOnly = True
      Color = 15790320
    end
    inherited RzDBEdit16: TRzDBEdit
      Tag = -2
      Top = 225
      ReadOnly = True
      Color = 15790320
    end
    inherited RzDBEdit18: TRzDBEdit
      Tag = -2
      Top = 249
      ReadOnly = True
      Color = 15790320
    end
    inherited RzDBEdit19: TRzDBEdit
      Tag = -2
      Top = 273
      ReadOnly = True
      Color = 15790320
    end
    inherited RzDBEdit32: TRzDBEdit
      Tag = -2
      Top = 297
      ReadOnly = True
      Color = 15790320
    end
    inherited RzDBEdit33: TRzDBEdit
      Tag = -2
      Top = 415
      Color = 15790320
    end
    inherited RzDBEdit34: TRzDBEdit
      Tag = -2
      Top = 415
      Color = 15790320
    end
    object RzDBEdit37: TRzDBMemo
      Left = 116
      Top = 329
      Width = 293
      Height = 20
      Ctl3D = True
      DataField = 'DeptNotion'
      DataSource = dsMain
      ParentCtl3D = False
      ScrollBars = ssVertical
      TabOrder = 21
      FrameVisible = True
      TabOnEnter = True
    end
    object RzDBEdit38: TRzDBMemo
      Left = 116
      Top = 351
      Width = 293
      Height = 20
      Ctl3D = True
      DataField = 'QCNotion'
      DataSource = dsMain
      ParentCtl3D = False
      ScrollBars = ssVertical
      TabOrder = 22
      FrameVisible = True
      TabOnEnter = True
    end
    object RzDBEdit39: TRzDBMemo
      Left = 116
      Top = 373
      Width = 293
      Height = 20
      Ctl3D = True
      DataField = 'ManagerNotion'
      DataSource = dsMain
      ParentCtl3D = False
      ScrollBars = ssVertical
      TabOrder = 23
      FrameVisible = True
      TabOnEnter = True
    end
    object cbDept: TRzDBComboBox
      Left = 484
      Top = 329
      Width = 84
      Height = 21
      DataField = 'DeptResult'
      DataSource = dsMain
      Ctl3D = False
      FlatButtons = True
      FrameVisible = True
      ItemHeight = 13
      ParentCtl3D = False
      TabOnEnter = True
      TabOrder = 24
      Items.Strings = (
        #23457#25209#36890#36807
        #19981#36890#36807)
    end
    object cbQC: TRzDBComboBox
      Left = 484
      Top = 351
      Width = 84
      Height = 21
      DataField = 'QCResult'
      DataSource = dsMain
      Ctl3D = False
      FlatButtons = True
      FrameVisible = True
      ItemHeight = 13
      ParentCtl3D = False
      TabOnEnter = True
      TabOrder = 25
      Items.Strings = (
        #23457#25209#36890#36807
        #19981#36890#36807)
    end
    object cbManager: TRzDBComboBox
      Left = 484
      Top = 373
      Width = 84
      Height = 21
      DataField = 'ManagerResult'
      DataSource = dsMain
      Ctl3D = False
      FlatButtons = True
      FrameVisible = True
      ItemHeight = 13
      ParentCtl3D = False
      TabOnEnter = True
      TabOrder = 26
      Items.Strings = (
        #23457#25209#36890#36807
        #19981#36890#36807)
    end
    object RzDBEdit42: TRzDBEdit
      Left = 652
      Top = 351
      Width = 77
      Height = 21
      DataSource = dsMain
      DataField = 'QCPrincipalName'
      ReadOnly = True
      FrameVisible = True
      TabOnEnter = True
      TabOrder = 27
    end
    object RzDBEdit43: TRzDBEdit
      Left = 652
      Top = 329
      Width = 77
      Height = 21
      DataSource = dsMain
      DataField = 'DeptPrincipalName'
      ReadOnly = True
      FrameVisible = True
      TabOnEnter = True
      TabOrder = 28
    end
    object RzDBEdit44: TRzDBEdit
      Left = 652
      Top = 373
      Width = 77
      Height = 21
      DataSource = dsMain
      DataField = 'ManagerName'
      ReadOnly = True
      FrameVisible = True
      TabOnEnter = True
      TabOrder = 29
    end
  end
  inherited ActionList1: TActionList
    inherited ActAudit: TModlAction
      Caption = #23457#25209'&A'
    end
    inherited ActShowAudited: TModlAction
      Visible = False
    end
    object ActShowCompleted: TModlAction
      Category = 'Bill'
      Caption = #26174#31034#24050#23457#25209#30340#39318#33829#20225#19994#35760#24405
      OnExecute = ActShowCompletedExecute
      Flag2 = 0
      Remark = 'Q'
    end
  end
  inherited pMenuOthers: TPopupMenu
    object N2: TMenuItem
      Action = ActShowCompleted
      Caption = #26174#31034#24050#23457#25209#30340#35760#24405
      Hint = #26174#31034#24050#23457#25209#30340#39318#33829#20225#19994#35760#24405
    end
  end
  inherited cdsMain: TckClientDataSet
    inherited cdsMainDeptResult: TStringField
      OnChange = cdsMainDeptResultChange
    end
    inherited cdsMainQCResult: TStringField
      OnChange = cdsMainQCResultChange
    end
    inherited cdsMainManagerResult: TStringField
      OnChange = cdsMainManagerResultChange
    end
  end
  inherited DCOMConnection1: TDCOMConnection
    Left = 557
    Top = 227
  end
  inherited dsMain: TDataSource
    Left = 557
    Top = 267
  end
end