lazarus-ccr/components/fpexif/examples/file_renamer/file_renamer.lpr
2018-01-15 14:33:57 +00:00

23 lines
396 B
ObjectPascal

program file_renamer;
{$mode objfpc}{$H+}
uses
{$IFDEF UNIX}{$IFDEF UseCThreads}
cthreads,
{$ENDIF}{$ENDIF}
Interfaces, // this includes the LCL widgetset
Forms, frMain
{ you can add units after this };
{$R *.res}
begin
RequireDerivedFormResource := True;
Application.Scaled := True;
Application.Initialize;
Application.CreateForm(TForm1, Form1);
Application.Run;
end.