Código Delphi [-] TBII_UR_Get_Name = function(const UR:PChar; name: PChar):integer; stdcall;
TBII_UR_Get_Name = function(const UR:PChar; name: PChar):integer; stdcall;
Código Delphi [-]var name: array[1..16] of char; begin ...... TBII_UR_Get_Name(Usr, @name[0]);
var name: array[1..16] of char; begin ...... TBII_UR_Get_Name(Usr, @name[0]);