Código Delphi [-] begin dm.IBDataSet1.Close; dm.IBDataSet1.SQL.Add( 'Select * From xxx where NOMBRE containing ''' + edSearch.Text + ''''); TRY dm.IBDataSet1.OPEN; EXCEPT ShowMessage('No he encontrado ningun registro'); end;
begin dm.IBDataSet1.Close; dm.IBDataSet1.SQL.Add( 'Select * From xxx where NOMBRE containing ''' + edSearch.Text + ''''); TRY dm.IBDataSet1.OPEN; EXCEPT ShowMessage('No he encontrado ningun registro'); end;