Voici le debut de ma fonction
----
function GetElementsByClasse(const Doc: IDispatch;const Nom_tag: string ; const classename: string): IHTMLElementCollection;
var
Document: IHTMLDocument2;
Body: IHTMLElement2;
Tags: IHTMLElementCollection;
Tags_retour : IHTMLElementCollection;
Tag: IHTMLElement;
I: Integer;
begin
Result := nil;
Tags_retour := nil;
Body := conv_Doc_IHTMLElement2(Doc);
Tags := Body.getElementsByTagName(Nom_tag);
for I := 0 to Pred(Tags.length) do
begin
Tag := Tags.item(I, EmptyParam) as IHTMLElement;
if AnsiSameText(Tag.className, classename) then
begin
// On va dire que je suis bloqué dans cette partie
// comment on peut filtrer le IHTMLElementCollection; 
end;
end;
Result := Tags_retour;
end;
-----