Changeset 7 for trunk/FioInfo.lpr


Ignore:
Timestamp:
Mar 14, 2013, 10:21:42 PM (11 years ago)
Author:
chronos
Message:
  • Přidáno: Okno s informacemi o aplikaci.
  • Přidáno: Datový modul TCore do něhož byly odděleny obecné části přímo nesouvisející s hlavním oknem.
Location:
trunk
Files:
2 edited

Legend:

Unmodified
Added
Removed

  • trunk

    • Property svn:ignore

      •  

        old new  
        33FioInfo.lps
        44FioInfo.exe
         5FioInfo.dbg

  • trunk/FioInfo.lpr

    r6 r7  
    88  {$ENDIF}{$ENDIF}
    99  Interfaces, // this includes the LCL widgetset
    10   Forms, UFormMain, laz_synapse, UFioAPI, Common, TemplateGenerics,
    11   UFormSettings;
     10  Forms, laz_synapse, UFioAPI, Common, TemplateGenerics,
     11  UFormSettings, UFormMain, UFormAbout, UCore;
    1212
    1313{$R *.res}
    … …  
    1616  RequireDerivedFormResource := True;
    1717  Application.Initialize;
     18  Application.CreateForm(TCore, Core);
    1819  Application.CreateForm(TFormMain, FormMain);
    1920  Application.CreateForm(TFormSettings, FormSettings);
     21  Application.CreateForm(TFormAbout, FormAbout);
    2022  Application.Run;
    2123end.
Note: See TracChangeset for help on using the changeset viewer.