MSACCESS WHERE con LIKE y Delphi7 con ADO

[saldanaluis]

Compañeros del Foro,

Estoy formando en Delphi 7 un comando de MS-ACCESS de la siguiente forma

Código Delphi [-]
CMD1 := 'SELECT ART_CODIGO,ART_DESCRIPCION,ART_DESC_CORTA,PRC_FEC_VIGENCIA,PRC_PRECIO ';
CMD2 := 'FROM ARTICULOS LEFT JOIN PRECIOS ON ARTICULOS.ART_ID = PRECIOS.PRC_ARTIC_ID ';
CMD3 := 'WHERE ART_DESCRIPCION LIKE ''*'+EdtSelArticulos.Text+'*''';

QryArticulos.Close;
QryArticulos.SQL.Clear;
QryArticulos.SQL.Add(CMD1);
QryArticulos.SQL.Add(CMD2);
QryArticulos.SQL.Add(CMD3);
QryArticulos.Open;
if QryArticulos.RecordCount = 0 then
  begin
  ShowMessage('No hay artículos que cumplan con las condiciones.');
  exit;
  end;

pero por más que le pongo un parametro sencillo para que me encuentre alguna información siempre el Recordcount es cero.

No se que es lo que estoy haciendo mal, dado que si entro al MS-ACCESS 2003 y pongo lo que resulta de estas instrucciones de delphi si me muestra información.

Las variables CMDx son tipo string y QryArticulos es un TADOQuery.

Espero me puedan hacer ver mi error para poder corregirlo.

Gracias a todos.