Changeset 184 for trunk/Packages/CevoComponents/EOTButton.pas

Timestamp:

May 4, 2020, 10:24:23 PM (4 years ago)

Author:

chronos

Message:

• Modified: Code formatting.

File:

• trunk/Packages/CevoComponents/EOTButton.pas (modified) (4 diffs)

trunk/Packages/CevoComponents/EOTButton.pas

@@ -14 +14 @@
 
 type
+  // EndOfTurn button
   TEOTButton = class(TButtonBase)
   public
@@ -138 +139 @@
       Brush.Color := $0000FF;
       FrameRect(Rect(0, 0, 48, 48))
-    end
+    end;
 end;
 
@@ -146 +147 @@
   begin
     FIndex := x;
-    Invalidate
-  end
+    Invalidate;
+  end;
 end;
 
@@ -158 +159 @@
       Paint
     except
-    end
-  end
+    end;
+  end;
 end;