[true]

Здравствуйте, я немного извращенец, просто уже задолбался, пишу я программу для подключения сетевых хранилищ, как только не пытался, закончилось все с базой данных на основе ADO, в базе 2 таблицы одна основная куда записывается информация, в другую пишется результат сложения ячеек в одну строку, при открытии срабатывает Access Violation в Oncreate находится цикл для подключения дисков которые находятся в бд. вот код:

Код:

procedure TForm1.FormCreate(Sender: TObject);
var
index:integer;
begin
index:=3;
   DataModule3.adoTable2.First;
   for i:=0 to DataModule3.ADOTable2.RecordCount-1 do
   begin
     WinExec(Pansichar(DataModule3.ADOTable2exec.Text),SW_HIDE);
     inc(index);
     DataModule3.ADOTable2.Next;
end;
 end;

Что я делаю не так?