Eigentlich brauchst du die Fehlermeldung nur Lesen, und das angemahnet ändern!!
Delphi-Quellcode:
sql_statement := 'Select * From artikel Where ean='+eancode+';';
eanlabel.Caption := ergebnis.FieldValue(0);
preislabel.Caption := ergebnis.FieldValue(1);