Akut hats fast richtig gemacht. Aber StoredProc ist überflüssig und mit den '' hat er sich vertan. Das hier ist jetzt getestet :
DataSet1.SelectSQL.Text := 'SELECT NR,BEZ FROM ART WHERE UPPER (BEZ) LIKE UPPER (''%'+Edit1.Text+'%'') ORDER BY NR';
Das Upper würde ich gleich mitschleppen. Und beachte die ''
