Clarify block declarations / make safer.

Components/RichEditViewer.pas

@@ -41,10 +41,12 @@ type
   
   TRichEditViewer = class(TMemo)
   private
-    FUseRichEdit: Boolean;
-    FRichEditLoaded: Boolean;
-    FCallback: IRichEditOleCallback;
-    class var FCustomShellExecute: TRichEditViewerCustomShellExecute;
+    class var
+      FCustomShellExecute: TRichEditViewerCustomShellExecute;
+    var
+      FUseRichEdit: Boolean;
+      FRichEditLoaded: Boolean;
+      FCallback: IRichEditOleCallback;
     procedure SetRTFTextProp(const Value: AnsiString);
     procedure SetUseRichEdit(Value: Boolean);
     procedure UpdateBackgroundColor;

Components/ScintEdit.pas

@@ -545,10 +545,13 @@ type
 
   TScintPixmap = class
   private
-    class var ColorCodes: String;
+    type
+      TPixmap = array of AnsiString;
+    class var
+      ColorCodes: String;
+    var
+      FPixmap: TPixmap;
     class constructor Create;
-    type TPixmap = array of AnsiString;
-    var FPixmap: TPixmap;
     function GetPixmap: Pointer;
   public
     procedure InitializeFromBitmap(const ABitmap: TBitmap; const TransparentColor: TColorRef);