ondemandu.dfm

Ondemand是IBM公司开发的报表管理系统,广泛使用于金融、保险、电信等大型企业. 但是由于某些原因,其报表下载和检索功能作的并不尽如人意,本程序是对Ondemand报表系统的下载和检索

        FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
        FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
        FFFFFFFFFFFFFFFFFFFFFFFFFDFFFFFFFEFFFFFFFEFFFFFFFEFFFFFFFFFFFFFF
        FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
        FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
        FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
        FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
        FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
        FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
        FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
        FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
        FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
        FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
        FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
        FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
        FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
        FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
        FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
        FFFFFFFFFFFFFFFFFFFFFFFF52006F006F007400200045006E00740072007900
        0000000000000000000000000000000000000000000000000000000000000000
        00000000000000000000000016000500FFFFFFFFFFFFFFFF0200000080DCFD73
        A9AE1A1098A700AA003749590000000000000000000000003046135CF552C601
        03000000800100000000000001004F006C006500000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000A000200FFFFFFFFFFFFFFFFFFFFFFFF00000000
        0000000000000000000000000000000000000000000000000000000000000000
        00000000140000000000000043006F006E00740065006E007400730000000000
        0000000000000000000000000000000000000000000000000000000000000000
        000000000000000000000000120002010100000003000000FFFFFFFF00000000
        0000000000000000000000000000000000000000000000000000000000000000
        01000000A10000000000000002004F006C006500500072006500730030003000
        3000000000000000000000000000000000000000000000000000000000000000
        00000000000000000000000018000200FFFFFFFFFFFFFFFFFFFFFFFF00000000
        0000000000000000000000000000000000000000000000000000000000000000
        040000006400000000000000FEFFFFFF0200000003000000FEFFFFFF05000000
        FEFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
        FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
        FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
        FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
        FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
        FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
        FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
        FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
        FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
        FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
        FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
        FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
        FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
        FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
        FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
        FFFFFFFFFFFFFFFFFFFFFFFF0100000200000000000000000000000000000000
        30701B0000000000000000000000000000000000000000000000000000000000
        0000000000000000000000007B5C727466315C616E73695C616E736963706739
        33365C64656666305C6465666C616E67313033335C6465666C616E6766653230
        35327B5C666F6E7474626C7B5C66305C666D6F6465726E5C66707271365C6663
        686172736574313334205C2763625C2763655C2763635C2765353B7D7D0D0A5C
        766965776B696E64345C7563315C706172645C6C616E67323035325C66305C66
        7332305C7061720D0A7D0D0A0000000000000000000000000000000000000000
        000000000000000000000000FFFFFFFF030000000400000001000000FFFFFFFF
        0200000000000000B0270000F801000022000000010009000003110000000000
        0500000000000500000002010100000003000000000000000000000000000000
        00000000000000004E414E490000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        000000000000000000000000}
    end
    object G2: TStringGrid
      Left = 9
      Top = 98
      Width = 1005
      Height = 84
      Align = alClient
      BorderStyle = bsNone
      Color = clMoneyGreen
      ColCount = 1
      Ctl3D = False
      FixedColor = clSkyBlue
      FixedCols = 0
      RowCount = 1
      FixedRows = 0
      Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goRangeSelect, goRowSizing, goColSizing, goColMoving, goEditing]
      ParentCtl3D = False
      PopupMenu = PopupMenu2
      TabOrder = 1
    end
    object TPanel
      Left = 9
      Top = 9
      Width = 1005
      Height = 89
      Align = alTop
      BevelInner = bvLowered
      BevelWidth = 2
      Color = clSkyBlue
      TabOrder = 2
      object Label4: TLabel
        Left = 480
        Top = 16
        Width = 73
        Height = 13
        AutoSize = False
        Caption = #25628#32034#23383#31526#20018
      end
      object T1: TEdit
        Left = 480
        Top = 34
        Width = 425
        Height = 20
        BevelKind = bkFlat
        Color = clCream
        TabOrder = 0
      end
      object Button3: TButton
        Left = 911
        Top = 32
        Width = 75
        Height = 25
        Action = DownAndSearch
        Caption = #26816#32034
        TabOrder = 1
      end
      object RadioGroup1: TRadioGroup
        Left = 4
        Top = 4
        Width = 469
        Height = 81
        Align = alLeft
        Caption = #26816#32034#26041#24335
        Columns = 2
        ItemIndex = 0
        Items.Strings = (
          #25253#34920#19979#36733#21518#26816#32034
          #22312#24050#19979#36733#30340#30446#24405#20013#26816#32034
          #26816#32034#21333#19968#25253#34920
          #32467#26524#20013#26816#32034)
        TabOrder = 2
      end
    end
  end
  object ActionList1: TActionList
    Left = 462
    Top = 191
    object LoginAction: TAction
      Caption = #30331#24405
      OnExecute = LoginActionExecute
    end
    object OpenDir: TAction
      Caption = #25171#24320#30446#24405
      OnExecute = OpenDirExecute
    end
    object DownLoadAll: TAction
      Caption = #19979#36733#20840#37096#25253#34920
      Enabled = False
      OnExecute = DownLoadAllExecute
    end
    object RemoteSearch: TAction
      Caption = #26381#21153#31471#25628#32034
      Enabled = False
      OnExecute = RemoteSearchExecute
    end
    object DownAndSearch: TAction
      Caption = #19979#36733#21518#25628#32034
      OnExecute = DownAndSearchExecute
    end
    object Action1: TAction
      Caption = #20445#23384
      OnExecute = Action1Execute
    end
    object OpenDocAction: TAction
      Caption = #25171#24320#25253#34920
      OnExecute = OpenDocActionExecute
    end
    object Action2: TAction
      Caption = #23519#30475#21407#25991#20214
      OnExecute = Action2Execute
    end
    object DownLoadTheRep: TAction
      Caption = #19979#36733#25253#34920
      OnExecute = DownLoadTheRepExecute
    end
    object SelectAll: TAction
      Caption = #36873#25321#20840#37096
      OnExecute = SelectAllExecute
    end
    object UnselAll: TAction
      Caption = #20840#37096#21462#28040
      OnExecute = UnselAllExecute
    end
  end
  object PopupMenu1: TPopupMenu
    OnPopup = PopupMenu1Popup
    Left = 270
    Top = 226
    object OpenDir1: TMenuItem
      Action = OpenDir
    end
  end
  object PopupMenu2: TPopupMenu
    OnPopup = PopupMenu2Popup
    Left = 416
    Top = 379
    object N1: TMenuItem
      Action = Action1
    end
    object N2: TMenuItem
      Caption = '-'
    end
    object N3: TMenuItem
      Action = Action2
    end
  end
  object PopupMenu3: TPopupMenu
    OnPopup = PopupMenu3Popup
    Left = 376
    Top = 157
    object N4: TMenuItem
      Action = OpenDocAction
    end
    object N5: TMenuItem
      Caption = '-'
    end
    object N8: TMenuItem
      Action = DownLoadTheRep
    end
    object N6: TMenuItem
      Caption = '-'
    end
    object N7: TMenuItem
      Action = DownLoadAll
    end
    object N9: TMenuItem
      Caption = '-'
    end
    object N10: TMenuItem
      Action = SelectAll
      Caption = #20840#37096#36873#20013
    end
    object N11: TMenuItem
      Action = UnselAll
    end
  end
  object Savex: TSaveDialog
    Filter = #25991#26412#25991#20214'|*.txt'
    Left = 528
    Top = 165
  end
  object Open1: TOpenDialog
    Left = 470
    Top = 239
  end
end