52610.fb2 Пишем программу для создания книг FB2. - читать онлайн бесплатно полную версию книги . Страница 10

Пишем программу для создания книг FB2. - читать онлайн бесплатно полную версию книги . Страница 10

Итак, начали.

Unit1.dfm

// начало кода

object Form1: TForm1

Left = 187

Top = 98

Width = 722

Height = 463

Caption = 'Form1'

Color = clBtnFace

Font.Charset = DEFAULT_CHARSET

Font.Color = clWindowText

Font.Height = -11

Font.Name = 'MS Sans Serif'

Font.Style = []

Menu = MainMenu1

OldCreateOrder = False

OnCreate = FormCreate

PixelsPerInch = 96

TextHeight = 13

object PageControl1: TPageControl

Left = 0

Top = 0

Width = 714

Height = 417

ActivePage = TabSheet2

Align = alClient

TabIndex = 3

TabOrder = 0

object TabSheet1: TTabSheet

Caption = 'title-info'

object Annotation: TMemo

Left = 0

Top = 273

Width = 706

Height = 116

Align = alClient

ScrollBars = ssVertical

TabOrder = 0

WordWrap = False

end

object Panel3: TPanel

Left = 0

Top = 0

Width = 706

Height = 273

Align = alTop

BevelOuter = bvNone

TabOrder = 1

object Lbook_title: TLabel

Left = 8