#pas
procedure TClassFTCG_Tools_8EA8A50.event_doValue(var Data:TData; index:word);
begin
  
  procedure myProc(var myvar:integer);
  begin
  end;
end;