Funcion para saber si un registro .dbf esta bloqueado ( en red no me funciona )

[Wonni]

Hola

He probado esto para saber si un registro esta bloqueado en una tabla .dbf :

Código Delphi [-]
Var
 Blokeado:LongBool;
begin
 With Table1 Do
  Begin
    UpdateCursorPos;
    DbiIsRecordLocked(Handle, Blokeado);
    If Blokeado Then
     Begin
      ShowMessage(' ATENCION !!!!  El registro bloqueado');
     End Else
      Begin
       ShowMessage('Registro NO bloqueado');
      End;
  End;
end;

y resulta que si en el mismpo pc abro varias instancias del programa y tengo un registro editando e intento editarlo en otra instancia del programa, funciona y me muestra mi mensaje. Pero, lo probe en red y me dice que no está bloqueado. Pero al intentar editarlo, entoces si me salta el error ( en ingles ) de que efectivamente esta siendo utilizado por otro usuario.

¿en red hay otra manera de hacerlo?

Gracias