| 4,6 → 4,7 |
|---|
| Windows, |
| SysUtils, |
| Classes, |
| MiscUtils, |
| SPgetsid, |
| UD2_PluginIntf in '..\UD2_PluginIntf.pas', |
| UD2_PluginUtils in '..\UD2_PluginUtils.pas', |
| 23,9 → 24,19 |
|---|
| var |
| stIdentifier: WideString; |
| begin |
| try |
| if GetPlatformID = VER_PLATFORM_WIN32_WINDOWS then |
| begin |
| result := UD2_STATUS_NOTAVAIL_OS_NOT_SUPPORTED; |
| Exit; |
| end; |
| |
| stIdentifier := GetCurrentUserSid; |
| result := UD2_WritePascalStringToPointerW(lpIdentifier, cchSize, stIdentifier); |
| except |
| on E: Exception do result := UD2_STATUS_HandleException(E); |
| end; |
| end; |
| |
| function PluginNameW(lpPluginName: LPWSTR; cchSize: DWORD; wLangID: LANGID): UD2_STATUS; cdecl; |
| var |