Changeset 81 for trunk/Pages


Ignore:
Timestamp:
Jun 21, 2012, 12:21:50 PM (12 years ago)
Author:
chronos
Message:
  • Přejmenování jednotky UMainModule na UCore.
Location:
trunk/Pages
Files:
15 edited

Legend:

Unmodified
Added
Removed

  • trunk/Pages/UAboutPage.pas

    r80 r81  
    2828
    2929uses
    30   UMainModule, UUtils;
     30  UCore, UUtils;
    3131
    3232{ TAboutPage }

  • trunk/Pages/UContactPage.pas

    r78 r81  
    2828
    2929uses
    30   UMainModule;
     30  UCore;
    3131
    3232procedure TContactPage.DataModuleProduce(HandlerData: THTTPHandlerData);

  • trunk/Pages/UDocumentsPage.pas

    r80 r81  
    2828
    2929uses
    30   UMainModule, UUtils;
     30  UCore, UUtils;
    3131
    3232{ TDocumentsPage }

  • trunk/Pages/UHistoryPage.pas

    r80 r81  
    2828
    2929uses
    30   UMainModule, UUtils;
     30  UCore, UUtils;
    3131
    3232{ THistoryPage }

  • trunk/Pages/UHostingPage.pas

    r78 r81  
    2929
    3030uses
    31   UMainModule;
     31  UCore;
    3232
    3333{ THostingPage }

  • trunk/Pages/UInternetPage.pas

    r78 r81  
    2828
    2929uses
    30   UMainModule, UHtmlClasses;
     30  UCore, UHtmlClasses;
    3131
    3232{ TInternetPage }

  • trunk/Pages/ULinksPage.pas

    r78 r81  
    2828
    2929uses
    30   UMainModule;
     30  UCore;
    3131
    3232{ TLinksPage }

  • trunk/Pages/UNetworkPage.pas

    r80 r81  
    2828
    2929uses
    30   UMainModule, UUtils;
     30  UCore, UUtils;
    3131
    3232{ TNetworkPage }

  • trunk/Pages/UPlansPage.pas

    r79 r81  
    2828
    2929uses
    30   UMainModule;
     30  UCore;
    3131
    3232{ TPlansPage }

  • trunk/Pages/UProjectsPage.pas

    r79 r81  
    2828
    2929uses
    30   UMainModule;
     30  UCore;
    3131
    3232{ TProjectsPage }

  • trunk/Pages/UServerInfoPage.pas

    r78 r81  
    2828
    2929uses
    30   UMainModule;
     30  UCore;
    3131
    3232{ TServerInfoPage }

  • trunk/Pages/UUserControlPage.lfm

    r56 r81  
    66  HorizontalOffset = 259
    77  VerticalOffset = 250
    8   Width = 50
     8  Width = 104
    99end

  • trunk/Pages/UUserControlPage.pas

    r80 r81  
    3232
    3333uses
    34   UMainModule, UUtils, UUser;
     34  UCore, UUtils, UUser;
    3535
    3636  { TUserControlPage }
    … …  
    6363  UserId: Integer;
    6464begin
    65   with TWebSession(HandlerData), MainModule, HtmlDocument.Body do begin
     65  with TWebSession(HandlerData), Core, HtmlDocument.Body do begin
    6666    Form := TQueryForm.Create;
    6767    with Form do begin
    … …  
    108108  UserId: Integer;
    109109begin
    110   with TWebSession(HandlerData), MainModule, HtmlDocument.Body do begin
     110  with TWebSession(HandlerData), Core, HtmlDocument.Body do begin
    111111    Form := TQueryForm.Create;
    112112    with Form do begin
    … …  
    165165procedure TUserControlPage.HandleLogout(HandlerData: THTTPHandlerData);
    166166begin
    167   with TWebSession(HandlerData), MainModule, HtmlDocument.Body do begin
     167  with TWebSession(HandlerData), Core, HtmlDocument.Body do begin
    168168    UserOnline.Logout;
    169169    with THtmlString(SubItems.AddNew(THtmlString.Create)) do

  • trunk/Pages/UVoIPPage.pas

    r78 r81  
    2828
    2929uses
    30   UMainModule;
     30  UCore;
    3131
    3232{ TVoIPPage }

  • trunk/Pages/UWebCamPage.pas

    r80 r81  
    2828
    2929uses
    30   UMainModule, UUtils;
     30  UCore, UUtils;
    3131
    3232
Note: See TracChangeset for help on using the changeset viewer.