Skip to content

Commit

Permalink
Identation
Browse files Browse the repository at this point in the history
  • Loading branch information
viniciussanchez committed Sep 20, 2019
1 parent d56758e commit 64202fb
Showing 1 changed file with 12 additions and 6 deletions.
18 changes: 12 additions & 6 deletions src/providers/Providers.DataSet.Serialize.pas
Original file line number Diff line number Diff line change
Expand Up @@ -142,12 +142,18 @@ class function TDataSetSerializeUtils.NewDataSetField(const ADataSet: TDataSet;
Result.Size := AFieldStructure.Size;

case Result.DataType of
ftBCD: TBCDField(Result).Precision := AFieldStructure.Precision;
ftFloat: TFloatField(Result).Precision := AFieldStructure.Precision;
ftSingle: TSingleField(Result).Precision := AFieldStructure.Precision;
ftExtended: TExtendedField(Result).Precision := AFieldStructure.Precision;
ftCurrency: TCurrencyField(Result).Precision := AFieldStructure.Precision;
ftFMTBcd: TFMTBCDField(Result).Precision := AFieldStructure.Precision;
ftBCD:
TBCDField(Result).Precision := AFieldStructure.Precision;
ftFloat:
TFloatField(Result).Precision := AFieldStructure.Precision;
ftSingle:
TSingleField(Result).Precision := AFieldStructure.Precision;
ftExtended:
TExtendedField(Result).Precision := AFieldStructure.Precision;
ftCurrency:
TCurrencyField(Result).Precision := AFieldStructure.Precision;
ftFMTBcd:
TFMTBCDField(Result).Precision := AFieldStructure.Precision;
end;

Result.Visible := AFieldStructure.Visible;
Expand Down

0 comments on commit 64202fb

Please sign in to comment.