Changeset 2 for trunk/ImageFile.lpr


Ignore:
Timestamp:
Jun 18, 2024, 12:46:47 PM (8 days ago)
Author:
chronos
Message:
  • Modified: Code cleanup.
Location:
trunk
Files:
2 edited

Legend:

Unmodified
Added
Removed

  • trunk

    • Property svn:ignore set to
      lib
      ImageFile.lps
      ImageFile.res
      ImageFile

  • trunk/ImageFile.lpr

    r1 r2  
    11program ImageFile;
    2 
    3 {$mode objfpc}{$H+}
    42
    53uses
    … …  
    86  {$ENDIF}{$ENDIF}
    97  Interfaces, // this includes the LCL widgetset
    10   Forms, UFormMain
     8  Forms, FormMain
    119  { you can add units after this };
    1210
    … …  
    1715  Application.Scaled:=True;
    1816  Application.Initialize;
    19   Application.CreateForm(TFormMain, FormMain);
     17  Application.CreateForm(TFormMain, FormMain.FormMain);
    2018  Application.Run;
    2119end.
Note: See TracChangeset for help on using the changeset viewer.