Высокоуровневые методы информатики и программирования. Сивохин А.В - 144 стр.

         Caption = 'TextFile'
         object miWriteTextFile: TMenuItem
           Caption = 'WriteTextFile'
           OnClick = miWriteTextFileClick
         end
         object miReadTextFile: TMenuItem
           Caption = 'ReadTextFile'
           OnClick = miReadTextFileClick
         end
        end
        object miOrlovTypeFiles: TMenuItem
         Caption = 'TypeFile'
         object miWriteTypeFile: TMenuItem
           Caption = 'WriteTypeFile'
           OnClick = miWriteTypeFileClick
         end
         object miReadTypeFile: TMenuItem
           Caption = 'ReadTypeFile'
           OnClick = miReadTypeFileClick
         end
        end
       end
       object OrlovColorDialog: TColorDialog
        Left = 120
        Top = 464
       end
       object OrlovFontDialog: TFontDialog
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        Left = 176
        Top = 464
       end
      end //— 5. Конец описания формы для работы с файлами.




      object OrlovGraficForm: TOrlovGraficForm //— 6. Оописание формы для
                                               //     работы с графикой:
       Left = 271
       Top = 184
       Width = 550
       Height = 480
121