Estoy empezando con esto del Lazarus y tengo un pequeño problema.
Estoy generando una aplicacion que tiene dos formularios, uno de ellos es un form y el otro es un datamodule. En el datamodule tengo unos cuantos compenentes
basededatos
transaction
tabla
datasource
Y en el form tengo un dbgrid. El data module esta en el uses del form, pero la prodiedad -datasource- del dbgrid no me muestar el data source del datamodule.
¿Que debo hacer para que esto me funcione?
Os envio el codigo fuente de los dos formularios. Gracias.
-------------------------------------------------------------
Código Delphi
[-]unit Unit1;
{$mode objfpc}{$H+}
interface
uses
Classes, SysUtils, LResources, Forms, Controls, Graphics, Dialogs, Unit2,
DbCtrls, DBGrids;
type
TForm1 = class(TForm)
DBGrid1: TDBGrid;
private
public
end;
var
Form1: TForm1;
implementation
initialization
{$I unit1.lrs}
end.
-------------------------------------------------------------------
Código Delphi
[-]unit Unit2;
{$mode objfpc}{$H+}
interface
uses
Classes, SysUtils, LResources, Forms, Controls, Dialogs, Interbase, db;
type
TDataModule1 = class(TDataModule)
Datasource1: TDatasource;
IBDatabase1: TIBDatabase;
IBQuery1: TIBQuery;
IBTransaction1: TIBTransaction;
private
public
end;
var
DataModule1: TDataModule1;
implementation
initialization
{$I unit2.lrs}
end.
----------------------------------------------------