主页 / 问题 / 794247
Accepted
delphi
Asked:2020-03-06 13:24:22 +0000 UTC2020-03-06 13:24:22 +0000 UTC

从数据库获取数据时出错（无法将类型（字符串）的变体转换为类型（货币））

  • 772

我在数据库（SQL Server）中有数据，格式为decimal(18, 3)。当我尝试将它们作为文本获取时，出现以下错误。这是我的代码：

  stat1.Panels.Items[1].Text:='1: '+dbgrd1.DataSource.DataSet.FieldbyName('tarif_som').AsVariant;
  stat1.Panels.Items[2].Text:='2: '+dbgrd1.DataSource.DataSet.FieldbyName('takasa_som').AsVariant;
  stat1.Panels.Items[3].Text:='3: '+dbgrd1.DataSource.DataSet.FieldbyName('dop_zbor_napravSom').AsVariant;
  stat1.Panels.Items[4].Text:='4: '+dbgrd1.DataSource.DataSet.FieldbyName('shtraf_som').AsVariant;
  stat1.Panels.Items[5].Text:='5: '+dbgrd1.DataSource.DataSet.FieldbyName('CannelCoastSom').AsVariant;

这是错误：

在此处输入图像描述

EVariantTypeCastError 带有消息“无法将类型（字符串）的变体转换为类型（货币）”。

我该怎么办？

delphi

1 个回答

  1. Best Answer

    尝试以表格的形式获取数据AsVariant，但立即以所需的类型 - AsString：

    ... := dbgrd1.DataSource.DataSet.FieldbyName('...').AsString;
    • 2

相关问题