Hola a todos, tengo una duda. Tengo creada una tabla en MySql y la
conecto usando componentes MyDac.
Lo que pretendo hacer es un sistema de inventario para comparar
cuando un articulo este llegando a su nivel minimo de existencias,
para dicho proposito, en mi tabla llamada Articulo hay 2 campos, uno
llamado existencias y otro llamado stockminimo(tambien el campo
codigo que es mi clave primaria). El codigo que he implementado con
el componente MyQuery de MyDac es el siguiente:

Query1.Close;
Query1.SQL.Clear;
Query1.SQL.Add('Select stock, stockminimo');
Query1.SQL.Add ('from articulo');
Query1.SQL.Add ('where codigo= :Codigo');
Query1.ParamByName('pCodigo').Value := codigo;
Query1.Open;
if query.RecordCount > 0 then
if query.FieldByName('stock').AsFloat <
query.FieldByName('stockminimo').AsFloat then
showmessage ('Atención: el stock del artículo es inferior a ' +
query.fieldbyname ('stockminimo').AsString;

Pero me marca un error, puede alguien auxiliarme para decirme cual
es mi error.

Tambien como podria mostrar aquellos articulos que necesitan ser
reabastecidos y mostrarlos en un DBGrid?

de antemano, Gracias.

Atte. Edder :P