Aplicación no se ejecuta en otros PC

[[Caral]]

Hola
Empecemos paso a paso:
1- abre el programa con delphi
2- entra a File, new, datamodule, esto creara un datamodule., guardalo en el proyecto.
3- coloca un adoconnection en el datamodule. (adoConnection1)
4- elimina los adoconnection de todos los forms.
5- abre el unit ReclasU y pon el datamodule de primero en la lista asi:

Código Delphi [-]
begin
  Application.Initialize;
  Application.CreateForm(TDataModule1, DataModule1);
  Application.CreateForm(TReclamacionesAcceso, ReclamacionesAcceso);
  Application.CreateForm(TReclamaciones, Reclamaciones);
  Application.Run;
end.

6- en cada adotable y adoquery, cambia la direccion del connection:

Código Delphi [-]
Datamodule1.ADOConnection1

7- dale dobleclick a la parte blanca del datamodule, esto generara el evento oncreate del datamodule, en ese evento coloca esto, copia y pegalo si quieres.

Código Delphi [-]
procedure TDataModule1.DataModuleCreate(Sender: TObject);
Var BaseDeDatos, ConStr : String;
    IniFile: TIniFile;
begin
   // Obtiene la ruta y el nombre de la base de datos
   IniFile := TIniFile.Create(ExtractFilePath(Application.ExeName)+'Recamaciones.ini'); // Reclamaciones, sera el nombre que se le de al ini
   BasedeDatos := IniFile.ReadString('BD','Path','');
   If BasedeDatos = '' then ShowMessage('Error al cargar Base de Datos');
   ConStr := 'Provider=Microsoft.Jet.OLEDB.4.0;'+
             'Data Source='+BaseDeDatos+';'+
             'Persist Security Info=False;'+
             'Jet OLEDB : Database Password=admin';
   ADOConnection1.ConnectionString := ConStr;
   ADOConnection1.Open;
end;

Bien ya tenemos el arranque del programa, ahora cuando arranque abrira el datamodule primero y buscara un archivo ini, que se llama reclamaciones, este tiene que estar en el mismo directorio del exe.
Bueno ahora agamos el ini.
abre el bloc de notas y pon en el esto, tal y como esta:

[BD]
Path="C:\Base Reclamaciones\Reclamaciones.mdb"
[Logon]
Auto="No"
Login=""
Pass=""

Ahora guardalo en el directorio donde esta el programa, con el nombre de Reclamaciones.
Bueno con esto el programa buscara el ini, lo leera y dira hey la base de datos esta en C:\Base Reclamaciones\, ha bueno entonces la voy a buscar, por supuesto si la base de datos esta en otra direccion pues hay que poner la direccion correcta en el ini y guardar los cambios.
Con esto si quieres mover la base de datos a cualquier directorio se podra hacer simplemente modificando la direccion en el ini y guardando los cambios, puede estar en c, d, f, z o donde se quiera el programa leera el ini y buscara la direccion.
Bueno depues de todo esto veras que hay varias cosas:
1- solo un adoconnection.
2- un datamodule, donde poner muchas cosas.
3- un archivo ini, que dirige al programa para que encuentre la base de datos.
4- una explicacion de un novato a otro.
Saludos

[jlsc]

Muchas Gracias Caral y Mamu por su excelente aplicación, lo he entedido claramente, muchas gracias for su dedicación a este excelente foro y ayudarnos a los que estamos surmegidos en esta herramienta tan maravillosa que es Delphi. lo haré y ya contaré que tal me ha ido.

Muchas Gracias nuevamente.

Reciban mis saludos

novato jlsc

[[Lepe]]

Empezado por Caral

4- una explicacion de un novato a otro.

Yo no diría que es una explicación de novato, más bien diría que es la explicación de un maestro (palabreja que tanto te gusta ), clara, concisa y muy bien redactada.

Quizás deberíamos otorgarte el título "Maestro Clubdelphi"

Saludos

[jlsc]

Hola a todos,

Muchas gracias por sus soluciones, lo he hecho como me lo han aconsejado y funciona perfectamente. Muchas gracias Caral por tu detallada y buena explicacion, los mismo para lepe, waly2k1, neftali a todos gracias nuevamente.