#pas
..............................
   procedure doConvert(var _Data:TData; Index:word);
 end;

implementation
procedure THiAsmClass.doConvert; //(var _Data:TData; Index:word);
...............