[ecfisa]

Empezado por lucas05

Hola, este es el codigo que pongo en el evento OnChange:

With ADOQuery1 do
begin
Close;
SQL.Clear;
SQL.Text:='select * from empleados where apellido like '+QuotedStr(Edit1.Text+'% order by apellido asc');
Open;
end;

Gracias y saludos.

Hola lucas.

Copia y pegá esta línea tal cuál está.

Código Delphi [-]
  SQL.Text:= 'SELECT * FROM EMPLEADOS WHERE APELLIDO LIKE '+
             QuotedStr( Edit1.Text + '%' ) + ' ORDER BY APELLIDO';

A mí me funciona perfectamente.


Saludos.