Проложить путь в бд

[Staziah2]

обрый день! Не могу никак сообразить,что нужно прописать в процедуре.Какие коды.
Компоненты:OpenDialog,wwDBComboDlg, Button1(Создать) на форме,в дате модуля ADOQuery,Datasource.
Суть:человек нажимает на wwDBComboDlg,открывается окно(выбор папки),выбрал нужный файл,и в строке wwDBComboDlg текст пути.Нажимаем на Button1(Создать),и в БД в поле path,оказалась новая путь.
Вот моя форма:
Безымянный2.JPG
а коды:

procedure TForm5.wwDBComboDlg1Enter(Sender: TObject);
begin
 with Form5.wwDBComboDlg1 do
  begin
   Form5.OpenDialog1.InitialDir:= ExtractFilePath(dm.Mainpath.AsString);
   Form5.OpenDialog1.FileName:= dm.Mainpath.AsString;

   if Form5.OpenDialog1.Execute then
   dm.Mainpath.AsString:= Form5.OpenDialog1.FileName;
end;
end;

procedure TForm5.Button1Click(Sender: TObject);
begin
  ModalResult := mrOk;
end;

Вот в чем здесь моя ошибка?

[Toxa]

какая БД? какие компоненты для подключения к БД?

[Staziah2]

Сообщение от Toxa

какая БД? какие компоненты для подключения к БД?

БД на Microsoft SQL Server 2000,компоненты подключены через ADOConection,ADOQuey(MAIN).