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

1.1       root        1: object TextFileEditForm: TTextFileEditForm
1.1.1.2 ! root        2:   Left = 317
        !             3:   Top = 253
1.1       root        4:   Width = 783
                      5:   Height = 540
                      6:   Caption = 'TextFileEditForm'
                      7:   Color = clBtnFace
                      8:   Font.Charset = DEFAULT_CHARSET
                      9:   Font.Color = clWindowText
1.1.1.2 ! root       10:   Font.Height = -13
1.1       root       11:   Font.Name = 'MS Sans Serif'
                     12:   Font.Style = []
                     13:   Icon.Data = {
                     14:     0000010001002020100000000000E80200001600000028000000200000004000
                     15:     0000010004000000000080020000000000000000000000000000000000000000
                     16:     000000008000008000000080800080000000800080008080000080808000C0C0
                     17:     C0000000FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF000000
                     18:     0000000000000000000000000000000000000000007777770000000000000000
                     19:     0000000000000007000000000000000000000000000000070000000000000000
                     20:     0000000000777007000000000000000000077070007770070000700000000000
                     21:     0077000700787000000007000000000007708000077877000070007000000000
                     22:     07088807777777770777000700000000008F88877FFFFF077887700700000000
                     23:     00088888F88888FF08870070000000000000880888877778F070007000000007
                     24:     77088888880007778F770077777000700008F088007777077F07000000700700
                     25:     008F08880800077778F7700000700708888F0880F08F807078F7777700700708
                     26:     F88F0780F070F07078F7887700700708888F0780F077807088F7777700700700
                     27:     008F0788FF00080888F77000007000000008F0780FFFF0088F77007000000000
                     28:     0008F07788000888887700700000000000008F07788888880870007000000000
                     29:     00088FF0077788088887000700000000008F888FF00000F87887700700000000
                     30:     0708F8088FFFFF88078700700000000007708000088888000070070000000000
                     31:     0077007000888007000070000000000000077700008F80070007000000000000
                     32:     0000000000888007000000000000000000000000000000070000000000000000
                     33:     000000000777777700000000000000000000000000000000000000000000FFFF
                     34:     FFFFFFFC0FFFFFFC0FFFFFF80FFFFFF80FFFFE180E7FFC00043FF800001FF800
                     35:     000FF800000FFC00001FFE00001FE0000001C000000180000001800000018000
                     36:     00018000000180000001FC00001FFC00001FFE00001FFC00000FF800000FF800
                     37:     001FF800003FFC180C7FFE380EFFFFF80FFFFFF80FFFFFF80FFFFFFFFFFF}
                     38:   Menu = Menu
                     39:   OldCreateOrder = False
                     40:   Position = poDefaultPosOnly
                     41:   OnShow = FormShow
1.1.1.2 ! root       42:   PixelsPerInch = 120
        !            43:   TextHeight = 16
1.1       root       44:   object Panel: TPanel
                     45:     Left = 0
                     46:     Top = 0
                     47:     Width = 775
1.1.1.2 ! root       48:     Height = 33
1.1       root       49:     Align = alTop
                     50:     BevelOuter = bvNone
                     51:     TabOrder = 0
                     52:     object OkButton: TBitBtn
1.1.1.2 ! root       53:       Left = 10
        !            54:       Top = 4
        !            55:       Width = 90
        !            56:       Height = 26
1.1       root       57:       Action = Save
                     58:       Caption = 'OK'
                     59:       ModalResult = 1
                     60:       TabOrder = 0
                     61:       Glyph.Data = {
                     62:         76010000424D7601000000000000760000002800000020000000100000000100
                     63:         04000000000000010000120B0000120B00001000000000000000000000000000
                     64:         800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
                     65:         FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555
                     66:         555555555555555555555555555555555555555555FF55555555555559055555
                     67:         55555555577FF5555555555599905555555555557777F5555555555599905555
                     68:         555555557777FF5555555559999905555555555777777F555555559999990555
                     69:         5555557777777FF5555557990599905555555777757777F55555790555599055
                     70:         55557775555777FF5555555555599905555555555557777F5555555555559905
                     71:         555555555555777FF5555555555559905555555555555777FF55555555555579
                     72:         05555555555555777FF5555555555557905555555555555777FF555555555555
                     73:         5990555555555555577755555555555555555555555555555555}
                     74:       NumGlyphs = 2
                     75:     end
                     76:     object CancelButton: TBitBtn
1.1.1.2 ! root       77:       Left = 105
        !            78:       Top = 4
        !            79:       Width = 89
        !            80:       Height = 26
1.1       root       81:       Caption = 'Discard'
                     82:       ModalResult = 2
                     83:       TabOrder = 1
                     84:       Glyph.Data = {
                     85:         76010000424D7601000000000000760000002800000020000000100000000100
                     86:         04000000000000010000120B0000120B00001000000000000000000000000000
                     87:         800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
                     88:         FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333000000000
                     89:         3333333777777777F3333330F777777033333337F3F3F3F7F3333330F0808070
                     90:         33333337F7F7F7F7F3333330F080707033333337F7F7F7F7F3333330F0808070
                     91:         33333337F7F7F7F7F3333330F080707033333337F7F7F7F7F3333330F0808070
                     92:         333333F7F7F7F7F7F3F33030F080707030333737F7F7F7F7F7333300F0808070
                     93:         03333377F7F7F7F773333330F080707033333337F7F7F7F7F333333070707070
                     94:         33333337F7F7F7F7FF3333000000000003333377777777777F33330F88877777
                     95:         0333337FFFFFFFFF7F3333000000000003333377777777777333333330777033
                     96:         3333333337FFF7F3333333333000003333333333377777333333}
                     97:       NumGlyphs = 2
                     98:     end
                     99:   end
                    100:   object Memo: TRichEdit
                    101:     Left = 0
1.1.1.2 ! root      102:     Top = 33
1.1       root      103:     Width = 775
1.1.1.2 ! root      104:     Height = 451
1.1       root      105:     Align = alClient
                    106:     Font.Charset = DEFAULT_CHARSET
                    107:     Font.Color = clWindowText
1.1.1.2 ! root      108:     Font.Height = -15
1.1       root      109:     Font.Name = 'Courier'
                    110:     Font.Style = []
                    111:     HideSelection = False
                    112:     ParentFont = False
                    113:     PlainText = True
                    114:     PopupMenu = PopupMenu
                    115:     ScrollBars = ssBoth
                    116:     TabOrder = 1
                    117:     WantTabs = True
                    118:     WordWrap = False
                    119:   end
                    120:   object FindDialog: TFindDialog
                    121:     Options = [frDown, frHideUpDown]
                    122:     OnFind = FindDialogFind
                    123:     Left = 264
                    124:     Top = 80
                    125:   end
                    126:   object ReplaceDialog: TReplaceDialog
                    127:     OnFind = FindDialogFind
                    128:     OnReplace = ReplaceDialogReplace
                    129:     Left = 264
                    130:     Top = 112
                    131:   end
                    132:   object Menu: TMainMenu
                    133:     Left = 184
                    134:     Top = 80
                    135:     object FileMenuItem: TMenuItem
                    136:       Caption = '&File'
                    137:       object FileSaveMenuItem: TMenuItem
                    138:         Action = Save
                    139:       end
                    140:       object FileExitMenuItem: TMenuItem
                    141:         Caption = 'E&xit'
                    142:         OnClick = FileExitMenuItemClick
                    143:       end
                    144:     end
                    145:     object EditMenuItem: TMenuItem
                    146:       Caption = '&Edit'
                    147:       object EditUndoMenuItem: TMenuItem
                    148:         Action = Undo
                    149:       end
                    150:       object N5: TMenuItem
                    151:         Caption = '-'
                    152:       end
                    153:       object EditCutMenuItem: TMenuItem
                    154:         Action = Cut
                    155:       end
                    156:       object EditCopyMenuItem: TMenuItem
                    157:         Action = Copy
                    158:       end
                    159:       object EditPasteMenuItem: TMenuItem
                    160:         Action = Paste
                    161:       end
                    162:       object EditSelectAllMenuItem: TMenuItem
                    163:         Action = SelectAll
                    164:       end
                    165:       object N4: TMenuItem
                    166:         Caption = '-'
                    167:       end
                    168:       object EditFindMenuItem: TMenuItem
                    169:         Action = Find
                    170:       end
                    171:       object EditReplaceMenuItem: TMenuItem
                    172:         Action = Replace
                    173:       end
                    174:       object N3: TMenuItem
                    175:         Caption = '-'
                    176:       end
                    177:       object EditInsertCtrlA: TMenuItem
                    178:         Action = InsertCtrlA
                    179:       end
                    180:     end
1.1.1.2 ! root      181:     object FontMenuItem: TMenuItem
        !           182:       Action = ChangeFont
        !           183:     end
1.1       root      184:   end
                    185:   object PopupMenu: TPopupMenu
                    186:     Left = 184
                    187:     Top = 112
                    188:     object CutPopupMenuItem: TMenuItem
                    189:       Action = Cut
                    190:     end
                    191:     object CopyPopupMenuItem: TMenuItem
                    192:       Action = Copy
                    193:     end
                    194:     object PastePopupMenuItem: TMenuItem
                    195:       Action = Paste
                    196:     end
                    197:     object SelectAllPopupMenuItem: TMenuItem
                    198:       Action = SelectAll
                    199:     end
                    200:     object N1: TMenuItem
                    201:       Caption = '-'
                    202:     end
                    203:     object FindPopupMenuItem: TMenuItem
                    204:       Action = Find
                    205:     end
                    206:     object ReplacePopupMenuItem: TMenuItem
                    207:       Action = Replace
                    208:     end
                    209:     object N2: TMenuItem
                    210:       Caption = '-'
                    211:     end
                    212:     object CtrlAPopupMenuItem: TMenuItem
                    213:       Action = InsertCtrlA
                    214:     end
                    215:   end
                    216:   object ActionList: TActionList
                    217:     Left = 224
                    218:     Top = 80
                    219:     object InsertCtrlA: TAction
                    220:       Caption = '&Insert Ctrl-A'
                    221:       ShortCut = 16449
                    222:       OnExecute = InsertCtrlAExecute
                    223:     end
                    224:     object Find: TAction
                    225:       Caption = '&Find...'
                    226:       ShortCut = 16454
                    227:       OnExecute = FindExecute
                    228:     end
                    229:     object Replace: TAction
                    230:       Caption = '&Replace...'
                    231:       ShortCut = 16456
                    232:       OnExecute = ReplaceExecute
                    233:     end
                    234:     object SelectAll: TAction
                    235:       Caption = 'Select &All'
                    236:       OnExecute = SelectAllExecute
                    237:     end
                    238:     object Save: TAction
                    239:       Caption = '&Save'
                    240:       ShortCut = 16467
                    241:       OnExecute = SaveExecute
                    242:     end
                    243:     object Cut: TAction
                    244:       Caption = 'Cu&t'
                    245:       ShortCut = 16472
                    246:       OnExecute = CutExecute
                    247:     end
                    248:     object Copy: TAction
                    249:       Caption = '&Copy'
                    250:       ShortCut = 16451
                    251:       OnExecute = CopyExecute
                    252:     end
                    253:     object Paste: TAction
                    254:       Caption = '&Paste'
                    255:       ShortCut = 16470
                    256:       OnExecute = PasteExecute
                    257:     end
                    258:     object Undo: TAction
                    259:       Caption = '&Undo'
                    260:       ShortCut = 16474
                    261:       OnExecute = UndoExecute
                    262:     end
1.1.1.2 ! root      263:     object ChangeFont: TAction
        !           264:       Caption = 'Font'
        !           265:       OnExecute = ChangeFontExecute
        !           266:     end
        !           267:   end
        !           268:   object FontDialog: TFontDialog
        !           269:     Font.Charset = DEFAULT_CHARSET
        !           270:     Font.Color = clWindowText
        !           271:     Font.Height = -13
        !           272:     Font.Name = 'MS Sans Serif'
        !           273:     Font.Style = []
        !           274:     MinFontSize = 0
        !           275:     MaxFontSize = 0
        !           276:     Options = [fdApplyButton]
        !           277:     OnApply = FontDialogApply
        !           278:     Left = 144
        !           279:     Top = 80
1.1       root      280:   end
                    281: end

unix.superglobalmegacorp.com

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