Afficher un message
Vieux 10/10/2007, 17h01   #76
Pierre Y.
Aucun Avatar
 
Messages: n/a
Hébergeur:
Par défaut 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.


  Réponse avec citation
 
Page generated in 0,04978 seconds with 9 queries