How to use Delphi the best

1

I have a menu with many items doing similar things all listed

  LBDataType = (dtBoo, dtByte,dtDate, dtDateTime, dtRect,
   dtSize, dtText, dtTime, dtWord);

what I want is a LBDataType data record recorded with each TMenuItem
I have tag value to each TMenuItem but I cannot get the tag to deliver into my LBDataType
to do so is just this little bit of code to do so much

Is their another way or better way

2

The TMenuItem tag is an integer value, so you need to assign it the ordinal value of the desired enum. When reading it back, cast the tag into a LBDataType value to retrieve the enum.

xxxx.tag := ord(dtDate); // init the tag
.
.
.
DataType := LBDataType(xxxx.tag); // get the data type from the tag

3

I can use the ord Statement never did that thanks