Разработка информационной системы "Библиотека"
object |
DBText10: TDBText |
Left |
288 |
Top |
160 |
Width |
49 |
Height |
17 |
DataField |
'KeyWord1' |
DataSource |
DataSource1 |
76) Элемент для отображения записи БД «Номер тома»
object |
DBText11: TDBText |
Left |
408 |
Top |
157 |
Width |
25 |
Height |
17 |
DataField |
'Volume' |
DataSource |
DataSource1 |
77) Элемент для отображения записи БД «Полка»
object |
DBText12: TDBText |
Left |
224 |
Top |
184 |
Width |
65 |
Height |
17 |
DataField |
'PlaceIndex' |
DataSource |
DataSource1 |
78) Элемент для отображения записи БД «Жанр»
object |
DBText14: TDBText |
Left |
48 |
Top |
232 |
Width |
65 |
Height |
17 |
DataField |
'Genre' |
DataSource |
DataSource1 |
79) Элемент для отображения записи БД «Примечания»
object |
DBText15: TDBText |
Left |
80 |
Top |
248 |
Width |
361 |
Height |
41 |
DataField |
'Notes' |
DataSource |
DataSource1 |
80) Подпись к элементу, отображающему запись БД «Примечания»
object |
Label27: TLabel |
Left |
8 |
Top |
252 |
Width |
66 |
Height |
13 |
Caption |
Примечания |
81) Панель для зрительного выделения кнопки «Готово»
object |
Panel4: TPanel |
Left |
8 |
Top |
16 |
Width |
95 |
Height |
32 |
TabOrder |
0 |
82) Кнопка «Готово», скрывающая блок дополнительной информации об издании
object |
Button3: TButton |
Left |
6 |
Top |
3 |
Width |
83 |
Height |
25 |
Caption |
Готово |
TabOrder |
0 |
procedure Button3Click(Sender: Tobject); - скрывает блок дополнительной
информации об издании
83) Кнопка «Дополнительно», делающая видимым блок дополнительной
информации об издании
object |
Button4: TButton |
Left |
560 |
Top |
184 |
Width |
113 |
Height |
33 |
Hint |
Позволяет просмотреть имеющуюся
дополнительную информацию об издании |
Caption |
Дополнительно |
TabOrder |
5 |
procedure Button4Click(Sender: Tobject); - делает видимым блок
дополнительной информации об издании
84) Кнопка «Библиотека», делающая видимым блок выдачи/возврата издания
object |
Button6: TButton |
Left |
440 |
Top |
184 |
Width |
115 |
Height |
33 |
Hint |
Позволяет обозначить факт выдачи
или возврата издания в базе данных |
Caption |
Библиотека |
Enabled |
False |
TabOrder |
4 |
procedure Button6Click(Sender: Tobject); - делает видимым блок
выдачи/возврата издания
85) Элемент для связывания самой БД и элементов отображения её записей
object |
DataSource1: TDataSource |
DataSet |
Table1 |
Left |
792 |
Top |
184 |
86) Главное меню
object |
MainMenu1: TMainMenu |
Left |
960 |
Top |
168 |
|
|
object |
N1: TMenuItem |
Caption |
Меню |
|
|
object |
N2: TMenuItem |
Caption |
Выборка |
OnClick |
Button19Click |
|
|
object |
N3: TMenuItem |
Caption |
Редактирование БД |
OnClick |
Button2Click |
|
|
object |
N4: TMenuItem |
Caption |
Библиотека |
Enabled |
False |
OnClick |
Button6Click |
|
|
object |
N5: TMenuItem |
Caption |
Дополнительные сведения |
OnClick |
Button4Click |
|
|
object |
N8: TMenuItem |
Caption |
'-' |
|
|
object |
N9: TMenuItem |
Caption |
Выход |
OnClick |
Button20Click |
procedure N7Click(Sender: Tobject); - выводит форму «О прграмме»
87) Элемент, позволяющий работать с SQL-запросом на выбор записей из БД
по автору
object |
Query1: TQuery |
Active |
True |
AutoRefresh |
True |
DatabaseName |
'BOOK' |
RequestLive |
True |
SQL.Strings |
('SELECT D.*'
'FROM
"..Библиотека\Books.db"D'
'WHERE (D. Author Like
:FirstChar.)')
|
Left |
816 |
Top |
184 |
ParamData = < |
item |
|
|
DataType |
ftString |
Name |
'FirstChar.' |
ParamType |
ptUnknown |
Value |
'' |
88) Элемент для связывания результатов работы SQL-запроса и элементов отображения записей БД
object |
DataSource2: TDataSource |
DataSet |
Query1 |
Left |
840 |
Top |
184 |
89) Элемент, позволяющий работать с SQL-запросом на выбор записей из БД
по заглавию издания
Страницы: 1, 2, 3, 4, 5, 6, 7, 8
|