Курсовая работа: Разработка информационной системы "Библиотека"
object
|
Edit1: TEdit |
| Left |
16 |
| Top |
8 |
| Width |
113 |
| Height |
21 |
| TabOrder |
0 |
13) Кнопка «По фрагменту» для начала выборки из БД по фрагменту
введенному в Edit1
| object |
Button5: TButton |
| Left |
16 |
| Top |
40 |
| Width |
113 |
| Height |
25 |
| Caption |
По фрагменту |
| TabOrder |
1 |
procedure Button5Click(Sender: Tobject); - запускает SQL-запрос на выбор записей вышеуказанных
полей БД по фрагменту введенному в Edit1
14) Таблица, отображающая результаты выборки
| object |
DBGrid2: TDBGrid |
| Left |
0 |
| Top |
528 |
| Width |
993 |
| Height |
121 |
| Align |
alCustom |
| DataSource |
DataSource2 |
| Enabled |
False |
| Visible |
False |
|
|
| Columns |
item |
|
|
|
FieldName |
'UDK' |
| Title.Caption |
УДК |
| Width |
103 |
| Visible |
True |
|
|
| item |
|
| FieldName |
'Author' |
| Title.Caption |
Автор |
| Width |
177 |
| Visible |
True |
|
|
| item |
|
| FieldName |
'NameBook' |
| Title.Caption |
Заглавие издания |
| Width |
551 |
| Visible |
True |
|
|
|
| item |
|
| FieldName |
'Year' |
| Title.Caption |
Год |
| Width |
29 |
| Visible |
True |
|
|
|
| item |
|
| FieldName |
'Amount' |
| Title.Caption |
Количество |
| Width |
34 |
| Visible |
True |
|
|
|
| item |
|
| FieldName |
'Here and Now' |
| PickList.Strings |
(В наличии/Выдано) |
| Title.Caption |
Наличие |
| Width |
53 |
| Visible |
True |
15) Кнопка «Выборка», делающая видимым блок средств выборки
Страницы: 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31 |