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