* According to bug #14960, Delphi TDateTimeField.GetText uses the LongTimeFormat for displaying times

git-svn-id: trunk@15006 -

packages/fcl-db/src/base/fields.inc

@@ -2046,7 +2046,7 @@ begin
       F:=FDisplayFormat
     else
       Case DataType of
-       ftTime : F:=ShortTimeFormat;
+       ftTime : F:=LongTimeFormat;
        ftDate : F:=ShortDateFormat;
       else
        F:='c'