Annotation of sbbs/sbbs3/ctrl/nodeformunit.dfm, revision 1.1.1.1

1.1       root        1: object NodeForm: TNodeForm
                      2:   Left = 579
                      3:   Top = 396
                      4:   Width = 277
                      5:   Height = 214
                      6:   Caption = 'Nodes'
                      7:   Color = clBtnFace
                      8:   UseDockManager = True
                      9:   DragKind = dkDock
                     10:   DragMode = dmAutomatic
                     11:   Font.Charset = DEFAULT_CHARSET
                     12:   Font.Color = clWindowText
                     13:   Font.Height = -11
                     14:   Font.Name = 'MS Sans Serif'
                     15:   Font.Style = []
                     16:   OldCreateOrder = False
                     17:   Position = poDefault
                     18:   OnHide = FormHide
                     19:   OnShow = FormShow
                     20:   PixelsPerInch = 96
                     21:   TextHeight = 13
                     22:   object Toolbar: TToolBar
                     23:     Left = 0
                     24:     Top = 0
                     25:     Width = 269
                     26:     Height = 25
                     27:     Caption = 'Toolbar'
                     28:     EdgeBorders = []
                     29:     Flat = True
                     30:     Images = MainForm.ImageList
                     31:     ParentShowHint = False
                     32:     ShowHint = True
                     33:     TabOrder = 0
                     34:     object StartButton: TToolButton
                     35:       Left = 0
                     36:       Top = 0
                     37:       Action = MainForm.NodeListStart
                     38:     end
                     39:     object StopButton: TToolButton
                     40:       Left = 23
                     41:       Top = 0
                     42:       Action = MainForm.NodeListStop
                     43:     end
                     44:     object LockNodeButton: TToolButton
                     45:       Left = 46
                     46:       Top = 0
                     47:       Hint = 'Lock Node(s)'
                     48:       Caption = 'LockNodeButton'
                     49:       ImageIndex = 19
                     50:       OnClick = LockNodeButtonClick
                     51:     end
                     52:     object DownButton: TToolButton
                     53:       Left = 69
                     54:       Top = 0
                     55:       Hint = 'Down Node(s)'
                     56:       Caption = 'DownButton'
                     57:       ImageIndex = 21
                     58:       OnClick = DownButtonClick
                     59:     end
                     60:     object InterruptNodeButton: TToolButton
                     61:       Left = 92
                     62:       Top = 0
                     63:       Hint = 'Interrupt Node(s)'
                     64:       Caption = 'InterruptNodeButton'
                     65:       ImageIndex = 17
                     66:       OnClick = InterruptNodeButtonClick
                     67:     end
                     68:     object RerunToolButton: TToolButton
                     69:       Left = 115
                     70:       Top = 0
                     71:       Hint = 'Rerun Node(s)'
                     72:       Caption = 'RerunToolButton'
                     73:       ImageIndex = 55
                     74:       OnClick = RerunNodeButtonClick
                     75:     end
                     76:     object ClearErrorButton: TToolButton
                     77:       Left = 138
                     78:       Top = 0
                     79:       Hint = 'Clear Errors on Node(s)'
                     80:       Caption = 'ClearErrorButton'
                     81:       ImageIndex = 31
                     82:       OnClick = ClearErrorButtonClick
                     83:     end
                     84:     object SpyButton: TToolButton
                     85:       Left = 161
                     86:       Top = 0
                     87:       Hint = 'Spy on Node(s)'
                     88:       Caption = 'SpyButton'
                     89:       ImageIndex = 39
                     90:       OnClick = SpyButtonClick
                     91:     end
                     92:     object ChatButton: TToolButton
                     93:       Left = 184
                     94:       Top = 0
                     95:       Hint = 'Chat with User'
                     96:       Caption = 'ChatButton'
                     97:       ImageIndex = 37
                     98:       OnClick = ChatButtonClick
                     99:     end
                    100:     object UserMsgButton: TToolButton
                    101:       Left = 207
                    102:       Top = 0
                    103:       Hint = 'Send Message to User'
                    104:       Caption = 'UserMsgButton'
                    105:       ImageIndex = 57
                    106:       OnClick = UserMsgButtonClick
                    107:     end
                    108:     object UserEditButton: TToolButton
                    109:       Left = 230
                    110:       Top = 0
                    111:       Hint = 'Edit User'
                    112:       Caption = 'UserEditButton'
                    113:       ImageIndex = 27
                    114:       OnClick = UserEditButtonClick
                    115:     end
                    116:   end
                    117:   object ListBox: TListBox
                    118:     Left = 0
                    119:     Top = 25
                    120:     Width = 269
                    121:     Height = 162
                    122:     Align = alClient
                    123:     ItemHeight = 13
                    124:     MultiSelect = True
                    125:     PopupMenu = PopupMenu
                    126:     TabOrder = 1
                    127:     OnKeyPress = ListBoxKeyPress
                    128:   end
                    129:   object Timer: TTimer
                    130:     OnTimer = TimerTick
                    131:     Left = 72
                    132:     Top = 120
                    133:   end
                    134:   object PopupMenu: TPopupMenu
                    135:     Left = 128
                    136:     Top = 72
                    137:     object LockMenuItem: TMenuItem
                    138:       Caption = 'Lock Node'
                    139:       ImageIndex = 19
                    140:       OnClick = LockNodeButtonClick
                    141:     end
                    142:     object DownMenuItem: TMenuItem
                    143:       Caption = 'Down Node'
                    144:       ImageIndex = 21
                    145:       OnClick = DownButtonClick
                    146:     end
                    147:     object RerunMenuItem: TMenuItem
                    148:       Caption = 'Rerun Node'
                    149:       ImageIndex = 55
                    150:       OnClick = RerunNodeButtonClick
                    151:     end
                    152:     object InterruptMenuItem: TMenuItem
                    153:       Caption = 'Interrupt Node'
                    154:       ImageIndex = 17
                    155:       OnClick = InterruptNodeButtonClick
                    156:     end
                    157:     object ClearErrorsMenuItem: TMenuItem
                    158:       Caption = 'Clear Errors'
                    159:       ImageIndex = 33
                    160:       OnClick = ClearErrorButtonClick
                    161:     end
                    162:     object ChatMenuItem: TMenuItem
                    163:       Caption = 'Chat w/User'
                    164:       ImageIndex = 39
                    165:       OnClick = ChatButtonClick
                    166:     end
                    167:     object SendMsgMenuItem: TMenuItem
                    168:       Caption = 'Send User Msg'
                    169:       OnClick = UserMsgButtonClick
                    170:     end
                    171:     object SpyMenuItem: TMenuItem
                    172:       Caption = 'Spy on Node'
                    173:       ImageIndex = 41
                    174:       OnClick = SpyButtonClick
                    175:     end
                    176:     object EditUser1: TMenuItem
                    177:       Caption = 'Edit User'
                    178:       Hint = 'EditUserMenuItem'
                    179:       ImageIndex = 27
                    180:       OnClick = UserEditButtonClick
                    181:     end
                    182:     object N1: TMenuItem
                    183:       Caption = '-'
                    184:     end
                    185:     object SelectAllMenuItem: TMenuItem
                    186:       Caption = 'Select &All'
                    187:       OnClick = SelectAllMenuItemClick
                    188:     end
                    189:   end
                    190: end

unix.superglobalmegacorp.com

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.