|
Сегодня мы научимся создавать БД, поработаем с компонентами для БД и узнаем кое
- что о SQL То есть : если что-то нужно будет сохранить, какую -то информацию в
понятном и доступном виде,а также иметь к ней доступ в любой момент.
Привет !
Сегодня мы научимся создавать БД, поработаем с компонентами для БД и узнаем кое
- что о SQL
То есть : если что-то нужно будет сохранить, какую -то информацию в понятном и
доступном виде,а также иметь к ней доступ в любой момент!!!!!
Я вообще люблю Delphi и тебе советую его полюбить.
И так приступим.
И так для начала охарактеризуем задачу. Нам нужна программа которая позволяет
нам быстро и удобно в понятном виде сохранять и читать информацию соединять в
информационном потоке два вида представления информации литерный и цифровой.
Что же нет ничего проще.
Значит начнем. Открой Delphi - по умолчанию он создает проект им и
воспользуемся.
Значит нам понадобиться Батон(Button) со страницы Standart и немного новых
компонентов со страницы Data Access а именно Table, Query и Data Source. А со
страницы Data Controls нам понадобиться DbGrid и DbNavigator
Расположи их покрасивее для себя все таки стараемся и начнем. И так каркас готов
- вся прелесть будущей программы в том что тебе не придется писать много кода
все за тебя сделает Delphi.
И так выдели компонент Data Source - у тебя он называется Data Source 1. Перейди
на закладку Properties найди пункт Data Set - поставь значение его Table1.
Теперь перейди на компонент DBGridи опять же в Properties найди пункт Data
Source поставь значение равное - Data source.
ТОже самое проделай с компонентом DbNavigator - а именно,Properties найди пункт
Data Source поствь значение равное - Data source.
Ну вот марафет навели - а теперь объясню. Все эти приготовления нужны были для
того чтобы связать Table c DataSource тот с DBGrid-oм а его c DBNavig-aтoрom.
Теперь посмотрим на компонент Table1 у него есть одного свойство на странице
Properties пункт под названием DatabaseName в нем ты можешь выбрать любую Базу
которая есть у тебя!!!! НО нам нужно свое не забыл - так что начнем!!!!
Закрываем Delphi и ползем в Кнопку Пуск ->Программы и находим Пункт Delphi И
смотрим-Выбираем Пункт SQlExplorer он нам и нужен Жми скорее!
Попадаем в кульную прогу. И так это программ которая идет в поставке с Delphi и
позволяет создавать БД посредствам SQL скрипта.
И так осмотримся, для начала нам нужно создать папку на нашем жестком диске -
назовем ее к примеру Temp. Затем нужно указать путь и так - Выделим пункт
DataBases - жми правую кнопку мыши и выбери пункт NEW. Появиться Пункт по
умолчанию называемый Satndart1, Измени его имя на TEmp.
В пункте PatH - Таблицы Temp укажи путь к нашей Папке.Далее в закладке EnterSQL
пиши такой код
- create table Tel (name character(30), Fio character(30), Telefon numeric(25))
-
Обьесняю - тут мы создаем таблицу TEL с полями Имя(name) - Фамилия(Fio) и
телефоном(Telefon)
Все теперь снова возвращаемся в Delphi и открываем нашу программу.
Выбираем компонент Table1 и в его Properties ищем пункт DataBaseName и из
выпадающего списка выбираем нашу папку Temp а в пункте TableName -нашу базу
Tel.dbf.
Затем в обработчике события нажатия на Кнопке (Button) пишем -
procedure TForm1.Button1Click(Sender: TObject);
begin
Table1.Active:=true;
end;
Не забудьте что писать нужно только то, что после слова begin и до слова end.
с помощь этой строчки мы так сказать включаем нашу Таблицу и тем самым включаем
нашу прогу.
И все мы имеем программу которая позволяет сохранять инфу в Базе -как литерные
величины так и цифровые.
В следующей статье мы немного усложним на прогу и попробуем сделать телефонный
справочник.
Автор: Antony
| 
