uredata.dfm

非长好的DELPHI办公系统 直接可以用

object frmReData: TfrmReData
  Left = 251
  Top = 227
  BorderIcons = [biSystemMenu]
  BorderStyle = bsSingle
  Caption = #25968#25454#36824#21407
  ClientHeight = 173
  ClientWidth = 287
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Position = poMainFormCenter
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object Label1: TLabel
    Left = 48
    Top = 8
    Width = 180
    Height = 19
    Caption = #35831#36873#25321#19968#20010#25968#25454#25991#20214
    Font.Charset = GB2312_CHARSET
    Font.Color = clNavy
    Font.Height = -19
    Font.Name = #26999#20307'_GB2312'
    Font.Style = []
    ParentFont = False
    Transparent = True
  end
  object lvReData: TListView
    Left = 8
    Top = 32
    Width = 273
    Height = 105
    Columns = <
      item
        Caption = #25991#20214#21517
        Width = 75
      end
      item
        Caption = #21019#24314#26085#26399
        Width = 175
      end>
    GridLines = True
    HideSelection = False
    ReadOnly = True
    RowSelect = True
    TabOrder = 0
    ViewStyle = vsReport
    OnClick = lvReDataClick
    OnDblClick = lvReDataDblClick
  end
  object btnReStore: TBitBtn
    Left = 8
    Top = 146
    Width = 62
    Height = 22
    Caption = #36824' '#21407
    TabOrder = 1
    OnClick = btnReStoreClick
    Glyph.Data = {
      EE000000424DEE000000000000007600000028000000100000000F0000000100
      0400000000007800000000000000000000001000000000000000000000000000
      8000008000000080800080000000800080008080000080808000C0C0C0000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFFFFFFFFF
      FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF47FFFFFFF
      FFFFFF74FFFFF44444FFFF4FFFFFFF4444FFFF4FFFFFFFF444FFFF4FFFFFFF4F
      44FFFF74FFFF44FFF4FFFFF74444FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
      FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF}
  end
  object btnDel: TBitBtn
    Left = 72
    Top = 146
    Width = 62
    Height = 22
    Caption = #21024' '#38500
    TabOrder = 2
    OnClick = btnDelClick
    Glyph.Data = {
      EE000000424DEE000000000000007600000028000000100000000F0000000100
      04000000000078000000130B0000130B00001000000000000000000000000000
      8000008000000080800080000000800080008080000080808000C0C0C0000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888
      888888888888888881F88881F8888888888888991F8888889F8888191F888881
      F888888199F88891F8888888191F819F88888888819199F88888888888919F88
      88888888891911F888888888191F89F88888889191F88819F88881919F888881
      9F88891F8888888819F88888888888888888}
  end
  object btnClose: TBitBtn
    Left = 216
    Top = 146
    Width = 62
    Height = 22
    Caption = #20851' '#38381
    TabOrder = 3
    OnClick = btnCloseClick
    Glyph.Data = {
      EE000000424DEE000000000000007600000028000000100000000F0000000100
      0400000000007800000000000000000000001000000000000000000000000000
      8000008000000080800080000000800080008080000080808000C0C0C0000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFF0FFFFFF
      FFFFFFFF00FFFFFFFFFFFFF030FFFFFFFFFFFF0330FFFFFFFFFF003330000000
      0FFFF03330FF0FFFFFFFF03300FF0FFFF4FFF03330FF0FFF44FFF03330FF0FF4
      4444F03330FF0F444444F03330FF0FF44444F0330FFF0FFF44FFF030FFFF0FFF
      F4FFF00FFFFF0FFFFFFFF00000000FFFFFFF}
  end
  object xpReData: TXPMenu
    Font.Charset = GB2312_CHARSET
    Font.Color = clMenuText
    Font.Height = -11
    Font.Name = 'Tahoma'
    Font.Style = []
    Active = True
    Left = 256
  end
end