この発言は
#01316　ＴＮ            さんの汎用ロックサーバ
に対するコメントです



クライアントのコード例がめちゃめちゃ．．．

  NamedLock := CoNamedLock.Create;
  NamedLock.Lock('D:\DataFiles\File1.txt');   // ファイルのロック
  NamedLock.Lock('MyDB:Table1');              // テーブルのロック
  try
   //////////////////////// 仕事をする
  finally
    NamedLock.UnLock('MyDB:Table1');              // テーブルの開放
    NamedLock.UnLock('D:\DataFiles\File1.txt');   // ファイルの開放
  end;
 


- FDELPHI  MES(16):玉石混淆みんなで作るSample蔵【見本蓄積】 01/04/14 -

Original document by ＴＮ            氏 ID:(CQJ01721)

ここにあるドキュメントは NIFTY SERVEの Delphi Users' Forum の16番会議室「玉石混淆みんなで作るSample蔵」に投稿されたサンプルです。これらのサンプルはボーランド株式会社がサポートする公式のものではありません。また、必ずしも動作が検証されているものではありません。これらのサンプルを使用したことに起因するいかなる損害も投稿者、およびフォーラムスタッフはその責めを負いません。使用者のリスクの範疇でご使用下さい。