You mean the GetSid.iss ??? it's all in russian, not english
code_language.pascal:
[Files]
Source: "IsGetSid.dll"; Flags: dontcopy solidbreak
[Code]
function GetSid() : PAnsiChar;
external 'GetSid@files:IsGetSid.dll stdcall delayload';
Если таких записей много, то лучше сделать так:
code_language.pascal:
[Code]
var
uSID : PAnsiChar;
function GetSid() : PAnsiChar;
external 'GetSid@files:IsGetSid.dll stdcall delayload';
function InitializeSetup(): Boolean;
begin
Result := True;
try
uSID := GetSID;
except
MsgBox('Невозможно получить SID текущего пользователя.', mbError, MB_OK);
Result := False; // если ошибка
end;
end;
function UsSID(const s: string) : AnsiString;
begin
Result := uSID;
end;