Справочный материал по базе данных для библиотеки

База данныхDataBase

Поля таблицыTable

Отчетreport

Добавление в таблицуADD

Удаление из таблицыADD

ФормаForm

СчетчикSpinner

Изменение цветаColor

#K$Поля таблицы

Таблица содержит следующие поля: ФИО студента, дата рождения, факультет, курс, группа, номер билета, книга, стоимость, автор, место издания, дата возврата.

Содержимое таблицы может быть измененоADD. Также в таблицу могут быть добавленыADD новые записи, возможно удаление и очистка таблицыADD.

#K$Добавление/Изменение содержимого

Редактирование таблицы осуществляется командой Append Mode из меню View, либо при введении данной команды в командную строку.

При переходе в режим редактирования Edit таблица имеет следующий вид:

Чтобы удалить нужную запись (команда SKIP N – переход на N записей), для начала, ее необходимо пометить командой DELETE, а затем удалить с помощью команды PACK.

Также все это может быть реализовано из формыForm, путем нажатия соответствующих клавиш.

#$KБаза данных

База данных содержит одну единственную таблицу, содержащую информацию о студентах, пользующихся услугами библиотеки.

K#$Отчет

Многоколоночный отчет:

#K$Форма

В Visual FoxPro для просмотра, ввода и редактирования данных, хранящихся в таблицах, используются формы, являющиеся более наглядным средством представления информации.

K#$Счетчик

Шаг устанавливается в поле Increment. Начальное и конечно значения в полях SpinnerLowValue и  SpinnerHighValue, соответсвенно.

$#Изменение цвета

Изменение цвета реализовано следующим образом: имеется группа переключателей, при нажатии на которые меняется цвет формы.

На группу «навешано» следующее действие:

DO CASE

                               CASE ThisForm.Pageframe1.Page2.Optiongroup1.Value = 1

                                    ThisForm.BackColor = RGB(250,240,100)

                               CASE ThisForm.Pageframe1.Page2.Optiongroup1.Value = 2

                                    ThisForm.BackColor = RGB(15,15,150)              

                               CASE ThisForm.Pageframe1.Page2.Optiongroup1.Value = 3

                                    ThisForm.BackColor = RGB(255,255,255)          

                               CASE ThisForm.Pageframe1.Page2.Optiongroup1.Value = 4

                                    ThisForm.BackColor = RGB(99,99,99)    

ENDCASE