Rev 71 | Show entire file | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed
Rev 71 | Rev 82 | ||
---|---|---|---|
Line 20... | Line 20... | ||
20 | 20 | ||
21 | function IdentificationStringW(lpIdentifier: LPWSTR; cchSize: DWORD): UD2_STATUS; cdecl; |
21 | function IdentificationStringW(lpIdentifier: LPWSTR; cchSize: DWORD): UD2_STATUS; cdecl; |
22 | var |
22 | var |
23 | stIdentifier: WideString; |
23 | stIdentifier: WideString; |
24 | begin |
24 | begin |
- | 25 | try |
|
25 | stIdentifier := 'Always'; |
26 | stIdentifier := 'Always'; |
26 | result := UD2_WritePascalStringToPointerW(lpIdentifier, cchSize, stIdentifier); |
27 | result := UD2_WritePascalStringToPointerW(lpIdentifier, cchSize, stIdentifier); |
- | 28 | except |
|
- | 29 | on E: Exception do result := UD2_STATUS_HandleException(E); |
|
- | 30 | end; |
|
27 | end; |
31 | end; |
28 | 32 | ||
29 | function PluginNameW(lpPluginName: LPWSTR; cchSize: DWORD; wLangID: LANGID): UD2_STATUS; cdecl; |
33 | function PluginNameW(lpPluginName: LPWSTR; cchSize: DWORD; wLangID: LANGID): UD2_STATUS; cdecl; |
30 | var |
34 | var |
31 | stPluginName: WideString; |
35 | stPluginName: WideString; |