'SELECT * FROM inout where mname = :edit1.text';
-> 'SELECT * FROM inout where mname = '''+edit1.text+''' ';

최두성 님이 쓰신 글 :
: 델파이 초보인데 도저히 혼자 해결하지 못해 질문드립니다.
: ADO로 데이타 베이스 연결을 했는데
: 연결은 ADOConnection, ADODataset, DataSource로 폼2에 그리드출력을 시켰습니다.
: 그런데 폼2는 검색을 해서 결과레코드만 나오게 수정을 하고 싶은데 도데체
: 가지고 있는 책을 봐도 또 여기 저기 자료를 찾아봐도 뾰족한 답을 얻을 수가 없네요.
: 이렇게 저렇게 해봐도 원체 모르고 시작한 프로그램이다보니 해결하지 못하겠네요.
: 그리고 폼4는 한 필드를 검색해 자료를 에디트에 출력시킨뒤 수정을 해서 저장버튼을 누르면
: 수정된 내용이 저장되게 하고 싶은데 일단 이것도 검색을 못하니...
: 제일 중요한건 에디트의 내용을 키로해서 검색을 할때 ADODataSet으로는 안되는 건지 아님 다른
: 콤퍼넌트가 있는건지 아님 제가 모르다보니 잘못 SQL문을 쓰는건지...답답하네요...
: 이틀을 자료를 찾아봐도 초보다 보니 어려운 프로그램은 이해를 못하겠고
: 또 내 경우와 같은 경우의 데이타베이스 관련 질문이나 자료를 못찾겠네요.
: 아주 허접한 몇줄 안되는 제 소스를 보시고 뭐를 더 추가해야 제가 원하는데로
: 될수 있는지 꼭 좀 답변 부탁드리겠습니다.
: (아 그리고 중간에 중괄호안에 있는 내용들은 이렇게 저렇게 해보다 남은 찌꺼기 입니다.
:  모르다 보니 이것저것 다 해보다가..^^)
:
: procedure TForm2.Button1Click(Sender: TObject);
: begin
:   with ADODataSet1 do begin
:   CommandType := cmdText;
:   CommandText := 'SELECT * FROM inout where mname = :edit1.text'; <-물론 이부분이 실행될때 에러...
:   open;                                                             어떻게 해야될지 모르겠네요..
:   end;
:   {if ADOTable1.FindField[Edit1.Text] then
:   showMessage('ok')
:   else ShowMessage('no')}
: end;
:
: procedure TForm2.Button4Click(Sender: TObject);
: begin
:   with ADODataSet1 do begin
:   CommandType := cmdText;
:   CommandText := 'SELECT * FROM inout';
:   open;
:   end;
: end;
:
:
: procedure TForm4.FormCreate(Sender: TObject);
: begin
:   with ADODataSet1 do begin
:   CommandType := cmdText;
:   CommandText := 'SELECT * FROM inout';
:   open;
:   end;
: end;
:
: procedure TForm4.Button1Click(Sender: TObject);
: begin
:   if (Edit3.Text<>'') then begin
:   ADODataSet1.Close;
:   ADOConnection1.Open;
:   with ADOCommand2 do begin
:   {Parameters[2].Value:=Edit3.Text;
:   Edit1.Text:=FieldbyName('mname').AsString;
:   Edit2.Text:=FieldbyName('name').AsString;}
:   Execute;
:   end;//with
:   ADODataSet1.Open;
:   end
:   else
:     ShowMessage('제품코드를 입력하시오');
: end;
: