procedure TForm1.FormCreate(Sender: TObject);
begin
aa.Close;
aa.SQL.Clear;
aa.SQL.add('select * from stock');
aa.Open;

end;

procedure TForm1.BitBtn1Click(Sender: TObject);
begin
  me1.Text:=aa.fieldbyname('s_code').AsString;
  me2.Text:=aa.fieldbyname('s_item').AsString;
  me3.Text:=aa.fieldbyname('s_cost').AsString;
  me4.Text:=aa.fieldbyname('s_qty').AsString;
  me5.Text:=aa.fieldbyname('s_safeqty').AsString;

end;

procedure TForm1.BitBtn2Click(Sender: TObject);
begin
  aa.Close;
  aa.sql.Clear;
  aa.SQL.Add('select * from stock');
  aa.sql.Add('where s_code = :s_code');
  aa.fieldByName('s_code').AsString:=me1.text; <-에러가 나는곳....
  aa.Open;

  if aa.RecordCount=1 then me6.Text:=aa.fieldbyname('s_item').asstring
  else  showmessage('값이없음');

end;
이제 델파이 시작한지 일주일째가 되어가는 완전초보입니다.
위처럼 프로그래밍을 했습니다. 버튼1까지는 문제가 없는데 버튼2를 누르면
계속 에러가 납니다. 도대체 이유를 모르겠습니다.
s_code필드를 찾을수없답니다
paradox로 BDE접속시 위처럼 프로그래밍했을때는 아무런 문제가 없는데 ADO로 하면 계속 에러가 나니 정말 미처버리겠습니다 답변 부탁드려요.
컴퍼런트는 TADO쿼리, DATASource1, 그리고 DBGrid를 사용했습니다.
사용 OS는 윈2000어드밴스이고, DB는 SQL2000입니다 텔파이7이구요
위첨부화일은 에러메시지입니다...꼭좀부탁드려요