Lock (class)

Syfre (discuter | contributions)
(Page créée avec « {{latest}} <source lang='delphi'>class procedure Lock(iOpe:Integer; iNoWait:boolean):boolean;</source> Pose un verrou pour une opération exclusive. Une opération exclu... »)
Modification suivante →

---

Version du 26 juin 2015 à 13:58

class procedure Lock(iOpe:Integer; iNoWait:boolean):boolean;

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

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;

Voir aussi

• UnLock

— Classes métiers (tech) — Développement DSM —