- unit Addr;
- interface
- uses
- Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
- Db, DBTables;
- type
- TAddrData = class(TDataModule)
- Table: TTable;
- private
- { Private declarations }
- public
- { Public declarations }
- end;
- var
- AddrData: TAddrData;
- implementation
- {$R *.DFM}
- end.