program dbtool; {$R *.dres} uses FMX.Forms, Unit1 in 'Unit1.pas' {Form2}; {$R *.res} begin Application.Initialize; Application.CreateForm(TForm2, Form2); Application.Run; end.