자유롭게 질의 및 응답을 할 수 있는 게시판입니다. 개발자 여러분의 답변이 큰 도움이 됩니다.
- 제품설치/등록 오류 문의: 설치/등록 Q&A 이용 (제품 구매 고객 한정)
Delphi Begin-End책에서 궁금한 내용-445페이지
2012.10.21 23:21
안녕하세요.
Begin-End책 p445페이지-12의 ListProducer의 OnHTMLTag이벤트에서
책에 있는 내용을 그대로 따라했는데 결과가 책 내용과 다르게 "교육 과정을 선택하세요" 내용만 나오고
아루런 결과도 출력되지 않습니다.
구글링을 하여도 원하는 내용이 없어 아래의 소스를 수정하였더니 책 내용과 같은 결과가 출력되는군요
이유가 궁금합니다.
with Quey_KindCount do
begin
Open;
For i := 0 to RecordCount -1 do
로 되어 있는 부분에서
with Quey_KindCount do
begin
Close; <-- 추가
Open;
For i := 0 to RecordCount -1 do
Delphi Begin-End책에서 궁금한 내용-445페이지
2012.10.21 23:21
안녕하세요.
Begin-End책 p445페이지-12의 ListProducer의 OnHTMLTag이벤트에서
책에 있는 내용을 그대로 따라했는데 결과가 책 내용과 다르게 "교육 과정을 선택하세요" 내용만 나오고
아루런 결과도 출력되지 않습니다.
구글링을 하여도 원하는 내용이 없어 아래의 소스를 수정하였더니 책 내용과 같은 결과가 출력되는군요
이유가 궁금합니다.
with Quey_KindCount do
begin
Open;
For i := 0 to RecordCount -1 do
로 되어 있는 부분에서
with Quey_KindCount do
begin
Close; <-- 추가
Open;
For i := 0 to RecordCount -1 do
close는 통상적으로 여러번하셔도 되는것인데 , 다른곳에서 이미 오픈이 되어 있으면 오류가 발생할 수 있기때문에 close하고 Open하는것이 좋지만 Open 되어있지 않다면 Open만 하셔도됩니다. 즉 여기서 Close하고 오픈하는것이 안전한 코드입니다.