菜上菜问题,欢迎指教（Invality TypeCast错误问题及AddExitProc函数使用问题）。

Question

你的那个itemState是个什么东东？如果它是一个Longint或者DWORD之类的整形变量，那这句话就是对的。procedure ExitProcTest;
begin
  // Do something
end;procedure ....
begin
  //...
  AddExitProc(ExitProcTest);
end;

Answer 1

   欢迎大家踊跃回答问题，谢谢！！！
TO windoze(瞌睡窗) 感谢你的回答，等我给分时至少给你20分，Think you!!!（信誉保证）　

Answer 2

State := TOwnerDrawState(WordRec(LongRec(itemState).Lo).Lo);
这句话的意思就是取长整形数ItemState的地位字节，然后再作为Word类型取低字节，实际上就失取ItemState的低8位，然后转化为一个集合类型。因为集合类型是有序的，这个转换就是取到集合中的对应序数的元素。举例子来说，假设低8位为2，那么State=odDisabled,如果低8位为5，那么State=odDefault，明白了吗？
不知道你那个ItemState是那个参数里面的。
其它的同Wango。