aqui muestro una imagen...
quiero que el dbgrid me encuentre el registro que le indico mediante el Edit y que al presionar el boton Buscar, el registro sea senalado
saludos c y gracias de antemano por la ayuda...
Escrito 20 noviembre 2010 - 07:29
Escrito 20 noviembre 2010 - 07:46
begin query1.Close; query1.SQL.Clear; query1.SQL.Add('SELECT campo from tabla'); query1.SQL.Add(' where campo LIKE ' +quotedstr('%' + edit1.Text + '%')+' '); query1.Open; end;
Escrito 20 noviembre 2010 - 07:49
En el evento onclick de un boton o en el onchange del mismo edit puedes poner esto
delphi
begin query1.Close; query1.SQL.Clear; query1.SQL.Add('SELECT campo from tabla'); query1.SQL.Add(' where campo LIKE ' +quotedstr('%' + edt1.Text + '%')+' '); query1.Open; end;
Escrito 20 noviembre 2010 - 07:58
Escrito 20 noviembre 2010 - 08:06
Escrito 20 noviembre 2010 - 09:38
procedure TForm1.Button1Click(Sender: TObject); begin Table1.Locate('Pais',Edit1.Text,[loCaseInsensitive,loPartialKey]) end;
Escrito 20 noviembre 2010 - 11:53
Escrito 21 noviembre 2010 - 09:48
if not( key in ['0'..'9',#8]) then key := #0;
Escrito 21 noviembre 2010 - 11:47
Escrito 18 diciembre 2010 - 05:04