Пишем программу (в Delphi) для создания книг FB2 - страница 7

стр.

>

>Caption = 'Tome'

>end

>object book_title: TEdit

>Left = 64

>Top = 56

>Width = 217

>Height = 21

>TabOrder = 0

>end

>object FB2_file: TEdit

>Left = 8

>Top = 24

>Width = 273

>Height = 21

>TabOrder = 1

>end

>object Au: TGroupBox

>Left = 296

>Top = 8

>Width = 185

>Height = 153

>Caption = ' Authors '

>TabOrder = 2

>object ListBox3: TListBox

>Left = 8

>Top = 15

>Width = 169

>Height = 106

>ItemHeight = 13

>TabOrder = 0

>end

>object Button10: TButton

>Left = 152

>Top = 124

>Width = 25

>Height = 25

>Caption = '…'

>TabOrder = 1

>OnClick = Button10Click

>end

>end

>object GroupBox1: TGroupBox

>Left = 8

>Top = 88

>Width = 273

>Height = 73

>Caption = ' Genre '

>ParentShowHint = False

>ShowHint = False

>TabOrder = 3

>object GenresBox: TListBox

>Left = 8

>Top = 15

>Width = 225

>Height = 50

>ItemHeight = 13

>TabOrder = 0

>end

>object Button4: TButton

>Left = 240

>Top = 40

>Width = 25

>Height = 25

>Caption = '…'

>Font.Charset = DEFAULT_CHARSET

>Font.Color = clWindowText

>Font.Height = –13

>Font.Name = 'MS Sans Serif'

>Font.Style = []

>ParentFont = False

>TabOrder = 1

>OnClick = Button4Click

>end

>end

>object GroupBox3: TGroupBox

>Left = 480

>Top = 8

>Width = 185

>Height = 153

>Caption = ' Translator '

>TabOrder = 4

>object ListBox2: TListBox

>Left = 8

>Top = 15

>Width = 169

>Height = 106

>ItemHeight = 13

>TabOrder = 0

>end

>object Button7: TButton

>Left = 152

>Top = 124

>Width = 25

>Height = 25

>Caption = '…'

>TabOrder = 1

>OnClick = Button7Click

>end

>end

>object sequence: TEdit

>Left = 40

>Top = 192

>Width = 169

>Height = 21

>TabOrder = 5

>end

>object tome: TEdit

>Left = 216

>Top = 192

>Width = 33

>Height = 21

>TabOrder = 6

>end

>object Lang: TComboBox

>Left = 376

>Top = 192

>Width = 65

>Height = 21

>ItemHeight = 13

>TabOrder = 7

>Text = 'ru'

>Items.Strings = (

>'ru'

>'en')

>end

>object SLang: TComboBox

>Left = 456

>Top = 192

>Width = 145

>Height = 21

>ItemHeight = 13

>TabOrder = 8

>end

>object Button9: TButton

>Left = 88

>Top = 238

>Width = 121

>Height = 17

>Caption = 'Load annotation'

>TabOrder = 9

>OnClick = Button9Click

>end

>end

>end

>object TabSheet3: TTabSheet

>Caption = 'document-info'

>ImageIndex = 2

>object Lurl: TLabel

>Left = 32

>Top = 40

>Width = 28

>Height = 13

>Caption = 'src-url'

>end

>object LID: TLabel

>Left = 32

>Top = 120

>Width = 11

>Height = 13

>Caption = 'ID'

>end

>object Lversion: TLabel

>Left = 24

>Top = 200

>Width = 34

>Height = 13

>Caption = 'version'

>end

>object url: TEdit

>Left = 40

>Top = 64

>Width = 553

>Height = 21

>TabOrder = 0

>end

>object id: TEdit

>Left = 40

>Top = 144

>Width = 241

>Height = 21

>TabOrder = 1

>end

>object version: TEdit

>Left = 40

>Top = 224

>Width = 65

>Height = 21

>TabOrder = 2

>Text = '1.0'

>end

>end

>object TabSheet6: TTabSheet

>Caption = 'publish-info'

>ImageIndex = 3

>object LISBN: TLabel

>Left = 40

>Top = 80

>Width = 25

>Height = 13

>Caption = 'ISBN'

>end

>object LBook_name: TLabel

>Left = 16

>Top = 32

>Width = 54

>Height = 13

>Caption = 'Book name'

>end

>object Lpublisher: TLabel

>Left = 16

>Top = 128

>Width = 42

>Height = 13

>Caption = 'publisher'

>end

>object Lcity: TLabel

>Left = 32

>Top = 200

>Width = 16

>Height = 13

>Caption = 'city'

>end

>object Lyear: TLabel

>Left = 280

>Top = 200

>Width = 20

>Height = 13

>Caption = 'year'

>end

>object isbn: TEdit

>Left = 80

>Top = 72

>Width = 217

>Height = 21

>TabOrder = 0

>end

>object Book_name: TEdit

>Left = 80

>Top = 24

>Width = 561

>Height = 21

>TabOrder = 1

>end

>object publisher: TEdit

>Left = 80

>Top = 120

>Width = 553

>Height = 21

>TabOrder = 2

>end

>object year: TEdit

>Left = 312

>Top = 196

>Width = 57

>Height = 21

>TabOrder = 3

>end

>object city: TEdit

>Left = 80

>Top = 192

>Width = 145

>Height = 21

>TabOrder = 4

>end

>end

>object TabSheet2: TTabSheet

>Caption = 'Content'

>ImageIndex = 1

>object Panel1: TPanel

>Left = 0

>Top = 0

>Width = 706

>Height = 41

>Align = alTop

>TabOrder = 0

>end

>object Panel2: TPanel

>Left = 0

>Top = 41

>Width = 265

>Height = 348

>Align = alLeft

>BevelOuter = bvNone

>TabOrder = 1

>object Button12: TButton

>Left = 216

>Top = 123

>Width = 33

>Height = 25

>Caption = '>'

>Font.Charset = DEFAULT_CHARSET

>Font.Color = clWindowText

>Font.Height = –21

>Font.Name = 'MS Sans Serif'

>Font.Style = []

>ParentFont = False

>TabOrder = 0

>OnClick = Button12Click

>end

>object RG: TRadioGroup

>Left = 16

>Top = 72

>Width = 177

>Height = 193

>Caption = ' Styles '

>ItemIndex = 0

>Items.Strings = (

>'Normal'

>'Epigraph'

>'Text-author'

>'Subtitle'

>'Poem'

>'Citation'

>'None')

>TabOrder = 1

>end

>object GroupBox2: TGroupBox

>Left = 16

>Top = 0

>Width = 177

>Height = 65

>Caption = ' Heading '

>TabOrder = 2

>object Button1: TButton

>Left = 16

>Top = 24

>Width = 25

>Height = 25