Query raises AccesViolation on DesignTime

I try to set the sql propertie in a TADOQuery, and when activate raises an
AccesViolation and Delphi close.

The error happend because i have some select inside main select, but why ??

Is it an ADO bug ?
This is the query


select
cve_lar
,cve_cta
,lin
,(select des from invlin where cve=iar.lin)as [LinNom]
,s_lin
,(select des from invsli where cve=iar.s_lin)as [SliNom]
,fam
,(select des from invfam where cve=iar.fam)as [FamNom]
,s_fam
,(select des from invsfa where cve=iar.s_fam)as [SfaNom]
,marca
,moneda

from inviar iar
where iar.art='1949'

I'll try to assign the by code on runtime.

thanks
James G.


.