Question

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

如果var Orden值为1，则执行某些操作（如果为2）则执行其他操作。这是我正在尝试但我不知道如何在“Orden”中声明两个值

我在这里要做的就是创建一个计算器“IgualClick”是“相等”按钮，我正在试图阅读“orden”（Order）是什么，如果是1 = add或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方法）

在Delphi中声明变量

1 个答案: