중복검사는 가능하지만 반복으로 입력 받지는 못합니다. 그리고 while 문에 들어가면 무한 루프에 빠지게 되어 있네요..

If 문 맞습니다.

만약에 이문장을 다음과 같이 고쳐 보세요...

var

flag : Boolean;

begin

...

...

Flag : false;

while not Flag do begin

입력 받는 부분....



with query1 do

begin

close;

sql.add('select id from cyberlove.db');

sql.add('where id='''+edit1.text+'''');

open;

if not eof then

showmessage('중복된 id가 있음당...^^')

else begin

showmessage('사용가능한 id 임당..축하^^');

Flag := True;

end;

end;

end;





이와 같이 하면 될것 같은데요





송영순 wrote:

> 안녕하세요..고수님들!

> 전에 한번 글을 올렸었는데 또 문제가 생겨서요...

> 제가 조금 수정하다가 궁금한것이 있어서 또 올립니다.

> if 문을 답변주셨는데 그렇게 되면 중복된 아이디가 있을경우

> 다시 입력할수가 없고 한번만 실행하고 빠져나가기 때문에

> while문으로 수정한 것입니다.

> 이 소스만으로 현재까지 db에 등록된 아이디를 모두 검색해서

> 체크 할 수 있는건지요...그리고 왕초보라 소스를 봐도 이해가 잘

> 안되는 부분이 많습니다...

> 부가 설명도 좀 부탁드립니다..

>

> with query1 do

> begin

> close;

> sql.add('select id from cyberlove.db');

> sql.add('where id='''+edit1.text+'''');

> open;

> while not eof do

> begin

> showmessage('중복된 id가 있음당...^^');

> end;

> showmessage('사용가능한 id 임당..축하^^');

> end;

>

> 참고로 db는 desktop으로 만들었습니다...

> 답변 주시면 감사하겠습니다...

>