[marcoszorrilla]

Código Delphi [-]
 const
 STRSQL = 'SELECT * FROM items';
 begin
 adoQuery1.Close;
 if (Edit1.Text = ' ') then
 begin
 AdoQuery1.SQL.Text := STRSQL;
 end
 else
 begin
 adoQuery1.SQL.Text := STRSQL + ' WHERE nombre LIKE ' + QuotedStr( Edit1.Text + '%');
 end;
 adoQuery1.Open;

Un Saludo.