program dsamp; uses Forms, dsampu in 'dsampu.pas' {MainFrm}; {$R *.RES} begin Application.Initialize; Application.Title := 'ACCES32 Sample'; Application.CreateForm(TMainFrm, MainFrm); Application.Run; end.