Q&A
- 1박 2일째 고생중입니다 소스도올렷습니다
삭제시 마스터의 tblhunh 테이블은 삭제가 되는데 디테일의 tbladdr은삭제가 않도ㅐ거든요
제발 고수님들의 조언좀?
procedure TFDATA0101.BtnDeleteClick(Sender: TObject);
var
ino : String;
imsg : integer ;
begin
imsg := ApplicaTion.MessageBox('확실히 삭제할까요?.','데이타삭제' , MB_OKCANCEL);
if imsg = IDOK then
begin
TblAddr.IndexFieldNames := 'ANO;AGU;ASEQ';
TblAddr.Active := True;
ino := Trim(DeHno.Text);//ANO필드
TblAddr.CachedUpdates := False;
while not Tbladdr.FindKey([ino]) do
begin
TblAddr.Delete;/디테일
end;
Tblhunh.Delete;//마스터
TblAddr.CachedUpdates := True;
Tbladdr.Filtered := true;
end;
end;
제발 고수님들의 조언좀?
procedure TFDATA0101.BtnDeleteClick(Sender: TObject);
var
ino : String;
imsg : integer ;
begin
imsg := ApplicaTion.MessageBox('확실히 삭제할까요?.','데이타삭제' , MB_OKCANCEL);
if imsg = IDOK then
begin
TblAddr.IndexFieldNames := 'ANO;AGU;ASEQ';
TblAddr.Active := True;
ino := Trim(DeHno.Text);//ANO필드
TblAddr.CachedUpdates := False;
while not Tbladdr.FindKey([ino]) do
begin
TblAddr.Delete;/디테일
end;
Tblhunh.Delete;//마스터
TblAddr.CachedUpdates := True;
Tbladdr.Filtered := true;
end;
end;
2
COMMENTS
-
-
황남철 wrote:
> 삭제시 마스터의 tblhunh 테이블은 삭제가 되는데 디테일의 tbladdr은삭제가 않도ㅐ거든요
> 제발 고수님들의 조언좀?
>
> procedure TFDATA0101.BtnDeleteClick(Sender: TObject);
> var
> ino : String;
> imsg : integer ;
> begin
> imsg := ApplicaTion.MessageBox('확실히 삭제할까요?.','데이타삭제' , MB_OKCANCEL);
> if imsg = IDOK then
> begin
> TblAddr.IndexFieldNames := 'ANO;AGU;ASEQ';
> TblAddr.Active := True;
> ino := Trim(DeHno.Text);//ANO필드
> TblAddr.CachedUpdates := False;
> while not Tbladdr.FindKey([ino]) do
> begin
> TblAddr.Delete;/디테일
> end;
> Tblhunh.Delete;//마스터
> TblAddr.CachedUpdates := True;
> Tbladdr.Filtered := true;
> end;
> end;
while not Tbladdr.FindKey([ino]) do
begin
TblAddr.Delete;/디테일
end;
이부분을
if Tbladdr.FindKey([ino]) then
TblAddr.Delete;/디테일
이렇게 하는것 아닌간요....마스터-디테일의 키가 ino필드로 매칭된것 같은데...
질문의 요지에 적절한 답인지 ..^^
참고로 gotokey, findkey로 레코드를 찾을때에는 반드시 인덱스가
해당 필드로 지정되어야 할 것 같네요..
그것이 귀챦으시다면...locate함수를 사용해보심도..
(NOTICE) You must be logged in to comment on this post.
-
-
- 조유정
- •
- 2000.05.17 01:09
- 1 COMMENTS
- /
- 0 LIKES
-
killer•2000.05.17 01:13조유정 wrote: 조유정씨 소스를 같이 올렸으면 보다 정확한 답변을 할수 있을텐데... 이런식으로 질문하...
-
-
구창민•2000.05.17 01:48crystal wrote: > 안녕하세요 > > 어떤 디렉토리를 선택하면 그 디렉토리안의 파일을 전부 로드하는 걸...
-
-
- crystal
- •
- 2000.05.17 00:59
- 1 COMMENTS
- /
- 0 LIKES
-
강민주•2000.05.17 01:39crystal wrote: > 안녕하세요 > 초자 crystal입니다. > > open해서 파일을 로드하는데요 > 어떤 디렉...
-
- 초보1
- •
- 2000.05.17 00:47
- 1 COMMENTS
- /
- 0 LIKES
-
남자^•2000.05.21 10:26아래의 sql로 봐서는 insert into table_nam(....) 다음에 value가 빠져 있군여. 그리고 전 TSQL의 문법을...
-
- 김철기
- •
- 2000.05.17 00:30
- 1 COMMENTS
- /
- 0 LIKES
-
구창민•2000.05.17 02:09김철기 wrote: > 안녕하세요. > > ShowWindow(Handle,SW_SHOWNORMAL); > > 위 코딩으로 minimize되...
-
- 부끄러워요
- 2000.05.17 00:00
- 0 COMMENTS
- /
- 0 LIKES
-
- j
- •
- 2000.05.16 23:44
- 1 COMMENTS
- /
- 0 LIKES
-
뿌요•2001.02.02 03:29아래같이 폼안에 DBEdit일 경우 event를 모두 연결하면 되구요.. (edit는 edit끼리.. DBedit는 DBedit끼리...
-
- 김진규
- 2000.05.16 23:19
- 0 COMMENTS
- /
- 0 LIKES
-
- 어린왕자
- 2000.05.16 23:14
- 0 COMMENTS
- /
- 0 LIKES
-
- 손님
- 2000.05.16 23:09
- 0 COMMENTS
- /
- 0 LIKES
-
- bluesky
- •
- 2000.05.16 23:01
- 3 COMMENTS
- /
- 0 LIKES
-
조규춘•2000.05.16 23:49bluesky wrote: > 델파이 프로그램을 다 작성하고 난 후 인스톨쉴드 사용범을 몰라 버벅거리고 있습니다. ...
-
델파이 초보•2000.05.17 07:19조규춘 wrote: > bluesky wrote: > > 델파이 프로그램을 다 작성하고 난 후 인스톨쉴드 사용범을 몰라 버...
-
조규춘•2000.05.17 10:34델파이 초보 wrote: > 조규춘 wrote: > > bluesky wrote: > > > 델파이 프로그램을 다 작성하고 난 후 ...
-
- 손님
- 2000.05.16 23:06
- 0 COMMENTS
- /
- 0 LIKES
-
- 김성기
- 2000.05.16 22:32
- 0 COMMENTS
- /
- 0 LIKES
-
- 김성기
- 2000.05.16 22:32
- 0 COMMENTS
- /
- 0 LIKES
-
- 김진호
- •
- 2000.05.16 21:29
- 1 COMMENTS
- /
- 0 LIKES
-
타락천사•2000.05.17 19:02안녕하세여.. 타락임다.. ^^ 함수가 종료되면 메모리에서 자동으로 사라지는데, 꼭 프로그램 중간에서 ...
-
- missH
- •
- 2000.05.16 20:37
- 2 COMMENTS
- /
- 0 LIKES
-
missH•2000.05.17 17:56missH wrote: > StringGrid에 combobox를 올려놓았는데 colum크기를 변경시 같이 크기를 변경시키고 싶은...
-
어린왕자•2000.05.16 23:31missH wrote: > StringGrid에 combobox를 올려놓았는데 colum크기를 변경시 같이 크기를 변경시키고 싶은...
-
- 송종근
- 2000.05.16 20:29
- 0 COMMENTS
- /
- 0 LIKES
-
- 황남철
- •
- 2000.05.16 20:11
- 2 COMMENTS
- /
- 0 LIKES
삭제시 마스터의 tblhunh 테이블은 삭제가 되는데 디테일의 tbladdr은삭제가 않도ㅐ거든요 제발 고수님들의 조언좀? procedure TFDATA0101.BtnDeleteClick(Sender: TObject); var ino : String; imsg : integer ; begin imsg := ApplicaTi...-
김범석•2000.06.24 20:51DELETE cascade 옵션을 사용해 보세요 db에서 주는 옵션인데 ALTER 명령으로도 가능합니다 마스타가 ...
-
송기원•2000.05.16 23:57황남철 wrote: > 삭제시 마스터의 tblhunh 테이블은 삭제가 되는데 디테일의 tbladdr은삭제가 않도ㅐ거든...
-
- 이헌재
- 2000.05.16 20:00
- 0 COMMENTS
- /
- 0 LIKES
db에서 주는 옵션인데 ALTER 명령으로도 가능합니다
마스타가 삭제 되면 그에 해당하는 레코드의 포린키를