Changeset 504 for trunk/Packages

Timestamp:

Dec 24, 2023, 12:57:24 PM (5 months ago)

Author:

chronos

Message:

• Fixed: ScrollBar was not visible on Windows due to not set Width.
• Modified: Code cleanup.

File:

• trunk/Packages/CevoComponents/DrawDlg.pas (modified) (2 diffs)

trunk/Packages/CevoComponents/DrawDlg.pas

@@ -240 +240 @@
   r0 := CreateRectRgn(0, 0, ClientWidth, ClientHeight);
   for i := 0 to ControlCount - 1 do
-    if not(Controls[i] is TArea) and Controls[i].Visible then
+    if not (Controls[i] is TArea) and Controls[i].Visible then
     begin
       with Controls[i].BoundsRect do
@@ -320 +320 @@
     end;
     Start := Stop + 2;
-    inc(LinesCount);
+    Inc(LinesCount);
   end;
   if Preview then