Ignore:
Timestamp:
Sep 7, 2012, 9:52:38 PM (12 years ago)
Author:
chronos
Message:
  • Přidáno: Administrační stránka pro instalaci a odinstalaci modulů.
  • Přidáno: Modul System je zodpovědný za udržování seznamu všech modulů.
Location:
trunk/Packages/ModularSystem
Files:
2 edited

Legend:

Unmodified
Added
Removed
  • trunk/Packages/ModularSystem/ModularSystem.lpk

    r89 r92  
    2020    <Description Value="Modular system"/>
    2121    <License Value="GNU/LGPLv3"/>
    22     <Version Minor="1"/>
     22    <Version Minor="2"/>
    2323    <Files Count="1">
    2424      <Item1>
  • trunk/Packages/ModularSystem/UModularSystem.pas

    r91 r92  
    4343    procedure EnumModulesInstall(ModuleList: TStringList);
    4444    procedure EnumModulesUninstall(ModuleList: TStringList);
     45    procedure SetInstalledState(Value: Boolean);
    4546    constructor Create(Owner: TComponent); virtual;
    4647    destructor Destroy; override;
     
    366367end;
    367368
     369procedure TModule.SetInstalledState(Value: Boolean);
     370begin
     371  FInstalled := Value;
     372end;
     373
    368374constructor TModule.Create(Owner: TComponent);
    369375begin
Note: See TracChangeset for help on using the changeset viewer.