Subversion Repositories delphiutils

Rev

Rev 68 | Go to most recent revision | Show entire file | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 68 Rev 69
Line 4... Line 4...
4
 
4
 
5
UD2_API GUID PluginIdentifier() {
5
UD2_API GUID PluginIdentifier() {
6
        return __GUID("{7576BD8F-A0C4-436F-B953-B137CBFD9FC7}");
6
        return __GUID("{7576BD8F-A0C4-436F-B953-B137CBFD9FC7}");
7
}
7
}
8
 
8
 
9
UD2_API DWORD PluginNameW(LPWSTR lpPluginName, DWORD cchSize, LANGID wLangID) {
9
UD2_API UD2_STATUS PluginNameW(LPWSTR lpPluginName, DWORD cchSize, LANGID wLangID) {
10
         LPCWSTR str = L"Test-Plugin in C++";
10
         LPCWSTR str = L"Test-Plugin in C++";
11
         return __WRITESTR_W(lpPluginName, cchSize, str);
11
         return UD2_WriteStrW(lpPluginName, cchSize, str);
12
}
12
}
13
 
13
 
14
UD2_API UD2_STATUSCODE PluginVersionW(LPWSTR lpPluginVersion, DWORD cchSize, LANGID wLangID) {
14
UD2_API UD2_STATUS PluginVersionW(LPWSTR lpPluginVersion, DWORD cchSize, LANGID wLangID) {
15
         LPCWSTR str = L"1.0";
15
         LPCWSTR str = L"1.0";
16
         return __WRITESTR_W(lpPluginVersion, cchSize, str);
16
         return UD2_WriteStrW(lpPluginVersion, cchSize, str);
17
}
17
}
18
 
18
 
19
UD2_API UD2_STATUSCODE PluginVendorW(LPWSTR lpPluginVendor, DWORD cchSize, LANGID wLangID) {
19
UD2_API UD2_STATUS PluginVendorW(LPWSTR lpPluginVendor, DWORD cchSize, LANGID wLangID) {
20
         LPCWSTR str = L"ViaThinkSoft";
20
         LPCWSTR str = L"ViaThinkSoft";
21
         return __WRITESTR_W(lpPluginVendor, cchSize, str);
21
         return UD2_WriteStrW(lpPluginVendor, cchSize, str);
22
}
22
}
23
 
23
 
24
UD2_API UD2_STATUSCODE CheckLicense(LPVOID lpReserved) {
24
UD2_API UD2_STATUS CheckLicense(LPVOID lpReserved) {
25
        return UD2_STATUS_OK;
25
        return UD2_STATUS_OK_LICENSED;
26
}
26
}
27
 
27
 
28
UD2_API UD2_STATUSCODE IdentificationMethodNameW(LPWSTR lpIdentificationMethodName, DWORD cchSize) {
28
UD2_API UD2_STATUS IdentificationMethodNameW(LPWSTR lpIdentificationMethodName, DWORD cchSize) {
29
         return __WRITESTR_W(lpIdentificationMethodName, cchSize, L"TEST");
29
         return UD2_WriteStrW(lpIdentificationMethodName, cchSize, L"TEST");
30
}
30
}
31
 
31
 
32
UD2_API UD2_STATUSCODE IdentificationStringW(LPWSTR lpIdentifier, DWORD cchSize) {
32
UD2_API UD2_STATUS IdentificationStringW(LPWSTR lpIdentifier, DWORD cchSize) {
33
         return __WRITESTR_W(lpIdentifier, cchSize, L"Example");
33
         return UD2_WriteStrW(lpIdentifier, cchSize, L"Example");
34
}
34
}