Código Delphi [-]WHERE ARTICULO='+QuotedStr(txt_buscar.Items.Text);
WHERE ARTICULO='+QuotedStr(txt_buscar.Items.Text);