Путь ADOConnection

[TaYgA]

Всем доброго времени суток!!! Столкнулся с такой проблемой: exeшник моей программы не работает на других компьютерах ругаясь на то, что не найден путь к файлу Access... ADOConnection прописан путь в директорию с программой ("D:\Курсовая работа\Автосалон Спутник\Shop.mdb")... Файл Access должен находиться в директории с программой... Пробывал прописывкать путь ADOConnection программно:

procedure TF1Shop.F1ShopShow(Sender: TObject);
begin
  DataModule1.ADOConnection.ConnectionString:=ExtractFilePath(paramstr(0))+'Shop.mdb';
  DataModule1.ADOConnection.Connected:=True;
end;

При запуске программы Delphi выдаёт ошибку Что я делаю не правильно??!

[Stilet]

Приложи проект в архиве с базой.

[DIgorevich]

Жесть

ADOConnection1.ConnectionString:='Provider=Microsoft.Jet.OLEDB.4.0;Data Source='+
 ExtractFilePath(Application.ExeName)+'Shop.mdb;Persist Security Info=False';
 ADOConnection1.Connected:=true;

[Stilet]

Тьфу ты... А я и не заметил...

[TaYgA]

Невыходит... выскакивает та же самая ошибка

List index out of bouds (5)

Объясните пожалуйсто, что она значит?!?!

[_SERGEYX_]

Строку подключения тебе написали правильно. Если БД всегда лежит в каталоге программы можно сразу прописать строку в свойствах

Provider=Microsoft.Jet.OLEDB.4.0;Data Source=Shop.mdb;Persist Security Info=False

А List index out of bouds (5) тут ни при чем. Ищи косяк в другом месте.

[artemavd]

Ошибка

List index out of bouds (5)

может означать, что где-то в программе идет обращение к элементу, который еще не создан. Например, есть StatusBar, в котором есть 4 панели, а в Вашей программе идет обращение, например, к пятой панели, а ее нет. Вот и выдается ошибка. Ищите ее в другом месте в программе.

[TaYgA]

Всем огромное спасибо!!! Нашёл в чём была проблема!!!

[artemavd]

И в чем же?

[TaYgA]

В процедуре FormShow было прописано:

  DBEmployee.Columns[0].Visible:=False;
  DBEmployee.Columns[5].Visible:=False;
  DBEmployee.Columns[6].Visible:=False;