Changeset 10 for trunk/chronis.lpr


Ignore:
Timestamp:
Jun 9, 2011, 9:33:21 AM (13 years ago)
Author:
george
Message:
  • Added: Application meta information.
  • Added: Empty settings form.
  • Modified: Server connect configuration is now stored in system registry.
Location:
trunk
Files:
2 edited

Legend:

Unmodified
Added
Removed

  • trunk

    • Property svn:ignore

      •  

        old new  
        33chronis
        44heaptrclog.trc
         5chronis.exe

  • trunk/chronis.lpr

    r9 r10  
    99  Interfaces, // this includes the LCL widgetset
    1010  Forms, UPersistentForm, URegistry, USqlDatabase, UTreeState, SysUtils,
    11   UItemView, UItemEdit, ULoginForm, UMainForm, UItemAdd, TemplateGenerics, USystem
     11  UItemView, UItemEdit, ULoginForm, UMainForm, UItemAdd, TemplateGenerics,
     12  USystem, UCore, UApplicationInfo, USettingForm
    1213  { you can add units after this };
    1314
    1415{$R *.res}
    1516
     17{$IFDEF DEBUG}
    1618const
    1719  HeapTraceLog = 'heaptrclog.trc';
     20{$ENDIF}
     21
    1822begin
     23  {$IFDEF DEBUG}
    1924  // Heap trace
    2025  DeleteFile(ExtractFilePath(ParamStr(0)) + HeapTraceLog);
    2126  SetHeapTraceOutput(ExtractFilePath(ParamStr(0)) + HeapTraceLog);
     27  {$ENDIF}
     28
    2229  Application.Initialize;
     30  Application.CreateForm(TCore, Core);
    2331  Application.CreateForm(TMainForm, MainForm);
     32  Application.CreateForm(TLoginForm, LoginForm);
    2433  Application.CreateForm(TItemViewForm, ItemViewForm);
    2534  Application.CreateForm(TItemEditForm, ItemEditForm);
    2635  Application.CreateForm(TItemAddForm, ItemAddForm);
     36  Application.CreateForm(TSettingForm, SettingForm);
    2737  Application.Run;
    2838end.
Note: See TracChangeset for help on using the changeset viewer.