como hace una busqueda en mi dbgrid

[jas010]

las aclaraciones hechas estan claras solo que la duda no esta resuelta

como le pregunto a la maquina si mi dbgrid tiene un dato o no tiene (dbgrid vacio)
si tiene un dato que me lo muestre en un showmessage y si no entonces que no haga nada
espero que me haya podido explicar y me hayan comprendido gracias una ves mas

[DB-ADO]

No se ni me interesa

[marcoszorrilla]

Código Delphi [-]
 procedure TForm1.Button1Click(Sender: TObject);
 begin
   if query1.IsEmpty then
   ShowMessage('No hay Registros que mostrar')
   else
   ShowMessage('Hay Registros que mostrar');
  end;

Un Saludo.

[[Nbull]]

Hola Lepe, nada quería decirte que muchas gracias que me ha funcionado muy bien, lo único que en el código que pusiste había que quitar el 'upper' que pusiste delante del campo Nombre, el código funcionando se quedaría así:

Código Delphi [-]
if radiobutton1.checked then begin // Si hemos decidido filtrar por el nombre...
   Form1.Query2.Close();
   // Utilizo quotedStr para ponerle comillas simple a la cadena (en el caso 
//que sea de tipo string  
   Form1.Query2.SQL.Text := 'SELECT * FROM agenda WHERE Nombre Like 
'+quotedStr(uppercase('%'+Edit1.Text+'%'));
   Form1.Query2.Open();
   Form1.Query2.Locate('Nombre',edit1.Text,[lopartialkey, locaseinsensitive]);

Nada Lepe muchas gracias de nuevo y que pases buena tarde.

Un Saludo

[[Lepe]]

No se ha dicho que gestor de bases de datos estas usando, en una búsqueda ultrarápida http://www.brettb.com/SQL_Help_Chang...Upper_Case.asp
se ve que esa función pertenece al sql y si funciona.

El motivo de incluir esa función es para que se encuentre el texto de búsqueda, tanto en mayusculas como en minusculas.

Ahora mismo solo te encontrará los que esten escritos en mayusculas.

Saludos de nuevo.