server_main.dfm

以前用delphi+kol写的监视工具

      MaxHeight = 0
      PlaceDown = False
      PlaceRight = False
      PlaceUnder = False
      Visible = True
      Enabled = True
      DoubleBuffered = False
      Align = caNone
      CenterOnParent = False
      Caption = 'About'
      Ctl3D = True
      Color = clBtnFace
      parentColor = False
      Font.Color = clWindowText
      Font.FontStyle = []
      Font.FontHeight = 8
      Font.FontWidth = 0
      Font.FontWeight = 0
      Font.FontName = 'MS Sans Serif'
      Font.FontOrientation = 0
      Font.FontCharset = 1
      Font.FontPitch = fpVariable
      parentFont = True
      OnClick = Button2Click
      EraseBackground = False
      Localizy = loForm
      TextAlign = taCenter
      VerticalAlign = vaCenter
      TabStop = True
      LikeSpeedButton = False
      autoSize = False
      DefaultBtn = False
      CancelBtn = False
    end
    object Button3: TKOLButton
      Tag = 0
      Left = 120
      Top = 6
      Width = 93
      Height = 22
      HelpContext = 0
      TabOrder = 0
      MinWidth = 0
      MinHeight = 0
      MaxWidth = 0
      MaxHeight = 0
      PlaceDown = False
      PlaceRight = False
      PlaceUnder = False
      Visible = True
      Enabled = True
      DoubleBuffered = False
      Align = caNone
      CenterOnParent = False
      Caption = 'Load Policy'
      Ctl3D = True
      Color = clBtnFace
      parentColor = False
      Font.Color = clWindowText
      Font.FontStyle = []
      Font.FontHeight = 8
      Font.FontWidth = 0
      Font.FontWeight = 0
      Font.FontName = 'MS Sans Serif'
      Font.FontOrientation = 0
      Font.FontCharset = 1
      Font.FontPitch = fpVariable
      parentFont = True
      OnClick = Button3Click
      EraseBackground = False
      Localizy = loForm
      TextAlign = taCenter
      VerticalAlign = vaCenter
      TabStop = True
      LikeSpeedButton = False
      autoSize = False
      DefaultBtn = False
      CancelBtn = False
    end
    object Button4: TKOLButton
      Tag = 0
      Left = 230
      Top = 6
      Width = 93
      Height = 22
      HelpContext = 0
      TabOrder = 0
      MinWidth = 0
      MinHeight = 0
      MaxWidth = 0
      MaxHeight = 0
      PlaceDown = False
      PlaceRight = False
      PlaceUnder = False
      Visible = True
      Enabled = True
      DoubleBuffered = False
      Align = caNone
      CenterOnParent = False
      Caption = 'Save Policy'
      Ctl3D = True
      Color = clBtnFace
      parentColor = False
      Font.Color = clWindowText
      Font.FontStyle = []
      Font.FontHeight = 8
      Font.FontWidth = 0
      Font.FontWeight = 0
      Font.FontName = 'MS Sans Serif'
      Font.FontOrientation = 0
      Font.FontCharset = 1
      Font.FontPitch = fpVariable
      parentFont = True
      OnClick = Button4Click
      EraseBackground = False
      Localizy = loForm
      TextAlign = taCenter
      VerticalAlign = vaCenter
      TabStop = True
      LikeSpeedButton = False
      autoSize = False
      DefaultBtn = False
      CancelBtn = False
    end
    object Button5: TKOLButton
      Tag = 0
      Left = 19
      Top = 6
      Width = 64
      Height = 22
      HelpContext = 0
      TabOrder = 2
      MinWidth = 0
      MinHeight = 0
      MaxWidth = 0
      MaxHeight = 0
      PlaceDown = False
      PlaceRight = False
      PlaceUnder = False
      Visible = True
      Enabled = True
      DoubleBuffered = False
      Align = caNone
      CenterOnParent = False
      Ctl3D = True
      Color = clBtnFace
      parentColor = False
      Font.Color = clWindowText
      Font.FontStyle = []
      Font.FontHeight = 8
      Font.FontWidth = 0
      Font.FontWeight = 0
      Font.FontName = 'MS Sans Serif'
      Font.FontOrientation = 0
      Font.FontCharset = 1
      Font.FontPitch = fpVariable
      parentFont = True
      OnClick = Button5Click
      EraseBackground = False
      Localizy = loForm
      TextAlign = taCenter
      VerticalAlign = vaCenter
      TabStop = True
      LikeSpeedButton = False
      autoSize = False
      DefaultBtn = False
      CancelBtn = False
    end
  end
  object Splitter2: TKOLSplitter
    Tag = 0
    Left = 0
    Top = 65
    Width = 606
    Height = 8
    HelpContext = 0
    TabOrder = 1
    MinWidth = 0
    MinHeight = 0
    MaxWidth = 0
    MaxHeight = 0
    PlaceDown = False
    PlaceRight = False
    PlaceUnder = False
    Visible = True
    Enabled = True
    DoubleBuffered = False
    Align = caTop
    CenterOnParent = False
    Ctl3D = True
    Color = clBtnFace
    parentColor = True
    Font.Color = clWindowText
    Font.FontStyle = []
    Font.FontHeight = 8
    Font.FontWidth = 0
    Font.FontWeight = 0
    Font.FontName = 'MS Sans Serif'
    Font.FontOrientation = 0
    Font.FontCharset = 1
    Font.FontPitch = fpVariable
    parentFont = True
    EraseBackground = False
    Localizy = loForm
    Transparent = False
    MinSizePrev = 0
    MinSizeNext = 0
    edgeStyle = esNone
  end
  object Project: TKOLProject
    Locked = False
    Localizy = False
    projectName = 'wpolicyServer'
    projectDest = 'wpolicyServer'
    sourcePath = 'D:\mydoc\Myapp\WPOLICY\SRV1\'
    outdcuPath = 'D:\mydoc\Myapp\WPOLICY\SRV1\'
    dprResource = False
    protectFiles = True
    showReport = False
    isKOLProject = True
    autoBuild = True
    autoBuildDelay = 500
    BUILD = False
    consoleOut = False
    SupportAnsiMnemonics = 0
    PaintType = ptWYSIWIG
    Left = 40
    Top = 128
  end
  object Main: TKOLForm
    Caption = 'wpolicy server 1.01 beta [KOL] - power by rock'
    Visible = True
    OnClose = MainClose
    AllBtnReturnClick = False
    Locked = False
    formUnit = 'server_main'
    formMain = True
    Enabled = True
    Tabulate = False
    TabulateEx = False
    defaultSize = False
    defaultPosition = False
    MinWidth = 0
    MinHeight = 0
    MaxWidth = 0
    MaxHeight = 0
    HasBorder = True
    HasCaption = True
    StayOnTop = False
    CanResize = True
    CenterOnScreen = False
    Ctl3D = True
    WindowState = wsNormal
    minimizeIcon = True
    maximizeIcon = True
    closeIcon = True
    helpContextIcon = False
    HelpContext = 0
    Color = clBtnFace
    Font.Color = clWindowText
    Font.FontStyle = []
    Font.FontHeight = 8
    Font.FontWidth = 0
    Font.FontWeight = 0
    Font.FontName = 'MS Sans Serif'
    Font.FontOrientation = 0
    Font.FontCharset = 1
    Font.FontPitch = fpVariable
    DoubleBuffered = False
    PreventResizeFlicks = False
    Transparent = False
    AlphaBlend = 255
    Border = 0
    MarginLeft = 0
    MarginRight = 0
    MarginTop = 0
    MarginBottom = 0
    MinimizeNormalAnimated = False
    zOrderChildren = False
    statusSizeGrip = True
    Localizy = False
    OnFormCreate = MainFormCreate
    EraseBackground = False
    supportMnemonics = False
    Left = 80
    Top = 128
  end
  object Server: TKOLTCPServer
    Tag = 0
    Port = 1234
    OnAccept = ServerAccept
    OnError = ServerError
    OnClientError = ServerClientError
    OnClientReceive = ServerClientReceive
    OnClientDisconnect = ServerClientDisconnect
    OnClientStreamReceive = ServerClientStreamReceive
    Left = 120
    Top = 128
  end
  object Client: TKOLTCPClient
    Tag = 0
    Port = 0
    OnConnect = ClientConnect
    Left = 24
    Top = 184
  end
  object PopupMenu1: TKOLPopupMenu
    Tag = 0
    showShortcuts = True
    generateConstants = True
    genearteSepeartorConstants = False
    Flags = []
    Localizy = loForm
    Left = 80
    Top = 32
    ItemCount = 2
    Item0Name = 'N1'
    Item0Caption = 'Show'
    Item0Enabled = True
    Item0Visible = True
    Item0Checked = False
    Item0RadioGroup = 0
    Item0Separator = False
    Item0Accelerator = 0
    Item0Bitmap = ()
    Item0OnMenu = 'PopupMenu1N1Menu'
    Item0SubItemCount = 0
    Item0WindowMenu = False
    Item1Name = 'N2'
    Item1Caption = 'Exit'
    Item1Enabled = True
    Item1Visible = True
    Item1Checked = False
    Item1RadioGroup = 0
    Item1Separator = False
    Item1Accelerator = 0
    Item1Bitmap = ()
    Item1OnMenu = 'PopupMenu1N2Menu'
    Item1SubItemCount = 0
    Item1WindowMenu = False
  end
  object TrayIcon1: TKOLTrayIcon
    Tag = 0
    Icon.Data = {
      0000010001002020100000000000E80200001600000028000000200000004000
      0000010004000000000080020000000000000000000000000000000000000000
      000000008000008000000080800080000000800080008080000080808000C0C0
      C0000000FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000700000000000000000000000000000070000000000000000000000
      0000000000000700000000700000000000000000700700700700007000000000
      0000000000700007000000700000000000007070007000070000007000000000
      0000000000700007000000700000000000000700007000070000007000000000
      0000000000700007000000700000000007000000007000070000007000000000
      0000000000700007000000700000000700000000007000070000007000000000
      0000000000700007000000700000000000000000007000070000007000000000
      0000000000700007000000700000000000000700007000070000007000000000
      0000000000700007000000700000000000007070007000070000007000000000
      0000000070070000070000700000000000000000000000700000007000000000
      0000000000000000000000700000000000000000000000070000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      000000000000000000000000000000000000000000000000000000000000FFFF
      FFFFFFFFFFFFFFFFFFFFFFFFFFFF9F9C1F009F980F009F98871F9F90C31F9F91
      E31F9F11E31F9F31E31F9E31E31F9C71E31F88F1E31F81F1E31F81F1E31F91F1
      E31F98F1E31F9C71E31F9E31E31F9F31E31F9F11E31F9F90E31F9F98C71F9F9C
      0F1F9F9E0F3FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF}
    Active = False
    NoAutoDeactivate = False
    AutoRecreate = False
    OnMouse = TrayIcon1Mouse
    Localizy = loForm
    Left = 120
    Top = 32
  end
  object open1: TKOLOpenSaveDialog
    Tag = 0
    Options = [OSCreatePrompt, OSFileMustExist, OSHideReadonly, OSOverwritePrompt, OSPathMustExist]
    Filter = 'wPolicy config file (*.wpc)|*.wpc'
    FilterIndex = 0
    OpenDialog = True
    Localizy = loForm
    Left = 128
    Top = 192
  end
  object PopupMenu2: TKOLPopupMenu
    Tag = 0
    showShortcuts = True
    generateConstants = True
    genearteSepeartorConstants = False
    Flags = []
    Localizy = loForm
    Left = 272
    Top = 88
    ItemCount = 3
    Item0Name = 'N5'
    Item0Caption = 'Insert'
    Item0Enabled = True
    Item0Visible = True
    Item0Checked = False
    Item0RadioGroup = 0
    Item0Separator = False
    Item0Accelerator = 0
    Item0Bitmap = ()
    Item0OnMenu = 'PopupMenu2N5Menu'
    Item0SubItemCount = 0
    Item0WindowMenu = False
    Item1Name = 'N6'
    Item1Caption = 'Delete'
    Item1Enabled = True
    Item1Visible = True
    Item1Checked = False
    Item1RadioGroup = 0
    Item1Separator = False
    Item1Accelerator = 0
    Item1Bitmap = ()
    Item1OnMenu = 'PopupMenu2N6Menu'
    Item1SubItemCount = 0
    Item1WindowMenu = False
    Item2Name = 'N3'
    Item2Caption = 'Update'
    Item2Enabled = True
    Item2Visible = True
    Item2Checked = False
    Item2RadioGroup = 0
    Item2Separator = False
    Item2Accelerator = 0
    Item2Bitmap = ()
    Item2OnMenu = 'PopupMenu2N3Menu'
    Item2SubItemCount = 0
    Item2WindowMenu = False
  end
  object PopupMenu3: TKOLPopupMenu
    Tag = 0
    showShortcuts = True
    generateConstants = True
    genearteSepeartorConstants = False
    Flags = []
    Localizy = loForm
    Left = 96
    Top = 112
    ItemCount = 1
    Item0Name = 'N4'
    Item0Caption = 'Reload policy'
    Item0Enabled = True
    Item0Visible = True
    Item0Checked = False
    Item0RadioGroup = 0
    Item0Separator = False
    Item0Accelerator = 0
    Item0Bitmap = ()
    Item0OnMenu = 'PopupMenu3N4Menu'
    Item0SubItemCount = 0
    Item0WindowMenu = False
  end
end