Measure/Forms/UpFileSelectOnLineFrm.dfm

object UpFileSelectOnLineForm: TUpFileSelectOnLineForm
  Left = 1121
  Top = 282
  BorderStyle = bsDialog
  Caption = #32447#19978#36873#25321#38468#20214
  ClientHeight = 467
  ClientWidth = 631
  Color = clBtnFace
  Font.Charset = ANSI_CHARSET
  Font.Color = clWindowText
  Font.Height = -13
  Font.Name = #24494#36719#38597#40657
  Font.Style = []
  OldCreateOrder = False
  Position = poMainFormCenter
  PixelsPerInch = 96
  TextHeight = 19
  object ZJGrid1: TZJGrid
    Left = 5
    Top = 5
    Width = 621
    Height = 428
    Options = [goRangeSelect, goRowSizing, goColSizing, goCellNotMaintainData, goFixedRowShowNo, goFixedColShowNo, goAlwaysShowSelection]
    OptionsEx = []
    ColCount = 4
    RowCount = 2
    ShowGridLine = False
    DefaultColWidth = 70
    DefaultFixedColWidth = 30
    Selection.AlphaBlend = False
    Selection.TransparentColor = False
    FrozenCol = 0
    FrozenRow = 0
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
  end
  object btnOK: TButton
    Left = 470
    Top = 437
    Width = 75
    Height = 25
    Caption = #30830#23450
    ModalResult = 1
    TabOrder = 1
  end
  object btnCancel: TButton
    Left = 550
    Top = 437
    Width = 75
    Height = 25
    Caption = #21462#28040
    ModalResult = 2
    TabOrder = 2
  end
  object ZjGridDBA1: TZjGridDBA
    Columns = <
      item
        Title.Caption = #38468#20214#21517#31216
        Title.CaptionAcrossCols = '1'
        Title.Font.Charset = GB2312_CHARSET
        Title.Font.Color = clWindowText
        Title.Font.Height = -12
        Title.Font.Name = #23435#20307
        Title.Font.Style = []
        Alignment = taLeftJustify
        Font.Charset = GB2312_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = #23435#20307
        Font.Style = []
        FieldName = 'Name'
        Width = 400
        ReadOnly = True
      end
      item
        Title.Caption = #19978#20256#32773
        Title.CaptionAcrossCols = '1'
        Title.Font.Charset = GB2312_CHARSET
        Title.Font.Color = clWindowText
        Title.Font.Height = -12
        Title.Font.Name = #23435#20307
        Title.Font.Style = []
        Alignment = taCenter
        Font.Charset = GB2312_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = #23435#20307
        Font.Style = []
        FieldName = 'Uper'
        ReadOnly = True
      end
      item
        Title.Caption = #36873#25321
        Title.CaptionAcrossCols = '1'
        Title.Font.Charset = GB2312_CHARSET
        Title.Font.Color = clWindowText
        Title.Font.Height = -12
        Title.Font.Name = #23435#20307
        Title.Font.Style = []
        Alignment = taCenter
        Font.Charset = GB2312_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = #23435#20307
        Font.Style = []
        FieldName = 'Select'
        Width = 50
        ReadOnly = False
      end>
    DataSet = cdsFiles
    Grid = ZJGrid1
    ExtendRowCount = 1
    Options = [aoAllowEdit, aoAutoInsert, aoAllowUpMove, aoAllowDownMove]
    Left = 384
    Top = 88
  end
  object cdsFiles: TClientDataSet
    Active = True
    Aggregates = <>
    FieldDefs = <
      item
        Name = 'ID'
        DataType = ftString
        Size = 20
      end
      item
        Name = 'Name'
        DataType = ftString
        Size = 255
      end
      item
        Name = 'Uper'
        DataType = ftString
        Size = 20
      end
      item
        Name = 'Select'
        DataType = ftBoolean
      end>
    IndexDefs = <>
    FetchOnDemand = False
    Params = <>
    StoreDefs = True
    Left = 416
    Top = 88
    Data = {
      720000009619E0BD010000001800000004000000000003000000720002494401
      00490000000100055749445448020002001400044E616D650200490000000100
      05574944544802000200FF000455706572010049000000010005574944544802
      00020014000653656C65637402000300000000000000}
    object cdsFilesID: TStringField
      FieldName = 'ID'
    end
    object cdsFilesName: TStringField
      FieldName = 'Name'
      Size = 255
    end
    object cdsFilesUper: TStringField
      FieldName = 'Uper'
    end
    object cdsFilesSelect: TBooleanField
      FieldName = 'Select'
    end
  end
end