delphi - 将枚举值分配给其他变量

我在Delphi中有以下枚举:

type TChangingDataSetState=(Inserting=1,Editing,Deleting)
......
var
ChangingDSSsate:TChangingDataSetState;

在BeforePost事件中，我检查数据集是否处于“插入”模式，然后

 ChangingDSState:=Inserting
else
 ChagingDSState:=Editing

假设数据集处于编辑模式，这意味着我的ChangesDSState var将被评估为2(Editing)。现在我想知道如何使用该数字将其作为过程的参数传递

最佳答案

我假设您想要的是序数值而不是枚举值。您可以通过ord()来实现。

因此，ord(ChagingDSState)是一个整数表达式，当2等于ChagingDSState时，其值为Editing。