Delphi - объектно-ориентированный язык программирования, разработанный компанией Borland в 1995 году. Он основан на языке программирования Pascal, но имеет более расширенные возможности и добавлены новые функции.
Delphi является интегрированной средой разработки (IDE), которая позволяет разрабатывать программное обеспечение для различных платформ, включая Windows, macOS, Android и iOS. Delphi достигает многоплатформенности с помощью...
Сегодня мы научимся создавать БД, поработаем с компонентами для БД и узнаем кое - что о 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
Источник http://www.realcoding.net/