Cita:
Normalmente o lo mas adecuado es tener los componentes NO visibles en un datamodule, pero como ya lo tenias asi, no quise meterle mas cosas.
Entonces el datamodule en tu caso se convierte en el form principal, ahi es donde tienes el componente que enlaza la BD (adoConnection), al llamar a los demas forms y estar ligados al principal ya tendran la conexion.
|
Te refieres a algo asi?
Código Delphi
[-]
program Project1;
uses
Forms,
Unit1 in 'Unit1.pas' ,
Unit2 in 'Unit2.pas' ;
{$R *.res}
begin
Application.Initialize;
Application.CreateForm(TForm1, Form1);
Application.Run;
end.
implementation
uses unit2;
{$R *.dfm}
procedure TForm1.FormCreate(Sender: TObject);
begin
end;
end.
unit Unit2;
interface
uses
SysUtils, Classes, DB, ADODB;
type
TDataModule2 = class(TDataModule)
ADOConnection1: TADOConnection;
private
public
end;
var
DataModule2: TDataModule2;
implementation
{$R *.dfm}
end.
Y asi solo tengo que añadir en el uses de cada uno de mis forms la unit del data module con todas las conexiones, consultas y demas montadas en ella? O incluso hacer un datamodule por cada form?
Perdon por el corta-pega