FS#73 - fonction d'extraction des fichiers audio d'une page web
Concerne le projet:
Application PLAYER
Ouverte par Loic Le Gallou (loic) - mercredi, 22 août 2007, 00:47 GMT+2
Dernière édition par Loic Le Gallou (loic) - jeudi, 01 mai 2008, 11:38 GMT+2
Ouverte par Loic Le Gallou (loic) - mercredi, 22 août 2007, 00:47 GMT+2
Dernière édition par Loic Le Gallou (loic) - jeudi, 01 mai 2008, 11:38 GMT+2
|
Détailsfonction d'extraction des fichiers audio d'une page web afin de pouvoir les ajouter dans une playlist. Cette fonction poura être intégrée dans la fenetre mp3org
|
Cette tâche dépend de
When using the TWebBrowser component you might want to grab the full HTML source code from the page being displayed by the component. Here's how:
~~~~~~~~~~~~~~~~~~~~~~~~~
uses mshtml;
var
iall : IHTMLElement;
begin
if Assigned(WebBrowser1.Document) then
begin
iall := (WebBrowser1.Document AS IHTMLDocument2).body;
while iall.parentElement <> nil do
begin
iall := iall.parentElement;
end;
memo1.Text := iall.outerHTML;
end;
end;
~~~~~~~~~~~~~~~~~~~~~~~~~
Note: HTML goes into a TMemo control named "Memo1".