メモリマネージャ云々は、どうも挙動がおかしくなるので無かったことにしました。

diff --git a/bottleclient/SimpleMemoryManager.pas b/bottleclient/SimpleMemoryManager.pas
deleted file mode 100644 (file)
index f68963f..0000000
--- a/bottleclient/SimpleMemoryManager.pas
+++ /dev/null
@@ -1,42 +0,0 @@
-(* \95K\82¸\8dÅ\8f\89\82Éuses\82·\82é\82±\82Æ\81I *)
-
-unit SimpleMemoryManager;
-
-interface
-
-uses Windows, SysUtils;
-
-implementation
-
-var
-  OldMemMgr: TMemoryManager;
-
-function NewGetMem(Size: Integer): Pointer;
-begin
-  Result := Pointer(GlobalAlloc(GMEM_FIXED,Size));
-end;
-
-function NewFreeMem(P: Pointer): Integer;
-begin
-  Result := GlobalFree(HGLOBAL(P));
-end;
-
-function NewReallocMem(P: Pointer; Size: Integer): Pointer;
-begin
-  Result := Pointer(GlobalReAlloc(HGLOBAL(P),Size,GMEM_MOVEABLE));
-end;
-
-const
-  NewMemMgr: TMemoryManager = (
-  GetMem: NewGetMem;
-  FreeMem: NewFreeMem;
-  ReallocMem: NewReallocMem);
-
-initialization
-  GetMemoryManager(OldMemMgr);
-  SetMemoryManager(NewMemMgr);
-
-finalization
-  SetMemoryManager(OldMemMgr);
-
-end.