--- C:/Program Files (x86)/Embarcadero/RAD Studio/7.0/lib/jvcl/run/JvDBDateTimePicker.pas	×ò íîÿ 10 15:47:26 2011
+++ C:/Users/hohlovm/Documents/RAD Studio/Projects/JVDBDateTimePicker/JvDBDateTimePicker.pas	×ò ìàð 29 11:25:08 2012
@@ -1,4 +1,4 @@
-{-----------------------------------------------------------------------------
+{-----------------------------------------------------------------------------
 The contents of this file are subject to the Mozilla Public License
 Version 1.1 (the "License"); you may not use this file except in compliance
 with the License. You may obtain a copy of the License at
@@ -573,17 +573,29 @@
 procedure TJvDBDateTimePicker.CNNotify(var Msg: TWMNotify);
 var
   st: TSystemTime;
+  DtInfo: ^tagNMDATETIMECHANGE;
+  MsgRaw: TMessage absolute Msg;
 begin
   case Msg.NMHdr^.code of
     DTN_DATETIMECHANGE:
     begin
       FDataLink.Edit;
       if FIsReadOnly and not FDataLink.CanModify then
-      begin
-        DateTimeToSystemTime(DateTime, st);
-        MsgSetDateTime(st);
-        Exit;
-      end;
+        begin
+          DateTimeToSystemTime(DateTime, st);
+          MsgSetDateTime(st);
+          Exit;
+        end
+      else if Kind = dtkTime then
+        begin
+          { Get the information about change }
+          if Field <> nil then
+            begin
+              DtInfo := Pointer(MsgRaw.LParam);
+              Field.Value := SystemTimeToDateTime(DtInfo.st);
+            end;
+          Exit;
+        end;
     end;
   end;
   inherited;