//데이타베이스 클리어
If Send_Table.RecordCount > 0 then
begin
try //있으면 지운다
Send_Table.First ;
Repeat
Send_Table.Delete;
Until(Send_Table.Eof) ;
finally //끝까지 지운다
Send_Table.First ;
for db := 1 to Send_Table.RecordCount do
Send_Table.Delete;
end;
이렇게 했는데, 초기화시에는 되는 거 같은데
어떤 이벤트 훙 이렇게 적었더니 잘 지워ㅈ지지가 않는거 있죠.
그래서 무결성의 법칙에 어긋난다고 에러가 생기더라구요.
ㄷ이타베이스를 프로그램중간에 싹 지우고 싶은데..
이 방법이 잘못된건지..
|