Присвойте значение enum некоторой другой переменной

Question

У меня есть следующее перечисление в Delphi:

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

В событии BeforePost я проверяю, установлен ли набор данных в режиме вставки, тогда я

 ChangingDSState:=Inserting
else
 ChagingDSState:=Editing

Допустим, набор данных находится в режиме редактирования, это означает, что моя переменная ChangingDSState будет переведена в 2 (редактирование). Теперь я хочу знать, как я могу использовать это число для передачи его в качестве аргумента в процедуру

Answer 1

Я предполагаю, что вы хотите порядковое значение, а не перечисляемое значение. Вы получаете это с ord().

Итак, ord(ChagingDSState) - это целочисленное выражение со значением 2, когда ChagingDSState равно Editing.