在 Delphi 中，如何将 sql 字段与值相乘？

Question

我想通过将查询字段乘以 spinBox1 的值来更改 label1 的文本。但它不起作用。 ** 字段 [3] 在我的 table 中保存为整数 **

label1.Text := MSQuery1.Fields[3].AsInteger * spinBox1.Value;

或

label1.Text := MSQuery1.Fields[3].AsInteger * spinBox1.Text.ToInteger;

Answer 1

您需要 Label1.caption 而不是 Label1.Text 并且它是一个字符串，因此您需要 IntToStr 函数将整数（如果它是整数）转换为字符串。

Answer 2

假设：

您的应用程序是基于 FMX 的，那么 Label1.Text 没问题，否则您需要 Label1.Caption
SpinBox 来自 FMX 库，Value 类型是 Double，不是 Integer

密码是：

Label1.Text := (MSQuery1.Fields[3].AsInteger * SpinBox1.Value).ToString;
// Or using older versions of Delphi
Label1.Text := FloatToStr(MSQuery1.Fields[3].AsInteger * SpinBox1.Value);

在 Delphi 中，如何将 sql 字段与值相乘？

In Delphi, how can I multiply a sql field and a value?

sql

delphi

pascal

firemonkey

rad-studio