자유롭게 질의 및 응답을 할 수 있는 게시판입니다. 개발자 여러분의 답변이 큰 도움이 됩니다.
- 제품설치/등록 오류 문의: 설치/등록 Q&A 이용 (제품 구매 고객 한정)
Delphi Dataset not in edit or insert mode 라는 에러..
2017.09.16 14:50
본 게시판은 개발자들이 자유롭게 질문과 답변을 공유하는 게시판입니다.
* 따라서 최대한 정중하게 질문을 올려 주세요.
* 질문을 상세히 작성해 주실 수록 좋은 답변이 올라 옵니다.
* 바쁜 와중에도 답변을 주시는 분들께 감사 댓글 필수
-----------------------------------------------------------------------------------------------
도서대여프로그램 교육영상을 보며 따라하는 중 에러메세지가 떠서 문의 드립니다.
유튜브의
'도서대여프로그램 완성하기 with 델파이 - #3-4 도서관리 기능:UI컨트롤과 데이터 연결' 중
5분 부터 나오는 대여여부 필드의 Y,N 값을 대여중,대여가능 으로 변경하는 작업중에
procedure TdmDataAccess.qryBookCalcFields(DataSet: TDataSet);
var
RENTYN:string;
begin
RENTYN := qryBook.FieldByName('book_rent_yn').AsString;
if RENTYN = 'y' then
qryBook.FieldByName('book_rent_yn').AsString := '대여 중'
else
qryBook.FieldByName('book_rent_yn').AsString := '대여 가능';
end;
이 코드 작성하여 F9 컴파일시 Qrybook: Dataset not in edit or insert mode 라는 에러가 나옵니다.
위 코드와 Type의 procedure TdmDataAccess.qryBookCalcFields(DataSet: TDataSet)를 주석처리하면 컴파일이 잘됩니다..
구글링과 헬프를 찾아보아도 해결방법과 원인을 알 수 없어 도움을 요청드립니다.
WIN7
델파이 10.2
INTERBASE XE7 사용중입니다.
댓글 2
Delphi Dataset not in edit or insert mode 라는 에러..
2017.09.16 14:50
본 게시판은 개발자들이 자유롭게 질문과 답변을 공유하는 게시판입니다.
* 따라서 최대한 정중하게 질문을 올려 주세요.
* 질문을 상세히 작성해 주실 수록 좋은 답변이 올라 옵니다.
* 바쁜 와중에도 답변을 주시는 분들께 감사 댓글 필수
-----------------------------------------------------------------------------------------------
도서대여프로그램 교육영상을 보며 따라하는 중 에러메세지가 떠서 문의 드립니다.
유튜브의
'도서대여프로그램 완성하기 with 델파이 - #3-4 도서관리 기능:UI컨트롤과 데이터 연결' 중
5분 부터 나오는 대여여부 필드의 Y,N 값을 대여중,대여가능 으로 변경하는 작업중에
procedure TdmDataAccess.qryBookCalcFields(DataSet: TDataSet);
var
RENTYN:string;
begin
RENTYN := qryBook.FieldByName('book_rent_yn').AsString;
if RENTYN = 'y' then
qryBook.FieldByName('book_rent_yn').AsString := '대여 중'
else
qryBook.FieldByName('book_rent_yn').AsString := '대여 가능';
end;
이 코드 작성하여 F9 컴파일시 Qrybook: Dataset not in edit or insert mode 라는 에러가 나옵니다.
위 코드와 Type의 procedure TdmDataAccess.qryBookCalcFields(DataSet: TDataSet)를 주석처리하면 컴파일이 잘됩니다..
구글링과 헬프를 찾아보아도 해결방법과 원인을 알 수 없어 도움을 요청드립니다.
WIN7
델파이 10.2
INTERBASE XE7 사용중입니다.
위 코드는 book_rent_yn 필드의 값을 이용한 계산으로 book_rent Calculated 필드에 값을 매핑하기 위한 코드입니다.
아마 book_rent라는 Calculated 필드를 추가하셨을텐데요.
위 코드는 book_rent가 아닌 book_rent_yn에 값을 적용하도록 구현되었습니다. 아래와 같이 구현해 보세요.
procedure TdmDataAccess.qryBookCalcFields(DataSet: TDataSet);
var
RentYn: string;
begin
RentYn := qryBook.FieldByName('BOOK_RENT_YN').AsString;
if RentYn = 'Y' then
qryBook.FieldByName('BOOK_RENT').AsString := '대여 중'
else
qryBook.FieldByName('BOOK_RENT').AsString := '대여 가능'
;
end;