저는 MS 계열 프로그램을 안사용해서..

다소 SQL이 틀릴지는 모르겠지만..

아래와 같이 해보세요..





From 류..



procedure Tserching.BitBtn1Click(Sender: TObject);

begin

if trim(edit1.text) <> '' then

begin

mainform.AdoQuery1.Close;

mainform.AdoQuery1.SQL.clear;

mainform.AdoQuery1.SQL.Add('select * from address');

mainform.AdoQuery1.SQL.Add('Where 성명 lkie %'+edit1.text+'%');

mainform.AdoQuery1.Open;

mainform.Enabled := true;

mainform.Show;

end

else

showmessage('검색어를 입력하세요');

end



왕초보 wrote:

> 에디트박스에서 검색어를 입력받아 해당 문자열이 있는 레코드만 출력할려고 하는데

>

> 에러만 나요 어떻게 해야 하는지 님들 꼭좀 갈켜주세요~~

>

> 참고로 odbc(sql)과 연동되어 있습니다.

>

>

> procedure Tserching.BitBtn1Click(Sender: TObject);

> begin

> if trim(edit1.text) <> '' then

> begin

> mainform.AdoQuery1.Close;

> mainform.AdoQuery1.SQL.clear;

> mainform.AdoQuery1.SQL.Add('select * from address');

> mainform.AdoQuery1.SQL.Add('Where 성명 "+edit1.text+"');

> mainform.AdoQuery1.Parameters.ParamByName('name1').Value :=

> '%' + edit1.text + '%';

> mainform.AdoQuery1.Open;

> mainform.Enabled := true;

> mainform.Show;

> end

> else

> showmessage('검색어를 입력하세요');

> end;