ExtractFilePath(paramstr(0)) даёт путь к файлу. К этому пути необходимо ещё прибавить FileName - имя файла базы (типа Name.mdb и т.п.)
Что-то вроде:
Код:
ExtractFilePath(paramstr(0)) + '\Name.mdb'
или
Код:
ExtractFilePath(paramstr(0)) + '\' + FileName
где FileName = Name.mdb, потому что FileName может использоваться в любом месте программы.
И если выпадают сообщения об ошибках, то делайте их скриншот и выкладывайте здесь.