Дипломная работа: Организация автоматизации учета на предприятиях

Application.Title := 'Àíêåòíûå äàííûå';

Application.CreateForm(TForm1, Form1);

Application.CreateForm(TForm4, Form4);

Application.CreateForm(TDataModule2, DataModule2);

Application.CreateForm(TForm3, Form3);

Application.CreateForm(TForm5, Form5);

Application.Run;

end.

Модуль хранения невизуальных компонентов

unit Unit2;

interface

uses

SysUtils, Classes, IBDatabase, DB;

type

TDataModule2 = class(TDataModule)

IBDatabase1: TIBDatabase;

IBTransaction1: TIBTransaction;

private

{ Private declarations }

public

{ Public declarations }

end;

var

DataModule2: TDataModule2;

implementation

{$R *.dfm}

end.

Модульосновнойформы

unit Unit1;