Tema: Error
Ver Mensaje Individual
  #1 (permalink)  
Antiguo 03/05/2017, 15:22
vankul
 
Fecha de Ingreso: mayo-2004
Mensajes: 1
Antigüedad: 20 años, 6 meses
Puntos: 0
Error

Hola tengo el siguiente código:
Código:
const AnsiString DataBaseFileName = "\socis.abs";
Código:
void __fastcall TForm1::FormCreate(TObject *Sender)
{
	ABSDatabase1->DatabaseFileName = ExtractFilePath(Application->ExeName) + DataBaseFileName;
	ABSDatabase1->Open();
	ABSQuery1->Close();
	ABSQuery1->Open();
}
En el ordenador donde programo funciona bien pero al pasar el programa resultante a otro ordenador me dice que no encuentra la base de datos y en teoría está en el mismo directorio del programa. Alguna sugerencia gracias.