Discussion :

[EssaiEncore]

Bonjour
Lors de l'ouverture d'un FrReport, le compilateur me retourne le message d'erreur

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Indice de liste hors limite(0)

La requete qui est sur le report ne retourne qu'un seul enregistrement, alors pourquoi le compilateur trouve qe je depasse ???

Sur le bouton rechercher:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
 
  DataModule_Base.Query_InfoAccident.SQL.Clear;
  DataModule_BAse.Query_InfoAccident.SQL.Add('SELECT * FROM RELEVES');
  DataModule_BAse.Query_InfoAccident.SQL.Add('WHERE DATEACC ='+QuotedSTr(AnsiReplaceStr(DataModule_BAse.Query_recherche.FieldByName('DateACC').AsString,'/','.')));
  DataModule_BAse.Query_InfoAccident.SQL.Add('AND NOM ='+QuotedSTr(DataModule_BAse.Query_recherche.FieldByName('NOM').AsString));
  DataModule_BAse.Query_InfoAccident.SQL.Add('AND HEUREACC ='+QuotedSTr(DataModule_BAse.Query_recherche.FieldByName('HeureACC').AsString));
  DataModule_BAse.Query_InfoAccident.Open;

et sous le bouton imprimer

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
 
begin
if DataModule_BAse.Query_InfoAccident.RecordCount > 0 then
begin
  DataModule_Impression.frReport_ReleveAccident.preparereport;
  DataModule_Impression.frReport_ReleveAccident.ShowReport;
end;
end;

J'ai ajouter le recordcount pour voir s'il retourner qu'un seul enregistrement, et oui, il est bien de 1.

Merci d'avance

[LadyWasky]

Ca se trouve, ce n'est pas lié au nombre d'enregistrements que tu récupères mais plutôt à un tableau ou une liste que tu utilises.

N'oublies pas que le 1er élément d'un tableau ou d'une liste est en généra l'élément numéro zéro, le deuxième élément, le numéro 1, etc...