* Set selection color

demo/Edit/mainunit.pp

@@ -51,8 +51,8 @@ begin
     '  padding: 3px; '+
     '  border: 2px solid black; '+
     '  margin: 6px;'+
-    '}';
-
+    '}'+sLineBreak+
+    'input::selection { color: red; background-color: white } ' ;
   Body1:=TBody.Create(Self);
   Body1.Parent:=Self;
   Body1.Style:='border: 2px solid blue;'#10;