program DRulerBox;
uses
Forms,
umain in 'umain.pas' {Form1};
{$R *.RES}
begin
Application.Initialize;
Application.Title := 'Ruler Demo';
Application.CreateForm(TForm1, Form1);
Application.Run;
end.