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

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

unix.superglobalmegacorp.com

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