From 87fe011b4b58d37d8d58b71a7316b4902586923e Mon Sep 17 00:00:00 2001
From: Basile Burg <basile.b@gmx.com>
Date: Thu, 6 Oct 2016 15:43:26 +0200
Subject: [PATCH] first exec, colorize the messages

---
 src/ce_messages.pas | 15 ++++++++++-----
 1 file changed, 10 insertions(+), 5 deletions(-)

diff --git a/src/ce_messages.pas b/src/ce_messages.pas
index 8dfbebb4..cb16de1b 100644
--- a/src/ce_messages.pas
+++ b/src/ce_messages.pas
@@ -192,6 +192,11 @@ begin
   fFont := TFont.Create;
   fAutoSelect:=true;
   fMaxCount := 1000;
+  fMsgColors[amkBub] := $FCE7D2;
+  fMsgColors[amkWarn]:= $B3FFFF;
+  fMsgColors[amkErr] := $BDBDFF;
+  fMsgColors[amkInf] := $FFD0A8;
+  fMsgColors[amkHint]:= $C2FFC2;
 end;
 
 destructor TCEMessagesOptions.destroy;
@@ -290,11 +295,11 @@ begin
   //
   inherited;
   //
-  fMsgColors[amkBub]  := clDefault;
-  fMsgColors[amkHint] := clDefault;
-  fMsgColors[amkInf]  := clDefault;
-  fMsgColors[amkErr]  := clDefault;
-  fMsgColors[amkWarn] := clDefault;
+  fMsgColors[amkBub]  := $FCE7D2;
+  fMsgColors[amkWarn] := $B3FFFF;
+  fMsgColors[amkErr]  := $BDBDFF;
+  fMsgColors[amkInf]  := $FFD0A8;
+  fMsgColors[amkHint] := $C2FFC2;
   //
   updaterByLoopInterval := 12;
   fOptions := TCEMessagesOptions.Create(Self);