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

1.1       root        1: object NodeForm: TNodeForm
                      2:   Left = 579
1.1.1.2 ! root        3:   Top = 322
1.1       root        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
1.1.1.2 ! root       13:   Font.Height = -14
1.1       root       14:   Font.Name = 'MS Sans Serif'
                     15:   Font.Style = []
                     16:   OldCreateOrder = False
                     17:   Position = poDefault
                     18:   OnHide = FormHide
1.1.1.2 ! root       19:   PixelsPerInch = 120
        !            20:   TextHeight = 16
1.1       root       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
1.1.1.2 ! root       34:       Left = 0
1.1       root       35:       Top = 0
                     36:       Hint = 'Lock Node(s)'
                     37:       Caption = 'LockNodeButton'
                     38:       ImageIndex = 19
                     39:       OnClick = LockNodeButtonClick
                     40:     end
                     41:     object DownButton: TToolButton
1.1.1.2 ! root       42:       Left = 23
1.1       root       43:       Top = 0
                     44:       Hint = 'Down Node(s)'
                     45:       Caption = 'DownButton'
                     46:       ImageIndex = 21
                     47:       OnClick = DownButtonClick
                     48:     end
                     49:     object InterruptNodeButton: TToolButton
1.1.1.2 ! root       50:       Left = 46
1.1       root       51:       Top = 0
                     52:       Hint = 'Interrupt Node(s)'
                     53:       Caption = 'InterruptNodeButton'
                     54:       ImageIndex = 17
                     55:       OnClick = InterruptNodeButtonClick
                     56:     end
                     57:     object RerunToolButton: TToolButton
1.1.1.2 ! root       58:       Left = 69
1.1       root       59:       Top = 0
                     60:       Hint = 'Rerun Node(s)'
                     61:       Caption = 'RerunToolButton'
                     62:       ImageIndex = 55
                     63:       OnClick = RerunNodeButtonClick
                     64:     end
                     65:     object ClearErrorButton: TToolButton
1.1.1.2 ! root       66:       Left = 92
1.1       root       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
1.1.1.2 ! root       74:       Left = 115
1.1       root       75:       Top = 0
                     76:       Hint = 'Spy on Node(s)'
                     77:       Caption = 'SpyButton'
                     78:       ImageIndex = 39
                     79:       OnClick = SpyButtonClick
                     80:     end
                     81:     object ChatButton: TToolButton
1.1.1.2 ! root       82:       Left = 138
1.1       root       83:       Top = 0
                     84:       Hint = 'Chat with User'
                     85:       Caption = 'ChatButton'
                     86:       ImageIndex = 37
                     87:       OnClick = ChatButtonClick
                     88:     end
                     89:     object UserMsgButton: TToolButton
1.1.1.2 ! root       90:       Left = 161
1.1       root       91:       Top = 0
                     92:       Hint = 'Send Message to User'
                     93:       Caption = 'UserMsgButton'
                     94:       ImageIndex = 57
                     95:       OnClick = UserMsgButtonClick
                     96:     end
                     97:     object UserEditButton: TToolButton
1.1.1.2 ! root       98:       Left = 184
1.1       root       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
1.1.1.2 ! root      110:     Height = 156
1.1       root      111:     Align = alClient
1.1.1.2 ! root      112:     ItemHeight = 16
1.1       root      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
1.1.1.2 ! root      128:       ShortCut = 16460
1.1       root      129:       OnClick = LockNodeButtonClick
                    130:     end
                    131:     object DownMenuItem: TMenuItem
                    132:       Caption = 'Down Node'
                    133:       ImageIndex = 21
1.1.1.2 ! root      134:       ShortCut = 16452
1.1       root      135:       OnClick = DownButtonClick
                    136:     end
                    137:     object RerunMenuItem: TMenuItem
                    138:       Caption = 'Rerun Node'
                    139:       ImageIndex = 55
1.1.1.2 ! root      140:       ShortCut = 16466
1.1       root      141:       OnClick = RerunNodeButtonClick
                    142:     end
                    143:     object InterruptMenuItem: TMenuItem
                    144:       Caption = 'Interrupt Node'
                    145:       ImageIndex = 17
1.1.1.2 ! root      146:       ShortCut = 16457
1.1       root      147:       OnClick = InterruptNodeButtonClick
                    148:     end
                    149:     object ClearErrorsMenuItem: TMenuItem
                    150:       Caption = 'Clear Errors'
                    151:       ImageIndex = 33
1.1.1.2 ! root      152:       ShortCut = 46
1.1       root      153:       OnClick = ClearErrorButtonClick
                    154:     end
                    155:     object ChatMenuItem: TMenuItem
                    156:       Caption = 'Chat w/User'
                    157:       ImageIndex = 39
1.1.1.2 ! root      158:       ShortCut = 121
1.1       root      159:       OnClick = ChatButtonClick
                    160:     end
                    161:     object SendMsgMenuItem: TMenuItem
                    162:       Caption = 'Send User Msg'
1.1.1.2 ! root      163:       ShortCut = 122
1.1       root      164:       OnClick = UserMsgButtonClick
                    165:     end
                    166:     object SpyMenuItem: TMenuItem
                    167:       Caption = 'Spy on Node'
                    168:       ImageIndex = 41
1.1.1.2 ! root      169:       ShortCut = 123
1.1       root      170:       OnClick = SpyButtonClick
                    171:     end
                    172:     object EditUser1: TMenuItem
                    173:       Caption = 'Edit User'
                    174:       Hint = 'EditUserMenuItem'
                    175:       ImageIndex = 27
1.1.1.2 ! root      176:       ShortCut = 113
1.1       root      177:       OnClick = UserEditButtonClick
                    178:     end
                    179:     object N1: TMenuItem
                    180:       Caption = '-'
                    181:     end
1.1.1.2 ! root      182:     object RefreshMenuItem: TMenuItem
        !           183:       Caption = 'Refresh'
        !           184:       ShortCut = 116
        !           185:       OnClick = RefreshMenuItemClick
        !           186:     end
1.1       root      187:     object SelectAllMenuItem: TMenuItem
                    188:       Caption = 'Select &All'
1.1.1.2 ! root      189:       ShortCut = 16449
1.1       root      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.