delphi中调用方法:functiongetmass(devtype:integer;commport:integer;setstrings:pchar):pchar;stdcall;external'portiodll.dll';