在 Delphi 中声明变量 [关闭]

Question

我是 Delphi 的新手，我正在学习如何声明变量和循环。

如果 var Orden 的值为 1，则做某事，如果它是 2，则做其他事情。这是我正在尝试的，但我不知道如何在“Orden”中声明两个值

我在这里尝试做的是创建一个计算器“IgualClick”是“相等”按钮，我正在尝试读取“orden”（订单）是什么，如果是 1 = 添加或 2 =减去谢谢

谢谢..

procedure TForm1.IgualClick(Sender: TObject);
var
  Orden : integer;
begin

  Orden := (1)(2);
  B := StrToInt(Edit1.Text);
   Case orden of
     1 : Sumar;
     2 : Restar;

end;

Answer 1

我认为你的本意是：

procedure TForm1.IgualClick(Sender: TObject);
var
  Orden : integer;
begin          
  Orden := StrToInt(Edit1.Text);
  Case orden of
    1 : Sumar;
    2 : Restar;           
    else raise Exception.Create('Invalid Option!');
  end;
end; 

请阅读语言规范和文档。

如果答案有误，请务必编辑您的问题。据我了解，当您单击 Equals 按钮时，您会检索在 Edit1 中选择的操作数并处理操作（通过调用 Sumar、Restar 方法）