Ver Mensaje Individual
  #6  
Antiguo 07-09-2004
luigidean luigidean is offline
Miembro
 
Registrado: ago 2004
Posts: 22
Reputación: 0
luigidean Va por buen camino
Thumbs up a mi tambien me paso lo mismo

Yo también tuve un problema parecido, vereis, os cuento: Al igual que el compañero que hace la pregunta, yo tambien queria conectar mi BD por codigo, intenté hacerlo en el evento OnCreate del formulario con este codigo(decir que no tengo alias, solo queria poner el path de la BD):

Código:
//lo pongo en el evento Activate porque en el Create da error
DataModule1.dbNoteLinks.DatabaseName:=ExtractFilePath(Application.ExeName) + 'bd';
DataModule1.dbNoteLinks.Connected:=true;
DataModule1.tblCategorias.Open;
DataModule1.tblLinks.Open;
Pero no me funcionó, me daba un error que ahora mismo no recuerdo, entonces se me ocurrió ponerlo en el evento OnActivate del formulario y entonces ya todo fue bien. Para controlar el tema del evento OnActivate os pongo el codigo completo:

Código:
 
if activo=false then begin
		self.Top:=self.Top-10;
		//lo pongo en el evento Activate porque en el Create da error
		DataModule1.dbNoteLinks.DatabaseName:=ExtractFilePath(Application.ExeName) + 'bd';
		DataModule1.dbNoteLinks.Connected:=true;
		DataModule1.tblCategorias.Open;
		DataModule1.tblLinks.Open;
	end;
	activo:= true;
Responder Con Cita