Hi,
Icebube hat in seinem Tutorial zum Youtube Videos downloaden geschrieben, dass die Signatur im Quelltext ist. Doch wie kann ich den Quelltext anzeigen lassen?
Ich habe zwei Sachen versucht aber die erste geht nicht, da eine Fehlermeldung "Unknown Prozocol" kommt und die andere liefert den falschen Quelltext.
1. Möglichkeit:
Memo1.Text := IdHttp1.Get('Link zum Youtube Video');
2. Möglichkeit:
Delphi-Quellcode:
var
aHTMLDoc : IHTMLDocument2;
aHTMLBody : IHTMLElement;
swHTMLText : WideString;
begin
Webbrowser1.Navigate('Link zum Youtube Video');
if not VarIsEmpty(WebBrowser1.Document) then
begin
aHTMLDoc := WebBrowser1.Document as IHTMlDocument2;
aHTMLBody := aHTMLDoc.Get_body;
swHTMLText := aHTMLBody.outerHTML;
Memo1.Text := swHTMLText;
end;
Ich hab das Ganze in Notepad kopiert doch die von Icebube beschriebene Zeile (swfargs) Zeile ist nicht vorhanden. Firefox jedoch zeigt einen komplett anderen Quellcode an, in dem diese Zeile enthalten ist. Doch wie mach ich das mit Delphi? Hat das was mit Javascript oder so zu tun?