Pretraga firebird baze

Code:

 Form1.pFIBDataSet1.Close;
   Case ComboBox1.ItemIndex of
   0: Form1.pFIBDataSet1.SelectSQL.Text := 'select * from SIMIC where IME = ' + '''Edit1.Text''';
   1: Form1.pFIBDataSet1.FieldByName(PREZIME).AsString := Edit1.Text;
//  2: Form1.pFIBDataSet1.Locate('TELEFON', Form2.Edit1.Text);
//   3: Form1.pFIBDataSet1.FindField(MOBILNI):= Edit1.Text;
   4: Form1.pFIBDataSet1.Filter:= DATUM+'='''+Edit1.text+'*''';
   5: Form1.pFIBDataSet1.Filter:= 'VRSTA_ROBE'+'='''+Edit1.text+'''';
   6: Form1.pFIBDataSet1.SelectSQL.Text := 'select * from SIMIC where DOBAVLJAC = '' + Edit1.Text '' ';
   7: Form1.pFIBDataSet1.SelectSQL.Text := 'select * from SIMIC where NAZIV_ROBE = '' + Edit1.Text '' ';
   8: Form1.pFIBDataSet1.SelectSQL.Text := 'select * from SIMIC where CENA = '' + Edit1.Text '' ';
   9: Form1.pFIBDataSet1.SelectSQL.Text := 'select * from SIMIC where PLACENO = '' + Edit1.Text '' ';
  10: Form1.pFIBDataSet1.SelectSQL.Text := 'select * from SIMIC where ROK_PLACANJA = '' + Edit1.Text '' ';
   end;
 Form1.pFIBDataSet1.Open;

Code:

 //pFIBDataSet1.Locate(Naziv_Atributa, Tekst, []);
 fdsTabela.Loacate('IME', Edit1.Text, []); 

Code:

 with pFIBDataSet1 do
  begin
   Close;
    SelectSQL.Clear;
    SelectSQL.Add(' SELECT * ');
    SelectSQL.Add(' FROM TABELA ');
    SelectSQL.Add(' WHERE ATRIBUT = :ATRIBUT ');
    //uzecemo za primer da je ceo broj
    Params.ParamByName('ATRIBUT').AsInteger := StrToInt(Edit1.Text); 
    Prepare;
   Open; 
  end;

Code:

fdsTabela.Locate('IME', Edit1.Text, [loPartialKey]);