procedure get_system_data(com_port,start_data:longint;system_data:PChar;
max_data:longint;
var rec_data,error_code:longint);stdcall;
external 'benzing_com.dll';
procedure set_system_data(com_port:longint;system_data:PChar;len_data:longint;
var error_code:longint);stdcall;
external 'benzing_com.dll';