Changeset 151 for trunk/Packages/CoolWeb/Common/HtmlClasses.pas

Timestamp:

Feb 4, 2024, 3:53:52 PM (4 months ago)

Author:

chronos

Message:

• Modified: Units in CoolWeb and ModularSystem packages renamed to not use U prefix in name.

File:

• trunk/Packages/CoolWeb/Common/HtmlClasses.pas (moved) (moved from trunk/Packages/CoolWeb/Common/UHtmlClasses.pas ) (3 diffs)

trunk/Packages/CoolWeb/Common/HtmlClasses.pas

@@ -1 @@
-unit UHtmlClasses;
+unit HtmlClasses;
 
 interface
 
 uses
-  UXmlClasses, Classes, SysUtils, Generics.Collections, Generics, UIpAddress;
+  XmlClasses, Classes, SysUtils, Generics.Collections, Generics, IpAddress;
 
 type
@@ -742 +742 @@
 procedure TQueryString.SetStringServer;
 begin
-  //$this->SetString($_SERVER['QUERY_STRING']);
+  // SetString($_SERVER['QUERY_STRING']);
 end;
 
@@ -762 +762 @@
 function TQueryString.GetString: string;
 begin
-  (*$Parts = array();
+  (*
+  Parts = array();
   foreach($this->Data as $Index => $Item)
   {