changepropertiespluginu.dfm

Jedi Code Library JCL JVCL 组件包 JCL+JVCL超过300个组件的非可视/可视大型组件包。

object uilPlugin1: TuilPlugin1
  OldCreateOrder = False
  Author = 'Tim Sullivan'
  Commands = <
    item
      Bitmap.Data = {
        4E010000424D4E01000000000000760000002800000012000000120000000100
        040000000000D800000000000000000000001000000000000000000000000000
        80000080000000808000800000008000800080800000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
        7777770000007F00000000000000070000007F77777777777777070000007F77
        777777777777070000007F77777777777777070000007F777777777777770700
        00007F77777777777777070000007F77777777777777070000007F7777777777
        7777070000007F77777777777777070000007F77777777777777070000007F77
        777777777777070000007F77777777777777070000007F777777777777770700
        00007F44444444444444070000007F4444444444F7F7070000007FFFFFFFFFFF
        FFFFF7000000777777777777777777000000}
      Caption = 'Change Caption'
      Hint = 'Change the caption of the host application'
      Name = 'Change Caption'
      OnExecute = uilPlugin1Commands0Execute
    end
    item
      Bitmap.Data = {
        4E010000424D4E01000000000000760000002800000012000000120000000100
        040000000000D800000000000000000000001000000010000000000000000000
        80000080000000808000800000008000800080800000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00666666666666
        66666600000068FFFFFFFFFFF66666000000680777777777F66666000000680F
        FFFFFFF7F66666000000680FFF0FFFF7F66666000000680FF000FFF7F6666600
        0000680F00008FF7F66666000000680F00F800F7F66666000000680F0FF70008
        F66666000000680FFFF78000066666000000680FFFF7700B8086660000006800
        0000088FB70066000000688888888887FB7806000000666666666688BFB7B000
        00006666666666687B44040000006666666666688F4440000000666666666666
        4444440000006666666666664CC444000000}
      Caption = 'Enable/Disable a button'
      Hint = 'Enable or disable a button on the form'
      Name = 'Enable Disable'
      OnExecute = uilPlugin1Commands1Execute
    end
    item
      Bitmap.Data = {
        DE010000424DDE01000000000000760000002800000024000000120000000100
        0400000000006801000000000000000000001000000010000000000000000000
        80000080000000808000800000008000800080800000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00666666666666
        6666666666666666666666660000666666666666666666666666666666666666
        0000666666666666666666666666666666666666000066666666FFF666666666
        666666FFF666666600006666666844F66666666666666888F666666600006666
        666844F66666666666666888F666666600006666666844F66666666666666888
        F666666600006666FFF644FFFFF6666666FFF888FFFFF6660000666844444444
        44F66666688888888888F666000066684444444444F66666688888888888F666
        000066688888446888666666688888888888666600006666666844F666666666
        66666888F666666600006666666844F66666666666666888F666666600006666
        666844F66666666666666888F666666600006666666888666666666666666888
        6666666600006666666666666666666666666666666666660000666666666666
        6666666666666666666666660000666666666666666666666666666666666666
        0000}
      Caption = 'Add to Listbox'
      Hint = 'Adds an item to the list box'
      Name = 'Add To Listbox'
      OnExecute = uilPlugin1Commands2Execute
    end>
  Description = 
    'This plugin changes properties of the host application. It conta' +
    'ins 3 commands and does not respond to messages.'
  Copyright = '(c) 1999 Unlimited Intelligence Limited'
  PluginID = 'UIL.Change Properties Sample'
  Left = 227
  Top = 147
  Height = 150
  Width = 215
end