Re: [TROLL INSIDE] MsRL - Microsoft Reference License
Pierre Y. a pensé très fort :
> Pierre Y. avait prétendu :
>> Flo a formulé ce lundi :
>>> Pierre Y. a écrit :
>>>> Patrons = générateurs de code ?
>>>
>>> oui cf rev 2192 (et les quelques fix suivants).
>>> J'ai modifié JPP pour qu'il expande les macros contenant les différents
>>> containers, j'en profite pour ajouter d'autres fonctionnalités comme la
>>> vérification des doublons, la sensibilité à la casse...
>>
>> Il semblerait que ça bugge (j'ai le pb), quand on demande un itérateur sur
>> une collection IJclIntfList, il ne parcoure pas le dernier élement :
>>
>> var
>> ItF: IJclIntfIterator;
>> begin
>> // ...
>> ItF := UneCollection.First;
>>
>> while ItF.HasNext do
>> begin
>> with IMonInterface(ItF.GetObject) do
>> begin
>> // Do Something
>> end;
>> ItF.Next;
>> end;
>> end;
>
> Semblerait que ce soit pas ça le pb. Je continue à chercher... :-?
Semblerait que ce soit ça, je suis un neuneu de l'algo de parcours
d'une liste avec un itérateur ;-) Ce que ne m'explique pas c'est que ma
bouse fonctionnait avant...
J'ai réécrit le truc comme ça :
ItF := UneCollection.First;
if ItF.HasNext then
begin
repeat
with IMonInterface(ItF.Next) do
begin
// Do Something
end;
until (not ItF.HasNext);
end;
Y'a mieux ? Plus "propre" par rapport à la manière dont fonctionnent
les composants de JclContainer ?
--
Pierre Y.
|