diff --git a/components/jujiboutils/jujibo-utils/src/jcontrolutils.pas b/components/jujiboutils/jujibo-utils/src/jcontrolutils.pas
index 4bba3e987..11bf6bd45 100644
--- a/components/jujiboutils/jujibo-utils/src/jcontrolutils.pas
+++ b/components/jujiboutils/jujibo-utils/src/jcontrolutils.pas
@@ -170,19 +170,16 @@ begin
   if theValue = 0 then
   begin
     DecodeTime(Now, hh, mm, ss, ms);
-    //ShowMessage('sin hora');
   end
   else
   begin
     DecodeTime(theValue, hh, mm, ss, ms);
-    //ShowMessage('con hora');
   end;
 
   hhs := IntToStr(hh);
   mms := IntToStr(mm);
   sss := IntToStr(ss);
   mss := IntToStr(ms);
-  //ShowMessage(TimeString);
   texto := Value;
   Result := texto; // default value
   tokens := TStringList.Create;
@@ -223,8 +220,6 @@ var
   bTime: TDateTime;
 begin
   Result := TryStrToTime(Value, bTime);
-  //if Result = False then
-  //  ShowMessage('Hora incorrecta: ' + Value);
 end;
 
 end.
diff --git a/components/jujiboutils/jujibo-utils/src/jdbgridutils.pas b/components/jujiboutils/jujibo-utils/src/jdbgridutils.pas
index c25bd502c..ae183c630 100644
--- a/components/jujiboutils/jujibo-utils/src/jdbgridutils.pas
+++ b/components/jujiboutils/jujibo-utils/src/jdbgridutils.pas
@@ -164,7 +164,7 @@ begin
   end
   else
   begin
-    ShowMessage(CellEditor.Caption + ' no es una hora válida: Editing done');
+    ShowMessage(CellEditor.Caption + ' no es una hora válida');
     CellEditor.Text := FormatDateTime(format, theValue);
   end;
 end;
@@ -194,7 +194,7 @@ begin
     if (Key in [VK_RETURN, VK_TAB, VK_UP, VK_DOWN, VK_LEFT, VK_RIGHT]) and
       (not IsValidTimeString(NormalizeTime(CellEditor.Caption, theValue))) then
     begin
-      ShowMessage(CellEditor.Caption + ' no es una hora válida OnKeyDown');
+      ShowMessage(CellEditor.Caption + ' no es una hora válida');
       CellEditor.Text := FormatDateTime(format, theValue);
       CellEditor.SelectAll;
       Key := VK_UNKNOWN;
@@ -225,7 +225,7 @@ begin
       begin
         theValue := StrToTime(CellEditor.Caption);
         Field.DataSet.Edit;
-        Field.AsDateTime:= theValue ; ShowMessage('TAB/Enter/right/left key-> ' + Field.AsString);//Field.AsDateTime := theValue;
+        Field.AsDateTime:= theValue ;
         CellEditor.SelectAll;
         updated := True;
       end;