#pas
type
 ...
 PHDNotify = ^HD_NOTIFY; 
 PNMHEADER = ^tagNMHEADERA;
 ...
 HDN_ENDTRACK : begin
                _debug(PHDNotify(PNMHEADER(Msg.LParam))^.pItem^.cxy);
                end;