paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-08-01 08:26:16 +02:00
Code Issues Packages Projects Releases Wiki Activity

* Left over testsuite parts of Mantis #17108, patch by Lacak2

Browse Source 
git-svn-id: trunk@18038 -
This commit is contained in:
marco 2011-07-31 19:25:32 +00:00
parent c7dceaf266
commit 0fb5540d25
1 changed files with 1 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
packages/fcl-db/tests/sqldbtoolsunit.pas
View File

@ -150,6 +150,7 @@ begin
begin
Fconnection := tIBConnection.Create(nil);
// Firebird does not support time = 24:00:00
FieldtypeDefinitions[ftMemo] := 'BLOB SUB_TYPE TEXT';
testTimeValues[2]:='23:00:00.000';
testValues[ftTime,2]:='23:00:00.000';
end;