Delphi. Бази даних. Alias
Динамічно створювані псевдоніми
Використання псевдоніма для доступу до бази даних забезпечує незалежність програми від розміщення даних в системі, дозволяє розміщувати програму роботи з даними і базу даних на різних дисках комп'ютера, в тому числі і на мережевому. Разом з тим, для простих баз даних типовим рішенням є розміщення бази даних в окремому підкаталозі того каталогу, в якому знаходиться програма роботи з базою даних. Таким чином, програма роботи з базою даних завжди "знає", де знаходяться дані. При такому підході можна відмовитися від створення псевдоніма за допомогою BDE Administrator і покласти завдання створення псевдоніма на програму роботи з базою даних. Причому, псевдонім буде створюватися автоматично під час запуску програми і знищуватися під час завершення її роботи. Очевидно, що такий підхід полегшує адміністрування бази даних.
В якості ілюстрації сказаного в лістингу приведений варіант програми роботи з базою даних "Школа", яка для доступу до бази даних використовує динамічно створюваний псевдонім.
В даному варіанті програми передбачається, що база даних міститься в підкаталозі DATA того каталогу, в якому знаходиться виконуваний файл програми. Створює псевдонім процедура TForm1.FormActivate. Безпосереднє створення псевдоніма виконує процедура AddstandardAlias, якою як параметр передається ім'я псевдоніма і відповідне йому ім'я каталогу. Так як під час розробки програми можна знати, в якому каталозі буде розміщена програма роботи з базою даних і, отже, підкаталог бази даних -DATA, ім'я каталогу визначається під час роботи програми шляхом звернення до функцій ParamStr (0) і ExtractFilePatch. Значення першої-повне ім'я виконуваного файлу програми, другий - шлях до цього файлу. Таким чином, процедури AddstandardAiias передається повне ім'я каталогу бази даних.