tbasicbill.dfm

仲裁委仲裁案件计酬程序.有基础资料设置、分级设置

      ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
      Options = [dgEditing, dgAlwaysShowEditor, dgTitles, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgConfirmDelete, dgCancelOnExit]
      OptionsEh = [dghFixed3D, dghHighlightFocus, dghClearSelection, dghAutoSortMarking, dghMultiSortMarking, dghEnterAsTab, dghRowHighlight, dghDblClickOptimizeColWidth, dghDialogFind]
      ParentCtl3D = False
      ParentFont = False
      SortLocal = True
      TabOrder = 3
      TitleFont.Charset = DEFAULT_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -13
      TitleFont.Name = 'MS Sans Serif'
      TitleFont.Style = [fsBold]
      TitleImages = ImgList
      UseMultiTitle = True
    end
  end
  object Panel_Right: TPanel
    Left = 234
    Top = 32
    Width = 454
    Height = 401
    Align = alClient
    ParentColor = True
    TabOrder = 3
    object CoolBar2: TCoolBar
      Left = 1
      Top = 1
      Width = 452
      Height = 32
      AutoSize = True
      Bands = <
        item
          Control = ToolBar2
          ImageIndex = -1
          MinHeight = 28
          Width = 448
        end>
      object ToolBar2: TToolBar
        Left = 9
        Top = 0
        Width = 435
        Height = 28
        AutoSize = True
        ButtonHeight = 24
        Caption = 'ToolBar1'
        TabOrder = 0
        object ToolBar3: TToolBar
          Left = 0
          Top = 2
          Width = 799
          Height = 24
          AutoSize = True
          ButtonWidth = 95
          Flat = True
          Images = ImgList
          List = True
          ShowCaptions = True
          TabOrder = 0
          object ToolButton2: TToolButton
            Left = 0
            Top = 0
            Action = ActCheckBill
            AutoSize = True
          end
          object ToolButton1: TToolButton
            Left = 93
            Top = 0
            Action = ActSave
            AutoSize = True
          end
        end
      end
    end
    object BillForm: TPanel
      Left = 1
      Top = 33
      Width = 452
      Height = 367
      Align = alClient
      BevelOuter = bvNone
      BorderStyle = bsSingle
      Color = clWhite
      Ctl3D = False
      ParentCtl3D = False
      TabOrder = 1
      DesignSize = (
        450
        365)
      object Label1: TLabel
        Left = 291
        Top = 339
        Width = 58
        Height = 15
        Anchors = [akRight, akBottom]
        AutoSize = False
        Caption = #30331#35760#26085#26399':'
        Transparent = True
      end
      object Label17: TLabel
        Left = 15
        Top = 339
        Width = 35
        Height = 15
        Anchors = [akLeft, akBottom]
        AutoSize = False
        Caption = #30331#35760':'
        Transparent = True
      end
      object Label8: TLabel
        Left = 0
        Top = 0
        Width = 450
        Height = 21
        Align = alTop
        Alignment = taCenter
        Caption = #22806#36141#20837#24211#21333
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -21
        Font.Name = #23435#20307
        Font.Style = [fsBold]
        ParentFont = False
        Transparent = True
      end
      object Label2: TLabel
        Left = 6
        Top = 38
        Width = 71
        Height = 15
        AutoSize = False
        Caption = #21333#25454#32534#21495'.'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clNavy
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
        Transparent = True
      end
      object Shape1: TShape
        Left = 68
        Top = 53
        Width = 101
        Height = 1
      end
      object Shape2: TShape
        Left = 44
        Top = 354
        Width = 84
        Height = 1
        Anchors = [akLeft, akBottom]
      end
      object Shape3: TShape
        Left = 344
        Top = 354
        Width = 84
        Height = 1
        Anchors = [akRight, akBottom]
      end
      object Label27: TLabel
        Left = 5
        Top = 62
        Width = 60
        Height = 15
        AutoSize = False
        Caption = #25688'         '#35201' :'
        Transparent = True
      end
      object Shape4: TShape
        Left = 64
        Top = 77
        Width = 373
        Height = 1
      end
      object EBillDate: TDBDateTimeEditEh
        Left = 346
        Top = 339
        Width = 79
        Height = 15
        Anchors = [akRight, akBottom]
        BorderStyle = bsNone
        Ctl3D = False
        DataField = 'FDate'
        Enabled = False
        EditButton.Glyph.Data = {
          36040000424D3604000000000000360000002800000010000000100000000100
          2000000000000004000000000000000000000000000000000000FF00FF00FF00
          FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
          FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
          FF00FF00FF00FF00FF00FF00FF0000000000FF00FF00FF00FF00FF00FF00FF00
          FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
          FF00FF00FF00FF00FF0000000000DF700F0000000000FF00FF00FF00FF00FF00
          FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
          FF00FF00FF0000000000DF700F00D06F0F00DF7F0F0000000000FF00FF00FF00
          FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
          FF0000000000DF700F00D06F0F00D06F0F00D06F0F00DF800F0000000000FF00
          FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
          FF00FF00FF0000000000DF700F00D06F0F00DF6F0F00DF6F0F00E08F0F000000
          0000FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
          FF00FF00FF00FF00FF0000000000DF7F0F00DF700F00DF700F00DF6F0F00E08F
          0F0000000000FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
          FF00FF00FF00FF00FF00FF00FF0000000000DF7F0F00DF700F00DF700F00D06F
          0F00DF800F0000000000FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
          FF00FF00FF00FF00FF00FF00FF00FF00FF0000000000DF7F0F00DF700F00DF70
          0F00D06F0F00DF7F0F0000000000FF00FF00FF00FF00FF00FF00FF00FF00FF00
          FF00FF00FF00FF00FF00FF00FF0000000000DF700F00DF7F0F00DF7F0F00DF70
          0F00DF7F0F0000000000FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
          FF00FF00FF00FF00FF0000000000DF6F0F00DF800F00DF800F00DF7F0F00DF70
          0F0000000000FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
          FF00FF00FF0000000000D06F0F00E08F0F00DF800F00DF800F00DF700F000000
          0000FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
          FF0000000000D06F0F00E08F0F00E08F0F00E08F0F00D06F0F0000000000FF00
          FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
          FF00FF00FF0000000000D06F0F00E08F0F00D06F0F0000000000FF00FF00FF00
          FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
          FF00FF00FF00FF00FF0000000000D06F0F0000000000FF00FF00FF00FF00FF00
          FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
          FF00FF00FF00FF00FF00FF00FF0000000000FF00FF00FF00FF00FF00FF00FF00
          FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00}
        EditButton.Style = ebsGlyphEh
        EditButton.Visible = False
        EditButtons = <>
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
        Kind = dtkDateEh
        ParentColor = True
        ParentCtl3D = False
        ParentFont = False
        TabOrder = 0
        Visible = True
      end
      object EBiller: TDBLookupComboboxEh
        Left = 47
        Top = 339
        Width = 79
        Height = 15
        BorderStyle = bsNone
        Anchors = [akLeft, akBottom]
        Ctl3D = False
        DataField = 'FBillerID'
        DropDownBox.Columns = <
          item
            Color = 15001545
            FieldName = 'FName'
            Title.Caption = #21517#31216
            Width = 120
          end
          item
            FieldName = 'FUserID'
          end>
        DropDownBox.Options = [dlgColumnResizeEh, dlgColLinesEh, dlgRowLinesEh]
        DropDownBox.AutoDrop = True
        DropDownBox.Rows = 10
        DropDownBox.Sizable = True
        DropDownBox.Width = 200
        Enabled = False
        EditButton.Glyph.Data = {
          36040000424D3604000000000000360000002800000010000000100000000100
          2000000000000004000000000000000000000000000000000000FF00FF00FF00
          FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
          FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
          FF00FF00FF00FF00FF00FF00FF0000000000FF00FF00FF00FF00FF00FF00FF00
          FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
          FF00FF00FF00FF00FF0000000000DF700F0000000000FF00FF00FF00FF00FF00
          FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
          FF00FF00FF0000000000DF700F00D06F0F00DF7F0F0000000000FF00FF00FF00
          FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
          FF0000000000DF700F00D06F0F00D06F0F00D06F0F00DF800F0000000000FF00
          FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
          FF00FF00FF0000000000DF700F00D06F0F00DF6F0F00DF6F0F00E08F0F000000
          0000FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
          FF00FF00FF00FF00FF0000000000DF7F0F00DF700F00DF700F00DF6F0F00E08F
          0F0000000000FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
          FF00FF00FF00FF00FF00FF00FF0000000000DF7F0F00DF700F00DF700F00D06F
          0F00DF800F0000000000FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
          FF00FF00FF00FF00FF00FF00FF00FF00FF0000000000DF7F0F00DF700F00DF70
          0F00D06F0F00DF7F0F0000000000FF00FF00FF00FF00FF00FF00FF00FF00FF00
          FF00FF00FF00FF00FF00FF00FF0000000000DF700F00DF7F0F00DF7F0F00DF70
          0F00DF7F0F0000000000FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
          FF00FF00FF00FF00FF0000000000DF6F0F00DF800F00DF800F00DF7F0F00DF70
          0F0000000000FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
          FF00FF00FF0000000000D06F0F00E08F0F00DF800F00DF800F00DF700F000000
          0000FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
          FF0000000000D06F0F00E08F0F00E08F0F00E08F0F00D06F0F0000000000FF00
          FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
          FF00FF00FF0000000000D06F0F00E08F0F00D06F0F0000000000FF00FF00FF00
          FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
          FF00FF00FF00FF00FF0000000000D06F0F0000000000FF00FF00FF00FF00FF00
          FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
          FF00FF00FF00FF00FF00FF00FF0000000000FF00FF00FF00FF00FF00FF00FF00
          FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00}
        EditButton.Style = ebsEllipsisEh
        EditButton.Visible = False
        EditButtons = <>
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
        KeyField = 'FUserID'
        ListField = 'FName'
        ParentCtl3D = False
        ParentFont = False
        TabOrder = 1
        Visible = True
      end
      object EBillNO: TDBEditEh
        Left = 72
        Top = 38
        Width = 90
        Height = 15
        BorderStyle = bsNone
        DataField = 'FBillNo'
        EditButtons = <>
        Enabled = False
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
        ParentColor = True
        ParentFont = False