이미 레코드의 끝이면 루프에서 빠져나오게 되어있는거 같은데여?



Query1.EOF



EOF (End Of File) 이거 아닌가여? ^_^;;;



항상 즐거운 프로그래밍 하시길~





화 랑 wrote:

> 질문이 맞을려나 모르겠네욤. 기냥 하게욤...

> sql로 select 했어여. 당연히 건수만큼 나오겠죠..

> 구럼 담데이타가 있으면 컬럼에 1을 뿌려주고 마지막이면 0을 뿌려주려고 합니다.

> 설명이 잘됐을려나? 저의 소스를 간단하게 올릴게욤..이해하는데 도움이 됐으묜...

>

> try

> open;

> except

> application.messagebox(pchar('에러'),'확인',mb_ok);

> exit;

> end;

> while not query.Eof do

> begin

> a := fieldbyname('A').asstring;

> b := fieldbyname('B').asstring;

> c := fieldbyname('C').asstring;

> MY_SendData;

> end;

>

> while문안에서 last에 사용을 잘모르지만,

> if query.last then

> begin

> xxx := 0;

> end else

> xxx := 1;

> end;

> 이걸 삽입하묜 안되던데... 감이 잘안오네욤..

>

> 고수님들에 빠른 답변 다시 한번 부탁드릴게요...

> 구럼....즐코하세용...