50448 (610127), страница 2
Текст из файла (страница 2)
6) Кнопка «Готово», скрывающая блок средств выполнения выборки
| object | Button17: TButton |
| Left | 6 |
| Top | 3 |
| Width | 83 |
| Height | 25 |
| Caption | Готово |
procedure Button17Click(Sender: Tobject); - делает невидимым блок средств выполнения выборки
7) Панель зрительного выделения средств выборки по автору и заглавию
| object | Panel1: TPanel |
| Left | 8 |
| Top | 56 |
| Width | 145 |
| Height | 97 |
8) Элемент, позволяющий выбрать первую букву заглавия или фамилии автора издания для выборки из БД
| object | ComboBox2: TComboBox |
| Left | 16 |
| Top | 4 |
| Width | 113 |
| Height | 21 |
| Items.Strings | ( А, Б, В, Г, Д, Е, Ё, Ж, З, И, К, Л, М, Н, О, П, Р, С, Т, У, Ф, Х, Ц, Ч, Ш, Щ, Ы, Э, Ю, Я.) |
9) Кнопка «По автору» для начала выборки из БД по первой букве фамилии, выбранной в ComboBox2
| object | Button16: TButton |
| Left | 8 |
| Top | 32 |
| Width | 129 |
| Height | 25 |
| Caption | По автору издания |
procedure Button16Click(Sender: Tobject); - запускает SQL-запрос на выбор записей поля «Автор» БД по выбранной в списке первой букве фамилии автора
10) Кнопка «По заглавию издания» для начала выборки из БД по первой букве заглавия издания, выбранной в ComboBox2
| object | Button18: TButton |
| Left | 8 |
| Top | 64 |
| Width | 129 |
| Height | 25 |
| Caption | По заглавию издания |
procedure Button18Click(Sender: Tobject); - запускает SQL-запрос на выбор записей поля «Заглавие издания» БД по выбранной в ComboBox2 первой букве заглавия издания
11) Панель для зрительного выделения средств выборки записей БД по фрагменту названия области литературы, сведений, относящимся к заглавию, заглавия издания, жанра, примечаний
| object | Panel5: TPanel |
| Left | 8 |
| Top | 160 |
| Width | 145 |
| Height | 89 |
| TabOrder | 2 |
12) Поле ввода фрагмента, по которому будет производиться выборка из БД
| 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) Кнопка «Выборка», делающая видимым блок средств выборки
| 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 |
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 |
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 | Год издания |
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 | Автор |
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 | Номер тома |
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 | Страницы |
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 |
procedure Button1Click(Sender: Tobject); - скрывает блок редактирования записей БД












