在 Delphi 中,如何将sql字段与值相乘?

yzuktlbb  于 2022-11-04  发布在  其他
关注(0)|答案(2)|浏览(173)

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

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

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

wooyq4lh1#

假设:
1.您的应用程序是基于FMX的,则Label1.Text是可以的,否则您需要Label1.Caption

  1. 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);
inn6fuwd

inn6fuwd2#

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

相关问题