Special treatment for TRichEditViewer, seems like MS never updated it to display a modern border.

Examples/CodeClasses.iss

@@ -314,6 +314,8 @@ begin
   RichEditViewer := TRichEditViewer.Create(Page);
   RichEditViewer.Width := Page.SurfaceWidth;
   RichEditViewer.Height := Page.SurfaceHeight;
+  RichEditViewer.BevelKind := bkFlat;
+  RichEditViewer.BorderStyle := bsNone;
   RichEditViewer.Parent := Page.Surface;
   RichEditViewer.ScrollBars := ssVertical;
   RichEditViewer.UseRichEdit := True;

Projects/ScriptClasses_C.pas

@@ -142,6 +142,8 @@ procedure RegisterRichEditViewer_C(Cl: TPSPascalCompiler);
 begin
   with Cl.AddClassN(Cl.FindClass('TMemo'), 'TRichEditViewer') do
   begin
+    RegisterProperty('BevelKind', 'TBevelKind', iptrw);
+    RegisterProperty('BorderStyle', 'TBorderStyle', iptrw);
     RegisterProperty('RTFText', 'AnsiString', iptw);
     RegisterProperty('UseRichEdit', 'Boolean', iptrw);
   end;

Projects/Wizard.dfm

@@ -133,6 +133,8 @@ object WizardForm: TWizardForm
             Top = 24
             Width = 417
             Height = 161
+            BevelKind = bkFlat
+            BorderStyle = bsNone
             ReadOnly = True
             ScrollBars = ssVertical
             TabOrder = 1
@@ -188,6 +190,8 @@ object WizardForm: TWizardForm
             Top = 24
             Width = 417
             Height = 205
+            BevelKind = bkFlat
+            BorderStyle = bsNone
             ReadOnly = True
             ScrollBars = ssVertical
             TabOrder = 1
@@ -565,6 +569,8 @@ object WizardForm: TWizardForm
             Top = 24
             Width = 417
             Height = 205
+            BevelKind = bkFlat
+            BorderStyle = bsNone
             ReadOnly = True
             ScrollBars = ssVertical
             TabOrder = 1