object

Button19: TButton

Left

200

Top

184

Width

113

Height

33

Caption

Выборка

procedure Button19Click(Sender: Tobject); - делает видимым блок средств выполнения выборки

16) Навигатор для управления таблицей, отображающей результаты выборки

object

DBNavigator2: TDBNavigator

Left

8

Top

488

Width

160

Height

33

DataSource

DataSource2

VisibleButtons

[nbFirst, nbPrior, nbNext, nbLast, nbRefresh]

Enabled

False

Visible

False

("12") procedure DBNavigator2BeforeAction(Sender: TObject;Button: TnavigateBtn); - позволяет редактировать запись БД

procedure DBNavigator2Click(Sender: TObject; Button: TNavigateBtn); - связывает управление блоками дополнительной информации и редактирования записей БД с управлением таблицы, отображающей результаты выборки

17) Кнопка для выхода из программы «Выход»

Object

Button20: TButton

Left

680

Top

184

Width

105

Height

33

Hint

Завершает работу программы

Caption

Выход

TabOrder

6


procedure Button20Click(Sender: Tobject); - закрывает все формы программы

18) Блок средств для редактирования записей в БД

Object

GroupBox1: TGroupBox

Left

176

Top

224

Width

393

Height

297

Caption

Редактирование записи БД

TabOrder

7

Visible

False

("13") 20) Подпись к элементу для редактирования записи БД «УДК»


Object

Label1: TLabel

Left

120

Top

22

Width

27

Height

13

Caption

УДК

21) Подпись к элементу для редактирования записи БД «Заглавие издания»

НЕ нашли? Не то? Что вы ищете?

Object

Label3: TLabel

Left

8

Top

56

Width

96

Height

13

Caption

Заглавие издания

22) Подпись к элементу для редактирования записи БД «Год издания»

object

Label4: TLabel

Left

8

Top

119

Width

66

Height

13

Caption

Год издания

("14") 23) Подпись к элементу для редактирования записи БД «Количество»

object

Label5: TLabel

Left

76

Top

119

Width

62

Height

13

Caption

Количество

24) Подпись к элементу для редактирования записи БД «Издательство»

object

Label7: TLabel

Left

8

Top

87

Width

75

Height

13

Caption

Издательство

19) Подпись к элементу для редактирования записи БД «Автор»

Object

Label2: TLabel

Left

112

Top

40

Width

33

Height

13

Caption

Автор

("15")
25) Подпись к элементу для редактирования записи БД «Сведения, относящиеся к заглавию»

object

Label8: TLabel

Left

192

Top

87

Width

187

Height

13

Caption

Сведения, относящиеся к заглавию

26) Подпись к элементу для редактирования записи БД «Жанр»

object

Label9: TLabel

Left

88

Top

151

Width

32

Height

13

Caption

Жанр

27) Подпись к элементу для редактирования записи БД «Номер тома»

object

Label10: TLabel

Left

8

Top

151

Width

65

Height

13

Caption

Номер тома

("16") 28) Подпись к элементу для редактирования записи БД «Полка»

object

Label11: TLabel

Left

352

Top

119

Width

35

Height

13

Caption

Полка


29) Подпись к элементу для редактирования записи БД «Область литературы»

object

Label12: TLabel

Left

208

Top

119

Width

108

Height

13

Caption

Область литературы

30) Подпись к элементу для редактирования записи БД «Страницы»

object

Label13: TLabel

Left

144

Top

119

Width

53

Height

13

Caption

Страницы

("17") 31) Подпись к элементу для редактирования записи БД «Примечания»

object

Label26: TLabel

Left

8

Top

188

Width

66

Height

13

Caption

Примечания

32) Панель для зрительного выделения кнопки «Готово»

object

Panel2: TPanel

Left

8

Top

16

Width

97

Height

32

TabOrder

0


33) Кнопка «Готово», скрывающая блок редактирования записей БД

object

Button1: TButton

Left

6

Top

3

Width

83

Height

25

Caption

Готово

TabOrder

0

("18") procedure Button1Click(Sender: Tobject); - скрывает блок редактирования записей БД

34) Навигатор для управления элементами отображения БД в блоках редактирования записей БД и отображения дополнительной информации

object

DBNavigator3: TDBNavigator

Left

8

Top

264

Width

380

Height

25

Cursor

crHandPoint

DataSource

DataSource1

35) Элемент для редактирования записи БД «УДК»

object

DBEdit1: TDBEdit

Left

160

Top

17

Width

145

Height

21

DataField

'UDK'

DataSource

DataSource1

("19") 36) Элемент для редактирования записи БД «Автор»

object

DBEdit2: TDBEdit

Left

160

Top

38

Width

225

Height

21

DataField

'Author'

DataSource

DataSource1

37) Элемент для редактирования записи БД «Заглавие издания»

object

DBEdit3: TDBEdit

Left

8

Top

68

Width

377

DataField

'NameBook'

DataSource

DataSource1

38) Элемент для редактирования записи БД «Год издания»

object

DBEdit4: TDBEdit

Left

8

Top

132

Width

65

Height

21

DataField

'Year'

DataSource

DataSource1

("20") procedure DBEdit4KeyPress(Sender: TObject; var Key: Char); - не позволяет вводить в поле нечисловые значения

39) Элемент для редактирования записи БД «Количество»

object

DBEdit5: TDBEdit

Left

76

Top

132

Width

65

Height

21

DataField

'Amount'

DataSource

DataSource1

procedure DBEdit4KeyPress(Sender: TObject; var Key: Char); - не позволяет вводить в поле нечисловые значения

40) Элемент для редактирования записи БД «Сведения, относящиеся к заглавию»

object

DBEdit6: TDBEdit

Left

192

Top

100

Width

193

Height

21

DataField

'ExplanatoryToTitle'

DataSource

DataSource1

("21") 41) Элемент для редактирования записи БД «Издательство»


object

DBEdit7: TDBEdit

Left

8

Top

100

Width

177

Height

21

DataField

'PublishingHouse'

DataSource

DataSource1

42) Элемент для редактирования записи БД «Жанр»

object

DBEdit9: TDBEdit

Left

88

Top

164

Width

185

Height

21

DataField

'Genre'

DataSource

DataSource1


43) Элемент для редактирования записи БД «Номер тома»

Object

DBEdit10: TDBEdit

Left

8

Top

164

Width

73

Height

21

DataField

'Volume'

DataSource

DataSource1

("22") procedure DBEdit4KeyPress(Sender: TObject; var Key: Char);

44) Элемент для редактирования записи БД «Примечания»



Object

DBMemo1: TDBMemo

Left

8

Top

200

Width

265

Height

41

DataField

'Notes'

DataSource

DataSource1

45) Элемент для редактирования записи БД «Полка»

Object

DBEdit14: TDBEdit

Left

352

Top

132

Width

41

Height

21

DataField

'PlaceIndex'

DataSource

DataSource1

("23") 46) Элемент для редактирования записи БД «Страницы»

Object

DBEdit8: TDBEdit

Left

144

Top

132

Width

57

Height

21

DataField

'KeyWord1'

DataSource

DataSource1

procedure DBEdit4KeyPress(Sender: TObject; var Key: Char); - не позволяет вводить в поле нечисловые значения

47) Элемент для редактирования записи БД «Область литературы»

Object

DBEdit15: TDBEdit

Left

204

Top

132

Width

145

Height

21

DataField

'Type'

DataSource

DataSource1

48) Блок «Библиотека», производящий выдачу/возврат изданий в БД

Object

GroupBox4: TGroupBox

Left

280

Top

160

Width

105

Height

97

Caption

Библиотека

Visible

False

("24") 49) Панель для зрительного выделения кнопки «Готово»

Object

Panel6: TPanel

Left

4

Top

16

Width

95

Height

32


50) Кнопка «Библиотека», скрывающая блок «Библиотека»

Object

Button7: TButton

Left

6

Top

3

Width

83

Height

25

Caption

Готово

procedure Button7Click(Sender: Tobject); - скрывает блок «Библиотека»

Из за большого объема этот материал размещен на нескольких страницах:
1 2 3 4 5