| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

Как с работать с локальной  БД без Альясов? [D6, Paradox]

pashtet ©   (2002-05-27 17:20:00) 

Скажите , пожалуйста, как сделать так чтобы , когда переносишь свою прогу на другой комн не надо было в BDE прописывать альяс?
И вообще без самой программы BDE можно обойтись, т.е. можно ее не ставить?

---

Lusha   (2002-05-29 10:36:00) [1]

...или просто создать дистрибутивный комплект...

---

kaif   (2002-05-29 10:31:00) [2]

Есть 3 способа коннектится;
1. Указать существующий Alias в компоненте TDatabase
2. Создать локальный (временный) Alias, просто дав название компоненту TDatabase, то ли DatabaseName (не помню), локальный (временный) alias при этом создается автоматически.
3. Явно указать драйвер в компоненте TDatabase. Тогда вообще alias не нужен. А в параметрах прописать путь к базе таким сленгом, каким данный драйвер понимает. Например, для Paradox это что-то вроде PATH=<путь>.
Последний способ предпочтительнее. Никаких alias-ов просто нет.

---

Lynx   (2002-05-28 12:57:00) [3]

можно даже с любого каталога
на onCreate формы написать

var path: string;
begin
path:=ExtractFilePath(Application.ExeName);
Table1.DatabaseName :=path;
Table1.TableName := "ИмяФайла.db";
Table1.Open;

---

-=CrazyFish=-   (2002-05-28 11:14:00) [4]

> Kuusiniemi ©

Можно еще проще
Table1.TableName := "Диск:\ВашКаталог\ИмяФайла.db";
Table1.Open;

---

Voldemar   (2002-05-28 04:32:00) [5]


with Session do
begin
ConfigMode:=cmSession;
als:=ExtractFilePath(ParamStr(0))+"Base\";
AddStandardAlias("FurBL",als,"PARADOX");
DataBase1.AliasName:="DataBaseName";
DataBase1.DatabaseName:="DataBaseName";
Database1.Connected:=true;
ConfigMode:=cmAll;
end;

вот примерно так...

---

Дуся   (2002-05-27 18:34:00) [6]

А без BDE можно только на ADO...

---

Kuusiniemi   (2002-05-27 18:10:00) [7]

Ну эт совсем просто. :))

Table1.DatabaseName := "Диск:\ВашКаталог\";
Table1.TableName := "ИмяФайла.db";
Table1.Open;

И будет Вам стчастье. :)

---

Наверх