Changeset 304 for trunk/Start.pas

Timestamp:

Mar 9, 2021, 10:05:19 AM (4 years ago)

Author:

chronos

Message:

• Modified: Show configured homepage and contact page in C-evo start screen menu and help.

File:

• trunk/Start.pas (modified) (1 diff)

trunk/Start.pas

@@ -873 +873 @@
               // Canvas.Font.Style:=Canvas.Font.Style+[fsUnderline];
               RisedTextOut(Canvas, xActionIcon + 99, y,
-                Phrases2.Lookup('ACTIONHEADER_WEB'));
+                Format(Phrases2.Lookup('ACTIONHEADER_WEB'), [CevoHomepageShort]));
               Canvas.Font.Assign(UniFont[ftNormal]);
               // TODO: Explicitly clear background to black but in fact BitBlt SRCCOPY should do it