Bueno, en principio, si el código en la BD es un campo de texto entonces está mal esto (y si es numérico también está mal):
Código Delphi
[-]ZQuery1.SQL.Text:= 'SELECT NombreArticulo FROM InventarioArticulos WHERE CodigoArticulo = '+Codigo;
Si es de texto:
Código Delphi
[-]zquery1.sql.text := 'select nombrearticulo from inventarioarticulos where codigoarticulo= ' + quotedstring(codigo);
Y si es numérico:
Código Delphi
[-]zquery1.sql.text := 'select nombrearticulo from inventarioarticulos where codigoarticulo= ' + inttotring(codigo);
Edito: veo que tienes una variable 'codigo' de texto:
Código Delphi
[-]zquery1.sql.text := 'select nombrearticulo from inventarioarticulos where codigoarticulo= ' + codigo;