program FindDocByData; uses Vcl.Forms, DFindDocMain in 'DFindDocMain.pas' {DlgFindDocMain}; {$R *.res} begin Application.Initialize; Application.MainFormOnTaskbar := True; Application.CreateForm(TDlgFindDocMain, DlgFindDocMain); Application.Run; end.