Changeset 24 for branches/Xvcl/Drivers/Driver.VideoVCL.pas

Timestamp:

May 8, 2013, 2:53:22 PM (11 years ago)

Author:

chronos

Message:

• Fixed: Make only one form focused at once.
• Modified: Enhanced TList generic class to support more methods.

File:

• branches/Xvcl/Drivers/Driver.VideoVCL.pas (modified) (2 diffs)

branches/Xvcl/Drivers/Driver.VideoVCL.pas

@@ -5 +5 @@
 uses
   Vcl.Forms, Vcl.Graphics, System.Types, UFormMain, Xvcl.Classes, Xvcl.Kernel,
-  Xvcl.Graphics;
+  Xvcl.Graphics, Generics.Collections;
 
 type
@@ -63 +63 @@
     clSilver: Result := $c0c0c0;
     clGray: Result := $808080;
-    clLightBlue: Result := $ff8080;
-    clLightRed: Result := $80ff80;
-    clLightGreen: Result := $8080ff;
+    clLightBlue: Result := $ffb0b0;
+    clLightRed: Result := $b0ffb0;
+    clLightGreen: Result := $b0b0ff;
     clBrown: Result := $a52a2a;
     clMagenta: Result := $ff00ff;