| /trunk/UserDetect2/Plugins/TestDynamicEcho.dof |
|---|
| 0,0 → 1,140 |
| [FileVersion] |
| Version=7.0 |
| [Compiler] |
| A=8 |
| B=0 |
| C=1 |
| D=1 |
| E=0 |
| F=0 |
| G=1 |
| H=1 |
| I=1 |
| J=0 |
| K=0 |
| L=1 |
| M=0 |
| N=1 |
| O=1 |
| P=1 |
| Q=0 |
| R=0 |
| S=0 |
| T=0 |
| U=0 |
| V=1 |
| W=0 |
| X=1 |
| Y=1 |
| Z=1 |
| ShowHints=1 |
| ShowWarnings=1 |
| UnitAliases=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE; |
| NamespacePrefix= |
| SymbolDeprecated=1 |
| SymbolLibrary=1 |
| SymbolPlatform=1 |
| UnitLibrary=1 |
| UnitPlatform=1 |
| UnitDeprecated=1 |
| HResultCompat=1 |
| HidingMember=1 |
| HiddenVirtual=1 |
| Garbage=1 |
| BoundsError=1 |
| ZeroNilCompat=1 |
| StringConstTruncated=1 |
| ForLoopVarVarPar=1 |
| TypedConstVarPar=1 |
| AsgToTypedConst=1 |
| CaseLabelRange=1 |
| ForVariable=1 |
| ConstructingAbstract=1 |
| ComparisonFalse=1 |
| ComparisonTrue=1 |
| ComparingSignedUnsigned=1 |
| CombiningSignedUnsigned=1 |
| UnsupportedConstruct=1 |
| FileOpen=1 |
| FileOpenUnitSrc=1 |
| BadGlobalSymbol=1 |
| DuplicateConstructorDestructor=1 |
| InvalidDirective=1 |
| PackageNoLink=1 |
| PackageThreadVar=1 |
| ImplicitImport=1 |
| HPPEMITIgnored=1 |
| NoRetVal=1 |
| UseBeforeDef=1 |
| ForLoopVarUndef=1 |
| UnitNameMismatch=1 |
| NoCFGFileFound=1 |
| MessageDirective=1 |
| ImplicitVariants=1 |
| UnicodeToLocale=1 |
| LocaleToUnicode=1 |
| ImagebaseMultiple=1 |
| SuspiciousTypecast=1 |
| PrivatePropAccessor=1 |
| UnsafeType=0 |
| UnsafeCode=0 |
| UnsafeCast=0 |
| [Linker] |
| MapFile=0 |
| OutputObjs=0 |
| ConsoleApp=1 |
| DebugInfo=0 |
| RemoteSymbols=0 |
| MinStackSize=16384 |
| MaxStackSize=1048576 |
| ImageBase=4194304 |
| ExeDescription= |
| [Directories] |
| OutputDir= |
| UnitOutputDir= |
| PackageDLLOutputDir= |
| PackageDCPOutputDir= |
| SearchPath= |
| Packages=vcl;rtl;vclx;indy;inet;xmlrtl;vclie;inetdbbde;inetdbxpress;dbrtl;dsnap;dsnapcon;vcldb;soaprtl;VclSmp;dbexpress;dbxcds;inetdb;bdertl;vcldbx;webdsnap;websnap;adortl;ibxpress;teeui;teedb;tee;dss;visualclx;visualdbclx;vclactnband;vclshlctrls;IntrawebDB_50_70;Intraweb_50_70;Rave50CLX;Rave50VCL;dclOfficeXP |
| Conditionals= |
| DebugSourceDirs= |
| UsePackages=0 |
| [Parameters] |
| RunParams= |
| HostApplication= |
| Launcher= |
| UseLauncher=0 |
| DebugCWD= |
| [Language] |
| ActiveLang= |
| ProjectLang= |
| RootDir= |
| [Version Info] |
| IncludeVerInfo=1 |
| AutoIncBuild=0 |
| MajorVer=1 |
| MinorVer=0 |
| Release=0 |
| Build=0 |
| Debug=0 |
| PreRelease=0 |
| Special=0 |
| Private=0 |
| DLL=1 |
| Locale=1033 |
| CodePage=1252 |
| [Version Info Keys] |
| CompanyName=ViaThinkSoft |
| FileDescription=TestDynamicEcho plugin for UserDetect2 |
| FileVersion=1.0.0.0 |
| InternalName=UD2-TestDynamicEcho |
| LegalCopyright=(C) 2016 ViaThinkSoft |
| LegalTrademarks= |
| OriginalFilename=TestDynamicEcho.dll |
| ProductName=UserDetect2 |
| ProductVersion=3.0.0.0 |
| Website=www.viathinksoft.de |
| Project leader=Daniel Marschall - www.daniel-marschall.de |
| [HistoryLists\hlUnitAliases] |
| Count=1 |
| Item0=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE; |
| /trunk/UserDetect2/Plugins/TestDynamicEcho.dpr |
|---|
| 0,0 → 1,93 |
| library TestDynamicEcho; |
| uses |
| Windows, |
| SysUtils, |
| Classes, |
| UD2_PluginIntf in '..\UD2_PluginIntf.pas', |
| UD2_PluginUtils in '..\UD2_PluginUtils.pas', |
| UD2_PluginStatus in '..\UD2_PluginStatus.pas'; |
| {$R *.res} |
| const |
| PLUGIN_GUID: TGUID = '{30653D69-0806-450E-AEF9-19C2D36D298E}'; |
| function PluginIdentifier: TGUID; cdecl; |
| begin |
| result := PLUGIN_GUID; |
| end; |
| function IdentificationStringW(lpIdentifier: LPWSTR; cchSize: DWORD): UD2_STATUS; cdecl; |
| begin |
| result := UD2_STATUS_NOTAVAIL_ONLY_ACCEPT_DYNAMIC; |
| end; |
| function PluginNameW(lpPluginName: LPWSTR; cchSize: DWORD; wLangID: LANGID): UD2_STATUS; cdecl; |
| var |
| stPluginName: WideString; |
| primaryLangID: Byte; |
| begin |
| primaryLangID := wLangID and $00FF; |
| if primaryLangID = LANG_GERMAN then |
| stPluginName := 'Dynamisches Echo (Test plugin)' |
| else |
| stPluginName := 'Dynamic echo (Test plugin)'; |
| result := UD2_WritePascalStringToPointerW(lpPluginName, cchSize, stPluginName); |
| end; |
| function PluginVendorW(lpPluginVendor: LPWSTR; cchSize: DWORD; wLangID: LANGID): UD2_STATUS; cdecl; |
| begin |
| result := UD2_WritePascalStringToPointerW(lpPluginVendor, cchSize, 'ViaThinkSoft'); |
| end; |
| function PluginVersionW(lpPluginVersion: LPWSTR; cchSize: DWORD; wLangID: LANGID): UD2_STATUS; cdecl; |
| begin |
| result := UD2_WritePascalStringToPointerW(lpPluginVersion, cchSize, '1.0'); |
| end; |
| function IdentificationMethodNameW(lpIdentificationMethodName: LPWSTR; cchSize: DWORD): UD2_STATUS; cdecl; |
| var |
| stIdentificationMethodName: WideString; |
| begin |
| stIdentificationMethodName := 'TestEcho'; |
| result := UD2_WritePascalStringToPointerW(lpIdentificationMethodName, cchSize, stIdentificationMethodName); |
| end; |
| function CheckLicense(lpReserved: LPVOID): UD2_STATUS; cdecl; |
| begin |
| result := UD2_STATUS_OK_LICENSED; |
| end; |
| function DescribeOwnStatusCodeW(lpErrorDescription: LPWSTR; cchSize: DWORD; statusCode: UD2_STATUS; wLangID: LANGID): BOOL; cdecl; |
| begin |
| // This function does not use non-generic status codes |
| result := FALSE; |
| end; |
| function DynamicIdentificationStringW(lpIdentifier: LPWSTR; cchSize: DWORD; lpDynamicData: LPWSTR): UD2_STATUS; cdecl; |
| var |
| stIdentifier: WideString; |
| begin |
| try |
| stIdentifier := lpDynamicData; // "echo" |
| result := UD2_WritePascalStringToPointerW(lpIdentifier, cchSize, stIdentifier); |
| except |
| on E: Exception do result := UD2_STATUS_HandleException(E); |
| end; |
| end; |
| exports |
| PluginInterfaceID name mnPluginInterfaceID, |
| PluginIdentifier name mnPluginIdentifier, |
| PluginNameW name mnPluginNameW, |
| PluginVendorW name mnPluginVendorW, |
| PluginVersionW name mnPluginVersionW, |
| IdentificationMethodNameW name mnIdentificationMethodNameW, |
| IdentificationStringW name mnIdentificationStringW, |
| CheckLicense name mnCheckLicense, |
| DescribeOwnStatusCodeW name mnDescribeOwnStatusCodeW, |
| DynamicIdentificationStringW name mnDynamicIdentificationStringW; |
| end. |
| /trunk/UserDetect2/Plugins/TestDynamicEcho.res |
|---|
| Cannot display: file marked as a binary type. |
| svn:mime-type = application/octet-stream |
| Property changes: |
| Added: svn:mime-type |
| +application/octet-stream |
| \ No newline at end of property |