Changeset 140 for trunk/Packages

Timestamp:

Sep 9, 2022, 9:54:26 PM (2 years ago)

Author:

chronos

Message:

• Added: Better page scaling on mobile devices.

File:

• trunk/Packages/CoolWeb/Common/UHtmlClasses.pas (modified) (1 diff)

trunk/Packages/CoolWeb/Common/UHtmlClasses.pas

@@ -554 +554 @@
           Attributes.Add('http-equiv', 'Content-Type');
           Attributes.Add('content', 'text/html; charset=' + ContentEncoding);
+        end;
+        with SubElements.AddTag('meta') do begin
+          Attributes.Add('name', 'viewport');
+          Attributes.Add('content', 'width=device-width, initial-scale=1');
         end;
         for I := 0 to Styles.Count - 1 do