unit udlgprintersetup; {$mode objfpc}{$H+} interface uses Classes, SysUtils, FileUtil, LResources, Forms, Controls, Graphics, Dialogs; type { TForm2 } TForm2 = class(TForm) private { private declarations } public { public declarations } end; var Form2: TForm2; implementation {$R udlgprintersetup.lfm} end.