Свързване на база данни към клиентприложение - Studiopedia
Нека добавим модул за данни към проекта (File\New\Data Module). Модулът за данни е невизуален контейнер за хостване на невизуални компоненти. Също така, модулът за данни често се използва за съхраняване на глобални променливи, общи функции и процедури, които трябва да бъдат видими в цялата програма. Модулът с данни няма форма, но се съхранява като модул във файла *.pas.
Ще кръстим свойството Name на модула с данни fDM и ще запишем модула като DM.pas.
Добавете компонента ADOConnection към модула от раздела ADO. Този компонент ще позволи на други компоненти да комуникират с базата данни чрез ADO механизма. Връзката се осигурява от свойството ConnectionString на компонента. По принцип компоненти като ADOTable също имат това свойство, но ако имате четири таблици, ще трябва да установите връзка четири пъти. По-лесно е да се свържете веднъж с компонент ADOConnection и да го използвате за свързване на други компоненти.
Щракнете двукратно върху свойството ConnectionString на компонента ADOConnection. Ще се отвори прозорец за свързване на компонента към ADO.
Щракнете върху бутона Изграждане. Ще се отвори нов прозорец с настройки за връзка.
За да се свържете с базата данни на MS Access, изберете „Microsoft Jet 4.0 OLE DB Provider“.
Задайте свойството LoginPrompt на компонента ADOConnection на False. Ако това не е направено, тогава всеки път, когато се опитате да се свържете с базата данни, ще бъдете помолени за потребителско име и парола, ние не се нуждаем от това, нашата база данни е без парола. Задайте свойството Connected на True. Връзката е завършена.
Инсталирайте четири ADOTable компонента в модула за данни, по един за всяка таблица в нашата база данни. Компонентът ADOTable е предназначен за създаване на наборданни.
Изберете всичките четири ADOTables (задръжте клавиша) и в тяхното свойство Connection изберете връзката ADOConnection1. Така свързахме и четирите ADOTable към базата данни.
Изберете първия компонент ADOTable. Преименувайте свойството Name на TLichData и в свойството TableName изберете основната таблица на базата данни - LichData. Буквата “T” в началото на името на компонента ще ни покаже по-късно, че това е таблица. До компонента инсталирайте компонента DataSource от раздела Data Access. Компонентът DataSource е предназначен да организира комуникация с набори от данни. Преименувайте свойството Name на компонента DataSource на DSLichData (DS - DataSource). В свойството DataSet изберете таблицата TLichData.
Същото трябва да се направи още три пъти, свързвайки компонентите DataSource с други таблици по същия начин:
ADOTable: TDoljnost, TTelephones, TAdres
Източник на данни: DSDoljnost, DSTelephones, DSAdres
Задайте свойството Active на таблиците на True, като ги отворите.
Отидете на основната форма. Изберете командата File\Use Unit и свържете Data Module (DM) към нея. Сега изберете необходимите таблици в компонентите на DBGrid в свойството DataSource и ще видите съдържанието на тези таблици.
4. Създаване на релации между таблици
Не намерихте това, което търсихте? Използвайте търсачката: