Query con LIKE sobre EDIT

[ecfisa]

Hola.

Otro modo:

Código Delphi [-]
  with IBQuery1 do
  begin
    Close;
    SQL.Clear;
    SQL.Add('SELECT D.USUARIO_ID, D.FECHA, D.INICIO, D.FIN, U.NCOMPLETO ');
    SQL.Add('FROM BTN_DESC_DESCANSOS D, USUARIOS U ');
    SQL.Add('WHERE D.USUARIO_ID = U.ID ');
    SQL.Add('AND U.NCOMPLETO LIKE :NOMBRE' );
    ParamByName('NOMBRE').AsString:= Edit1.Text + '%';
    Open;
  end;

Saludos.