Changeset 138 for trunk/Modules/ZdechovNET/UNetworkPage.pas

Timestamp:

Sep 9, 2022, 8:20:25 PM (2 years ago)

Author:

chronos

Message:

• Modified: Removed TemplateGenerics package. Generics usage replaced by standard Generics.Collections.

File:

• trunk/Modules/ZdechovNET/UNetworkPage.pas (modified) (1 diff)

trunk/Modules/ZdechovNET/UNetworkPage.pas

@@ -37 +37 @@
   with TWebSession(HandlerData) do begin
     ModuleUser.LoadUserInfo;
-    with HtmlDocument.Body, THtmlString(SubItems.AddNew(THtmlString.Create)) do begin
+    with HtmlDocument.Body, SubItems.AddString do begin
       Text := MakeLink('Dokumenty', NavigationLink('/dokumenty/')) + '<br/>' +
         MakeLink('Historie', NavigationLink('/historie/')) + '<br/>' +