안녕하세요~ 저는 paradox를 이용해서 네트워크 공유해서 2~3명이 사용하는 작은 프로그램을 만들고 있습니다.
같은 레코드를 두명이 동시에 수정하거나, 한 명이 수정하고 있는 레코드를 다른 사람이 삭제 할 수는 없잖아요.
record locked by another user와 같은 메세지가 나오잖아요.
제가 하고 싶은 일은.. 이런 메세지가 나오지 않고, 미리 판단을 해서 그 레코드가 수정중이면 '다른 사람이 사용중입니다' 와 같은 메세지 처리를 하고 싶습니다. 여기저기 살펴본 결과, DbiIsRecordLocked 함수를 쓰면 된다고 해서 사용했습니다.
그런데, 자기 피씨에서 수정모드에 놓고 삭제하려고 하면 저 함수가 먹힙니다.
그러나, 한 명이 수정모드에 있는 상태에서 다른 한 명이 같은 레코드를 수정하려고 하면, 저 함수를 써도 먹히지가 않네요.
저 함수가 원래 네트워크 공유 상태에서는 먹히지 않는 함수인지,,, 아님 다른 방법이 있는지 좀 알려주세요.
혹시 네트워크 환경(DB공유)에서 한 client가 수정중일 때 다른 client가 수정중이라는 것을 알 수 있는 방법이 있을까요?
아래 코딩에서 query대신 table 컴포넌트로 수정하고 해도 마찬가지입니다.
여기저기 질문 올려도 답변이 없습니다. ㅠ.ㅠ 답답합니다. ㅠ.ㅠ
아래는 제가 코딩한 부분입니다.
procedure TForm1.sbt_delClick(Sender: TObject); //삭제버튼
var
Locked, Result : BOOL;
begin
Query1.UpdateCursorPos;
DbiIsRecordLocked(Query1.Handle, Locked); //사용중이면 true 반환
Result := Locked;
if (not Result) then
begin
showmessage('사용중아님');
end
else
begin
showmessage('다른 사용자에 의해 사용중입니다.');
exit;
end;
|