EVarriantTypeCast error delphi language general

I uploaded above subject to the attachment space.with test.zip.
If somebody coul have a look at the test i prepared.
Since overall QuickReport does work, i could not guess what is going on 
here.
Thanks in advance to have a look at the attached test i made and hopefully 
somebody can find the issue.
Regards.
Lieven
0
Lieven
7/18/2011 11:08:29 PM
📁 embarcadero.delphi.general
📃 4258 articles.
⭐ 0 followers.

💬 1 Replies
👁️‍🗨️ 1569 Views


Hi xxx,
If nothing works, it could mean that somewhere a mistake was made.lol.
For the uploaded to public attachment test.zip solution below.
Regards
Lieven

 {Sql code}
   QryPtDat1.Sql.Clear;
   QryPtDat1.Sql.Add('SELECT D."Names",     D.Surname, D1.HomeTel, 
D1.WorkTel, ' +
               'D2.Balance, D2.AccNo, D."No" ' +
               'FROM Patients D, PatDet D1, Debtors D2 ' +
               'where D1.PatientNo = D."No" ' +
               'and D2.PatientNo = D."No"  ' +
               'ORDER BY D2.AccNo, D.Surname ');
{code}
0
Lieven
7/21/2011 12:53:00 PM
Reply: