/trunk/UserDetect2/Plugins/ComputerName.dpr |
---|
23,9 → 23,13 |
var |
stIdentifier: WideString; |
begin |
try |
stIdentifier := GetComputerName; |
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 |