将枚举的值分配给其他变量
我在 Delphi 中有以下枚举:
type TChangingDataSetState=(Inserting=1,Editing,Deleting)
......
var
ChangingDSSsate:TChangingDataSetState;
在 BeforePost 事件中,我检查数据集是否处于插入模式,然后
ChangingDSState:=Inserting
else
ChagingDSState:=Editing
假设数据集处于编辑模式,这意味着我的 ChangingDSState var 将被评估为 2(编辑)。现在我想知道如何使用该数字将其作为参数传递给过程
I have the following enum in Delphi:
type TChangingDataSetState=(Inserting=1,Editing,Deleting)
......
var
ChangingDSSsate:TChangingDataSetState;
In BeforePost event I check if the dataset in Insert mode then I
ChangingDSState:=Inserting
else
ChagingDSState:=Editing
Let's say the dataset is in edit mode, it means my ChangingDSState var will get evuluated to 2(Editing). Now I want to know how I can then use that number to pass it as an argument to a procedure
如果你对这篇内容有疑问,欢迎到本站社区发帖提问 参与讨论,获取更多帮助,或者扫码二维码加入 Web 技术交流群。

绑定邮箱获取回复消息
由于您还没有绑定你的真实邮箱,如果其他用户或者作者回复了您的评论,将不能在第一时间通知您!
发布评论
评论(1)
我假设您想要序数值而不是枚举值。您可以通过
ord()
得到它。因此,当
ChagingDSState
等于Editing
时,ord(ChagingDSState)
是一个值为2
的整数表达式。I assume you want the ordinal value rather than the enumerated value. You get that with
ord()
.So,
ord(ChagingDSState)
is an integer expression with a value of2
whenChagingDSState
equalsEditing
.