파라미터를 이용한 쿼리 만들기
간단히 몇자 적습니다.

조회 이벤트 발생시 작성된 쿼리입니다.
// 소스부분
Var ssql : string;

Screen.Cursor :=crHourglass;
Query1.Disablecontrols;
ssql := ' Select * from Table_name '
          +' where no =:no ';
Query1.Close;
Query1.Sql.Clear;
Query1.Sql.Add(ssql);
Query1.Params[0].Datatype          := ftInteger;
Query1.Parambyname('no').asInteger := strToint(Edit1.Text);
Query1.Prepare;

Try
   if Query1.prepared then Query1.Open;
Except
   Showmessage('Error 발생') // 에로코드로 에러 종류 확인
   Edit1.SetFocus;
   Query1.Enablecontrols;
   Screen.Cursor := crDefault;
   Exit;
End

if Query1.Eof then ShowMessage('검색된 자료가 없습니다.')
begin
     Query1.Close;
end;
Query1.Enablecontrols;
Screen.Cursor := crDefault;
// 소스끝.

그럼.