AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Programmierung allgemein Multimedia Youtube im TWebBrowser unter 10.1

Youtube im TWebBrowser unter 10.1

Ein Thema von MyRealName · begonnen am 2. Dez 2017 · letzter Beitrag vom 4. Dez 2017
Antwort Antwort
Benutzerbild von MyRealName
MyRealName

Registriert seit: 19. Okt 2003
Ort: Heilbronn
543 Beiträge
 
Delphi 10.4 Sydney
 
#1

Youtube im TWebBrowser unter 10.1

  Alt 2. Dez 2017, 21:01
Irgendwann hatte ich mal für mein Changelog zusätzliche RTF-Texte und angehängte youtube videos programmiert. Das ging unter damals Delphi 2007 recht schön.

Unter 10.1 nichts mehr, bleibt einfach schwarz.

Hab schon rumgebaut und in der Registry den Default IE6 rendermodus auf IE9 etc, aber nichts hilft.

Hat jemand eine idee ?

Mein augenblicklicher code sieht so aus :

Code:
<html>
<head>
</style>
    <style type="text/css">.recentcomments a{display:inline !important;padding:0 !important;margin:0 !important;}</style>
</head>
<body>
  <object width="640" height="390">
  <param name="movie" value="//www.youtube.com/embed/ixw_bLVUL34">
  </param><param name="allowFullScreen" value="true">
  </param><param name="allowScriptAccess" value="always">
  </param><embed src="http://www.youtube.com/embed/ixw_bLVUL34" type="application/x-shockwave-flash" allowfullscreen="true" allowScriptAccess="always" width="640" height="390">
  </embed></object>
</body>
</html>
Den hier hab ich auch probiert, aber nichts :

Code:
<!DOCTYPE html>
<html>
<body>

<iframe width="420" height="315" src="//www.youtube.com/embed/ixw_bLVUL34" frameborder="0" allowfullscreen>
  <p>Your browser does not support iframes.</p>
</iframe>

</body>
</html>

Geändert von MyRealName ( 2. Dez 2017 um 21:03 Uhr)
  Mit Zitat antworten Zitat
Der schöne Günther

Registriert seit: 6. Mär 2013
5.788 Beiträge
 
Delphi 10 Seattle Enterprise
 
#2

AW: Youtube im TWebBrowser unter 10.1

  Alt 3. Dez 2017, 09:39
Bist du wirklich sicher dass du das mit dem IE-Modus richtig gemacht hast?

Geh mit deiner Anwendung doch mal auf
https://www.whatismybrowser.com/
und prüfe das.
  Mit Zitat antworten Zitat
Benutzerbild von MyRealName
MyRealName

Registriert seit: 19. Okt 2003
Ort: Heilbronn
543 Beiträge
 
Delphi 10.4 Sydney
 
#3

AW: Youtube im TWebBrowser unter 10.1

  Alt 3. Dez 2017, 15:44
Sieht so aus, er sagt IE 11 auf Windows 10, Internet Explorer 9 Compatibility View
Und Flash 27 installiert.
Screenshot angehängt
Miniaturansicht angehängter Grafiken
2709faf11d.png  
  Mit Zitat antworten Zitat
Der schöne Günther

Registriert seit: 6. Mär 2013
5.788 Beiträge
 
Delphi 10 Seattle Enterprise
 
#4

AW: Youtube im TWebBrowser unter 10.1

  Alt 3. Dez 2017, 16:03
Abgesehen von mehreren Syntax-Fehlern im ersten Beispiel fällt mir auch sonst nichts auf.

Ich kenne mich damit nicht aus, sehe aber bspw. dass dieses Beispiel hier funktioniert, selbst wenn man kein Flash installiert hat:

http://www.java2s.com/Code/HTMLCSS/O...withobject.htm
  Mit Zitat antworten Zitat
Benutzerbild von MyRealName
MyRealName

Registriert seit: 19. Okt 2003
Ort: Heilbronn
543 Beiträge
 
Delphi 10.4 Sydney
 
#5

AW: Youtube im TWebBrowser unter 10.1

  Alt 3. Dez 2017, 16:57
Das Beispiel geht im webbrowser, aber in Delphi bleibt das Viereck, wo das Videos ein sollte, schwarz
  Mit Zitat antworten Zitat
Michael II

Registriert seit: 1. Dez 2012
Ort: CH BE Eriswil
611 Beiträge
 
Delphi 10.4 Sydney
 
#6

AW: Youtube im TWebBrowser unter 10.1

  Alt 3. Dez 2017, 21:28
Wenn ich auf YouTube.com ein Video schaue und unterhalb des Frames auf Teilen und dann Einbetten klicke, dann stellt mir Youtube einen Code wie diesen zur Verfügung:

Code:
<iframe width="560" height="315" src="https://www.youtube.com/embed/MxDZnsctsSo" frameborder="0" allowfullscreen></iframe>
Wenn ich diesen Code nutze, in eine Webseite einbaue und dann diese Webseite mit neustem Delphi (10.2 Update 1/Windows 10) via TWebBrowser aufrufe, dann werden js-Skript Fehlermeldungen angezeigt und das Anzeigefenster bleibt schwarz.

Wenn ich direkt nach <head>

<meta http-equiv="X-UA-Compatible" content="IE=edge" />

einbaue, dann wird das Video ohne Meldungen korrekt angezeigt.

Webseite:

Code:
<?xml version="1.0" ?>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN"
    "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml" lang="en" xml:lang="en">

<head>
<meta http-equiv="X-UA-Compatible" content="IE=edge" />
  <title>Adding a YouTube Video</title>
</head>
<body>
<iframe width="560" height="315" src="https://www.youtube.com/embed/MxDZnsctsSo" frameborder="0" allowfullscreen>
</iframe>
</html>

Aufruf via Delphi:

  webbrowser1.Navigate2( 'C:\Users\Michael\Desktop\check.html' );
Klappt es bei dir auch?
Michael Gasser
  Mit Zitat antworten Zitat
Benutzerbild von MyRealName
MyRealName

Registriert seit: 19. Okt 2003
Ort: Heilbronn
543 Beiträge
 
Delphi 10.4 Sydney
 
#7

AW: Youtube im TWebBrowser unter 10.1

  Alt 4. Dez 2017, 00:53
Wenn ich auf YouTube.com ein Video schaue und unterhalb des Frames auf Teilen und dann Einbetten klicke, dann stellt mir Youtube einen Code wie diesen zur Verfügung:

Code:
<iframe width="560" height="315" src="https://www.youtube.com/embed/MxDZnsctsSo" frameborder="0" allowfullscreen></iframe>
Wenn ich diesen Code nutze, in eine Webseite einbaue und dann diese Webseite mit neustem Delphi (10.2 Update 1/Windows 10) via TWebBrowser aufrufe, dann werden js-Skript Fehlermeldungen angezeigt und das Anzeigefenster bleibt schwarz.

Wenn ich direkt nach <head>

<meta http-equiv="X-UA-Compatible" content="IE=edge" />

einbaue, dann wird das Video ohne Meldungen korrekt angezeigt.

Webseite:

Code:
<?xml version="1.0" ?>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN"
    "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml" lang="en" xml:lang="en">

<head>
<meta http-equiv="X-UA-Compatible" content="IE=edge" />
  <title>Adding a YouTube Video</title>
</head>
<body>
<iframe width="560" height="315" src="https://www.youtube.com/embed/MxDZnsctsSo" frameborder="0" allowfullscreen>
</iframe>
</html>

Aufruf via Delphi:

  webbrowser1.Navigate2( 'C:\Users\Michael\Desktop\check.html' );
Klappt es bei dir auch?
Das funktioniert sehr gut. Genau, was ich suchte Danke!!
Miniaturansicht angehängter Grafiken
f4b517dcae.png  
  Mit Zitat antworten Zitat
Redeemer

Registriert seit: 19. Jan 2009
Ort: Kirchlinteln (LK Verden)
822 Beiträge
 
Delphi 2009 Professional
 
#8

AW: Youtube im TWebBrowser unter 10.1

  Alt 4. Dez 2017, 23:37
Herrgott jenes Formular in dem Video! Formular-Designer klagt auf Schmerzensgeld.
Janni
2005 PE, 2009 PA, XE2 PA
  Mit Zitat antworten Zitat
Themen-Optionen Thema durchsuchen
Thema durchsuchen:

Erweiterte Suche
Ansicht

Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 07:01 Uhr.
Powered by vBulletin® Copyright ©2000 - 2022, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2021 by Daniel R. Wolf