VCL Twebbroser mit YouTube I-Frame API

[Rolandrevolvermann]

Das mit dem Thread klingt interessant. Werd ich morgen gleich testen und berichten. Danke!

[Rolandrevolvermann]

Ich habe mich nun mal in das Thread Thema bzgl. Delphi eingelesen.
Mein Plan:
Ich habe z.B. eine procedure

Code:

procedure youtube_abspielen(pfad:String)

Diese möchte ich in einen Thread packen. Dazu habe ich mir folgenden Type gebaut

Code:

Type
  TYoutube = class(TThread)
  TProc: procedure(const AStr: String) of object;
private
  Pfad : String;
  Funktion : TProc;
protected
  procedure Execute(); override;
public
  property Param1 : String read Pfad write Pfad;
  property Proc : TProc read Funktion write Funktion;
End;

Die Excecute macht folgendes

Code:

procedure TYoutube.Execute;
begin
  try
    TProc(pfad);
  Except
  end;
end;

Im Programm dachte ich mir rufe ich das folgendermaßen auf:

Code:

MyYoutube := TYoutube.Create(False);
MyYoutube.TProc := youtube_abspielen('Hier ist das große Fragezeichen'); //Hier klappt es nicht
MyYoutube.Param1 := 'Ein_String';

Es hakt soweit ich das beurteilen kann bei der Zuweiseung der Procedure an die Member.

PS: Wenn ich der Procedure einen String mitgebe kommt folgende Fehlermeldung:
E2010 Incompatible types: 'Procedure of object' and 'procedure, untyped pointer or untyped parameter'

[Rolandrevolvermann]

Erledigt: habs gerade selber gesehen
Richtig ist nur die procedure zu übergeben:

Zitat:

MyYoutube.TProc := youtube_abspielen;

[TiGü]

Überschreibe mal den Constructor und übergebe dir die Callback darüber. Ist sauberer und weniger Fehleranfällig.
Das ist nur ein Beispiel, dass heißt nicht wirklich TProc, oder?

[Rolandrevolvermann]

Danke für den Hinweis.
Ja, das ist nur ein Beispiel für mich zum testen gewesen.
Leider bringt das Auslagern der Youtube Funktion keine Besserung der Abspielqualität des YouTube Videos. Aber einen Versuch wars Wert und so kann ich zumindest in Delphi Threads erstellen

[EWeiss]

Zitat:

Leider bringt das Auslagern der Youtube Funktion keine Besserung der Abspielqualität des YouTube Videos.

Ich weis ja nicht um was es dir geht.. Nur um YouTube Videos abzuspielen?

Falls dem so ist.
Verwende DirectX und deine Probleme sind Vergangenheit. (https://youtu.be/h2bhFlkylPE)
Siehe Pic.

gruss

[Rolandrevolvermann]

@EWeiss
Ausgangsproblem war/ist, dass ein im TWebbrowser abgespieltes Youtube Video in unserer Anwendung ruckelt bzw nicht flüssig lüuft. Im normalen Browser schon. Ich konnte das ganze eingrenzen bzw. habe herausgefunden, dass das kein Problem vom Twebbrowser ist, sondern von unserer Anwendung.
Von 'Delphi.Narium' kam der Hinweis, dass "Timer, viele Ereignisse (nicht nur sowas wie OnStatus beim TWebBrowser), viele Application.ProcessMessages" ein "störgrund" sein können.
Von ConnorMcLeod kam dann der hinweis, das ganze in einen thread auszulagern. Das fand ich recht sinnvoll und habe es auch getestet. Leider ohne Erfolg.