diff options
| author | joost <joost@3ad0048d-3df7-0310-abae-a5850022a9f2> | 2010-07-01 15:44:21 +0000 |
|---|---|---|
| committer | joost <joost@3ad0048d-3df7-0310-abae-a5850022a9f2> | 2010-07-01 15:44:21 +0000 |
| commit | c8ff09bd3c0ace3339deddf6721bd42b90e191ef (patch) | |
| tree | 91bf1837922d1bfb014cd1c0ba28c724cef6d5e1 /packages/fcl-db | |
| parent | 698d6767c9b5a171d322f30b58f57b7b038b0ebf (diff) | |
| download | fpc-c8ff09bd3c0ace3339deddf6721bd42b90e191ef.tar.gz | |
* Make sure that fixed width parameters are really ftFixedChar
git-svn-id: http://svn.freepascal.org/svn/fpc/trunk@15506 3ad0048d-3df7-0310-abae-a5850022a9f2
Diffstat (limited to 'packages/fcl-db')
| -rw-r--r-- | packages/fcl-db/tests/testfieldtypes.pas | 12 |
1 files changed, 5 insertions, 7 deletions
diff --git a/packages/fcl-db/tests/testfieldtypes.pas b/packages/fcl-db/tests/testfieldtypes.pas index f4a95fafc9..7538fddc44 100644 --- a/packages/fcl-db/tests/testfieldtypes.pas +++ b/packages/fcl-db/tests/testfieldtypes.pas @@ -770,6 +770,10 @@ begin ShortDateFormat := 'yyyy-mm-dd'; + // There is no Param.AsFixedChar, so the datatype has to be set manually + if ADatatype=ftFixedChar then + Params.ParamByName('field1').DataType := ftFixedChar; + for i := 0 to testValuesCount -1 do begin Params.ParamByName('id').AsInteger := i; @@ -801,13 +805,7 @@ begin ftInteger: AssertEquals(testIntValues[i],FieldByName('FIELD1').AsInteger); ftFloat : AssertEquals(testFloatValues[i],FieldByName('FIELD1').AsFloat); ftBCD : AssertEquals(testBCDValues[i],FieldByName('FIELD1').AsCurrency); - ftFixedChar : - begin - if FieldByName('FIELD1').isnull then - AssertEquals(testStringValues[i],FieldByName('FIELD1').AsString) - else - AssertEquals(PadRight(testStringValues[i],10),FieldByName('FIELD1').AsString); - end; + ftFixedChar : AssertEquals(PadRight(testStringValues[i],10),FieldByName('FIELD1').AsString); ftString : AssertEquals(testStringValues[i],FieldByName('FIELD1').AsString); ftdate : AssertEquals(testDateValues[i],FormatDateTime('yyyy/mm/dd',FieldByName('FIELD1').AsDateTime)); else |