꼭 Key를 찾을 필요는 없다고 봅니다.
기존에 입력된 자료라면 Delphi에서는 Error메시지를 보여주지요
키Error... 이부분을 바꾸면 될것 같거든요....
Table의 Event를 보면 PostError이런놈이 있을꺼예요....
여기에....
procedure TForm1.Table1PostError(DataSet: TDataSet; E: EDatabaseError;
var Action: TDataAction);
begin
if (E is EDBEngineError) and
((E as EDBEngineError).Errors[0].ErrorCode = 9729) then
begin
Showmessage('입력된 자료입니다');
Table1.Cancel;
Abort;
end;
end;
이렇게 해주면 되거든요... 만일 Grid에서 내용들을 보여준다면 그 값을
찾기위해서는 중간부분에 번호를 임시로 기억했다 FindKey로 찾아 주면
되거든요... 번호가 Integer라면 Integer로 찾아야 겠죠...
그럼 즐거운 통신 되세요....
|