Ignore:
Timestamp:
Oct 9, 2012, 1:58:45 PM (12 years ago)
Author:
chronos
Message:
  • Přidáno: Hlavní modul Base, který slouží jako základní rozhraní k aplikaci pro ostatní moduly. Modul System zajistí udržování seznamu instalovaných modulů v perzistentním úložišti v databázi.
  • Upraveno: Správce modulů ModuleManager je nyní použit pro každé komunikační spojení zvlášť.
File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/Modules/ZdechovNET/UNetworkPage.pas

    r103 r105  
    66
    77uses
    8   Classes, SysUtils, FileUtil, UWebPage, UHTTPServer, UHtmlClasses;
     8  Classes, SysUtils, FileUtil, UWebPage, UHTTPServer, UHtmlClasses, UModuleUser;
    99
    1010type
     
    1717    { private declarations }
    1818  public
    19     { public declarations }
     19    ModuleUser: TModuleUser;
    2020  end;
    2121
     
    3737begin
    3838  with TWebSession(HandlerData) do begin
    39     LoadUserInfo;
     39    ModuleUser.LoadUserInfo;
    4040    with HtmlDocument.Body, THtmlString(SubItems.AddNew(THtmlString.Create)) do begin
    4141      Text := MakeLink('Historie', NavigationLink('/historie/')) + '<br/>' +
Note: See TracChangeset for help on using the changeset viewer.