날짜 차를 구해서
연체된 고객의 연체된 비디오 마다 각각으로 연체 금액을 구하려고
하는데 여러 행이 출력되니까
연체된 비디오가 하나일때는 상관없지만,
두개 이상될때는 문제가 되거든여

첫번째 행만 계산이 되여
각각 따로 행마다 계산해서 연체금액을 따로 넣어야 하는데여...
어떻게 해야하는지 답변주세요... 낼 제출해야 하거든여


       adoquery1.close;
       adoquery1.sql.clear;
       adoquery1.SQL.Add('select l.대여일자 ');
       adoquery1.sql.add('from p_custom c, p_tape t, p_loan l');
       adoquery1.sql.add('where t.테잎일련번호 = l.테잎일련번호');
       adoquery1.sql.add('and c.고객일련번호 = l.고객일련번호');
       adoquery1.sql.add('and c.고객일련번호 = :고객일련번호');
       adoquery1.sql.add(' and l.반납여부 = 1');
       Parameters.ParamByName('고객일련번호').Value := edit1.Text;
       open;
  
       strin := adoquery1.Fields[0].value;
       dtFirst := (now);
       dtSecond := strtodate(strin);
       strOut := inttostr( Trunc(Abs(dtFirst - dtSecond)));
       strout := inttostr(strtoint(strout) * 500);