From 13d6d65ef21ecaff31a1f077994376cb36e0d163 Mon Sep 17 00:00:00 2001
From: jujibo <jujibo@8e941d3f-bd1b-0410-a28a-d453659cc2b4>
Date: Mon, 10 Oct 2011 08:36:28 +0000
Subject: [PATCH] Add: Error messages to mouse events

git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@2068 8e941d3f-bd1b-0410-a28a-d453659cc2b4
---
 components/jujiboutils/src/jdbgridutils.pas | 10 ++++++++++
 1 file changed, 10 insertions(+)

diff --git a/components/jujiboutils/src/jdbgridutils.pas b/components/jujiboutils/src/jdbgridutils.pas
index 40be6a76d..d34ef4f24 100644
--- a/components/jujiboutils/src/jdbgridutils.pas
+++ b/components/jujiboutils/src/jdbgridutils.pas
@@ -438,6 +438,8 @@ begin
     Result := False
   else
     Result := True;
+  if not Result then
+    ShowMessage(Format(SInvalidDateTime, [CellEditor.Text]));
 end;
 
 { TJDbGridTimeCtrl }
@@ -610,6 +612,8 @@ begin
     Result := False
   else
     Result := True;
+  if not Result then
+    ShowMessage(Format(SInvalidTime, [CellEditor.Text]));
 end;
 
 { TJDbGridDateCtrl }
@@ -784,6 +788,8 @@ begin
     Result := False
   else
     Result := True;
+  if not Result then
+    ShowMessage(Format(SInvalidDate, [CellEditor.Text]));
 end;
 
 { TJDbGridDoubleCtrl }
@@ -935,6 +941,8 @@ begin
     Result := IsValidFloat(CellEditor.Text)
   else
     Result := True;
+  if not Result then
+    ShowMessage(Format(SInvalidNumber, [CellEditor.Text]));
 end;
 
 { TJDbGridIntegerCtrl }
@@ -1056,6 +1064,8 @@ begin
     Result := IsValidInteger(CellEditor.Text)
   else
     Result := True;
+  if not Result then
+    ShowMessage(Format(SInvalidNumber, [CellEditor.Text]));
 end;
 
 end.