======================================================
with Query1 do
Close;
SQL.Clear;
SQL.Add(' select ename from emp');
SQL.Add(' where ename = '+ Quotedstr(a와 다른 변수명));
Open;

a := FieldByName('ename').AsString;
================================================
위에서 처럼 조건 주시고 변수에 담는 법이 있고요!!!

======================================================
for 초기값 to 마지막값 do

  with Query1 do
    Close;
    SQL.Clear;
    SQL.Add(' select ename from emp');
    Open;
    
    a:=FieldByName('ename').AsString;
    Query1.next;
  
end;

==========================================================
위에 처럼 for문으로 계속 Query의 Eof 일때 까지 반복하여 값을
결과치를 얻어 내면 되지 않을까요???
돌려 보진 않았지만.......^^;
도움이 되었는지 괜히 잘못 갈켜 주는건 아닌지.......
그럼 즐코~!~!~!

고맙습니다.
제 코딩에 쿼리명.next 가 빠졌었네요.. 감사합니다.