Lock (class)

{{#images:versionlatest-32x32.png|stock}} <source lang='delphi'>class procedure Lock(iOpe:Integer; iNoWait:boolean):boolean;</source>

Pose un verrou pour une opération exclusive.

Une opération exclusive est une opération qui ne doit pas être exécutée simultanément sur plusieurs machines.

iOpe	Un entier représentant l'opération à verrouiller
iNoWait	Ne pas attendre si l'opération est verrouillée

iOpe doit être unique pour une classe.

Exemple

<source lang='delphi'> const

 cMyExclusiveOperation = 1;

begin

 if not MyClass.Lock(cMyExclusiveOperation,true) then
   begin
     // This operation is currently executing on an other process.
     Exit;
   end;
 try
   doMyExeclusiveOperation;
 finally
 MyClass.UnLock(cMyExclusiveOperation);
 end;

end; </source>

Voir aussi

UnLock

{{#if:Classes métiers (tech)|

{{#if:Classes métiers (tech)|— Classes métiers (tech) |}} — Développement DSM —

|

{{#if:|— [[{{{1}}}]] |}} — Développement DSM —

}}