All non-working stuff moved from trunk

git-svn-id: http://svn.miranda-ng.org/main/trunk@13071 1316c22d-e87f-b044-9b9b-93d7a3e3ba9c

1 files changed, 0 insertions, 44 deletions

diff --git a/plugins/!NotAdopted/Chess4Net/NonRefInterfacedObjectUnit.pas b/plugins/!NotAdopted/Chess4Net/NonRefInterfacedObjectUnit.pas
deleted file mode 100644
index a6a32f2901..0000000000
--- a/plugins/!NotAdopted/Chess4Net/NonRefInterfacedObjectUnit.pas
+++ /dev/null
@@ -1,44 +0,0 @@
-////////////////////////////////////////////////////////////////////////////////

-// All code below is exclusively owned by author of Chess4Net - Pavel Perminov

-// (packpaul@mail.ru, packpaul1@gmail.com).

-// Any changes, modifications, borrowing and adaptation are a subject for

-// explicit permition from the owner.

-

-unit NonRefInterfacedObjectUnit;

-

-interface

-

-type

-  TNonRefInterfacedObject = class(TObject, IInterface)

-  protected

-    function QueryInterface(const IID: TGUID; out Obj): HResult; stdcall;

-    function _AddRef: Integer; stdcall;

-    function _Release: Integer; stdcall;

-  end;

-

-implementation

-

-////////////////////////////////////////////////////////////////////////////////

-// TNonRefInterfacedObject

-

-function TNonRefInterfacedObject.QueryInterface(const IID: TGUID; out Obj): HResult;

-begin

-  if GetInterface(IID, Obj) then

-    Result := 0

-  else

-    Result := E_NOINTERFACE;

-end;

-

-

-function TNonRefInterfacedObject._AddRef: Integer;

-begin

-  Result := -1;

-end;

-

-

-function TNonRefInterfacedObject._Release: Integer;

-begin

-  Result := -1;

-end;

-

-end.