Bonjour à tous,
J'ai un problème avec la création d'un champs calculé à l'interieur d'un TzQuery (j'utilise les composants Zeos). Lorsque je crée mon champs, je fais ceci :
fRecNo := TIntegerField.Create(nil);
fRecNo.Name := 'RECNO';
fRecNo.FieldName := 'RECNO';
fRecNo.Calculated := True;
fRecNo.DataSet := zqReq;
//zqReq.Fields.Add(fRecNo);
zqReq.Open;
Tout va bien jusqu'au Open où Delphi m'indique que les champs (pourtant contenus dans ma requete Sql zqReq) n'existent pas. Et effectivement, en faisait un fieldcount de ZqReq après le Open, il m'indique seulement 1 champ (le champs calculé) au lieu des 170 créés si je n'ajoute pas mon champ calculé.
Si j'ajoute mon champs APRES le Open, comme ceci :
zqReq.Open;
fRecNo := TIntegerField.Create(nil);
fRecNo.Name := 'RECNO';
fRecNo.FieldName := 'RECNO';
fRecNo.Calculated := True;
//fRecNo.DataSet := zqReq;
zqReq.Fields.Add(fRecNo); J'ai bien mes 171 champs mais là Delphi part en exception en me signalant que le champ RECNO n'a pas d'ensemble de données. Tout en sachant qu'il m'est impossible de lier mon champ à mon Dataset après l'ouverture de celui-ci.
Comment dois je procéder pour arriver faire cohabiter correctement champ calculé et champs issus d'une table ?
Merci d'avance de vos réponses.
Stéphane