Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

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

Работа с BD без Alias - ов [D6, Paradox]

Fissher © (2002-06-02 16:35:00)
Не подскажете, что нужно сделать с Query, чтоб оно находило путь к таблицам без Алиаса. При установке на другую машину, прога путь к базе находит, а к таблицам не хочет :-(((

Fissher (2002-06-03 15:32:00) [1]
Теперь все ясно. Всем спасибо!!!!!!!!!!!!!!!:-)))))))

Lord Warlock (2002-06-03 15:30:00) [2]

> Query1.Database

это указатель на компонент TDataBase. Если не используешь его, ExtractFilePath(ParamStr(0)) пиши только в Databasename

Fissher (2002-06-03 15:24:00) [3]
И посдеднее:-) (Достал я тут уже всех, кажется своими глупостями)

С Query1.Database:=ExtractFilePath(ParamStr(0)) можно и Алиас оставить?

Fissher (2002-06-03 15:20:00) [4]
Точно! Я же через Application.Exename извлекал путь!!!

Lord Warlock (2002-06-03 15:17:00) [5]

> Fissher © (03.06.02 15:15)

не привязывается он к диску С, ParamStr(0) - путь к программе, где бы она не лежала

Fissher (2002-06-03 15:17:00) [6]
To Lord Warlock:
С другой стороны, такие ответы иногда заставляют глубоко задуматься над смыслом своей работы :-))

Fissher (2002-06-03 15:15:00) [7]
To Lord Warlock:

Уже пробовад Query1.Database:=ExtractFilePath(ParamStr(0)) - Путь к базе извлекает верно. К таблицам тоже, но вот только к диску С привязывается.

Lord Warlock (2002-06-03 15:12:00) [8]
это про полный путь

Fissher (2002-06-03 15:09:00) [9]
Это насчет дурака или указания полного пути?:-))))

Lord Warlock (2002-06-03 15:07:00) [10]

> Fissher © (03.06.02 14:59)

> als := - что это?

см дальше

Если хочешь по простому - помещай БД в каталог, где программа
на OnCreate главной форрмы

Table1.Databasename:=ExtractFilePath(ParamStr(0));
и все :)

Nikolay M. (2002-06-03 15:02:00) [11]
Указывать полный путь
Я, конечно, дурак, но как это сделать??

насчет "дурака" утверждать не берусь, но лаконичность такого ответа больше путает, чем что-то объясняет...

Fissher (2002-06-03 14:59:00) [12]
To Voldemar
als := - что это?

Fissher (2002-06-03 14:49:00) [13]
Огромное спасибо, сейчас попробую, просто завтра проект сдавать, боюсь работу потерять.

Voldemar (2002-06-03 06:26:00) [14]
А если создать временный алиас?
procedure TForm1.FormCreate(Sender: TObject); begin with Session do begin ConfigMode:=cmSession; als:= AddStandardAlias("MyAlias",ExtractFilePath(ParamStr(0))+"Base\","PARADOX"); DataBase1.AliasName:="MyAlias"; DataBase1.DatabaseName:="MyBase"; Database1.Connected:=true; ConfigMode:=cmAll; end; Table1.Databasename:="MyBase"; Query1.Databasename:="MyBase"; end;

Anatoly Podgoretsky (2002-06-02 19:15:00) [15]
Вместо алиаса или в запросе

Fissher (2002-06-02 17:50:00) [16]
Я, конечно, дурак, но как это сделать??

Anatoly Podgoretsky (2002-06-02 16:42:00) [17]
Указывать полный путь

Наверх

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