windows - Delphi中的Sqrt函数

Question

作为一个让自己投入的练习，我想在 Delphi 中设计一个计算器。所以，到目前为止，总和、减法、乘法和除法几乎都在起作用。

我对平方根有问题的唯一功能。

变量被扩展，我几乎只是从字符串（我使用两个编辑框）转换为浮点数

var
   Form1: TForm1;
   a, b, r: Extended;

procedure TForm1.SqrtClick(Sender: TObject);
begin
   a  := StrToFloat(Edit1.Text);
   r  := Sqrt(a);
   ShowMessage(FloatToStr(r));
end;

德尔福它让我回来了

[错误] calc.dpr(72)：缺少运算符或分号。

Answer 1

该问题在您上面的代码段中并不明显。但既然我有精神力量，我仍然可以知道这里发生了什么。

sqrt您的表单上有一个按钮。因此，当您编写sqrt代码时，它指的是按钮，而不是 RTL 函数。

解决方案：写System.Sqrt而不是Sqrt（= Self.Sqrt，按钮），或重命名按钮。