[firebase-br] travar registros

[marcelo - teflamar]

tem o travamento pessimista.
aqui vai um exemplo:
try
  dm.transaction_travamento.StartTransaction;
  // Executando comandos SQL, que irão travar o registro cuja chave
  // esta armazenada em WCOD
  dm.sqltrava.sql.text:='UPDATE '+wtabela+' SET COD = COD WHERE COD = 
'+wcod;
  dm.sqltrava.Execsql;
  result:= True;
  Except
    // Se executou uma exceção, então o registro já está travado por outro 
usuário.
    dm.transaction_travamento.Rollback;
    if application.MessageBox('O Registro está sendo alterado por outro 
usuário. Tentar novamente ?', 
'Atenção',mb_yesno+mb_iconquestion+mb_defbutton1) = mryes then
      Continue
    else  break;
  end;
  break;
end;

----- Original Message ----- 
From: "Felipe Barros" <felipeaguiarbarros em yahoo.com.br>
To: "FireBase" <lista em firebase.com.br>
Sent: Tuesday, July 10, 2007 6:36 PM
Subject: [firebase-br] travar registros


boa noite

existe como eu travar os registros de um select para que outros usuários não 
possam altera-los ?


att
felipe barros.
______________________________________________
FireBase-BR (www.firebase.com.br) - Hospedado em www.locador.com.br
Para editar sua configuração na lista, use o endereço 
http://mail.firebase.com.br/mailman/listinfo/lista_firebase.com.br
Para consultar mensagens antigas: http://firebase.com.br/pesquisa