Forum: Multimedia
Delphi
by E307,
30. Mär 2006
Ich habe jetzt eine Lösung! :bounce1: Man muss die Paintbox und die Gaugen mit Panels unterlegen, bei denen DoubleBuffered := true gestellt ist! Danke für die viele Hilfe!
Forum: Multimedia
Delphi
by E307,
29. Mär 2006
Also soll ich die Visualisierung direkt auf die Timage zeichnen? Und wenn das klappt, was soll ich dann mit den Gaugen machen?
Forum: Multimedia
Delphi
by E307,
29. Mär 2006
:wiejetzt: Äh. Wie genau geht das?
Forum: Multimedia
Delphi
by E307,
29. Mär 2006
Ich habe jetzt das ganze noch mal auf nem anderen Computer getestet: Es flackert auch da!
Forum: Multimedia
Delphi
by E307,
29. Mär 2006
Hier OSCDraw von turboPascal:
procedure TForm1.OscDraw(aBitmap: TBitmap; WaveData: TWaveData; ScopeOff: Word);
const
DrawRes = 2;
var
i, YPos: LongInt;
HalfHeight: Integer;
R, L: SmallInt;
begin
with aBitmap do
Forum: Multimedia
Delphi
by E307,
29. Mär 2006
Meinem Delphi ist "BitBlt" Nicht bekannt!
Die anderen Timer sind nur der Playlist-Timer und einer, der für eine Scrollende Schrift im Titel sorgt.
Forum: Multimedia
Delphi
by E307,
29. Mär 2006
Die Möglichkeiten haben leider alle nicht funktioniert.
Das ganze Projekt hat übrigens ein Hintergrundbild (TImage). Vieleicht hat das etwas mit dem Problem zu tun. Hier mal der Code des Haupttimers:
if Video=true then begin //Wenn Datei ein Video ist
Trackposbar.position := Videoplayer.Position //Trackposbar auf Videoposition bringen
end else //Wenn die Datei eine Audiodatei ist...
Forum: Multimedia
Delphi
by E307,
28. Mär 2006
Toll, genau sowas habe ich gesucht! :thumb: Allerdigs blinkt das Bild genau wie die Progressbars, die es im Projekt schon länger gibt, ganz furchtbar und man kann kaum etwas erkennen! Gibt es da Abhilfe?
Forum: Multimedia
Delphi
by E307,
27. Mär 2006
Wie kann ich in meinem Mediaplayer Visualisierungen wie im Windows MediaPlayer erstellen? Ich benutze den TBassDLLPlayer, den es hier im Forum irgendwo als Download gibt, würde da aber auch ein Paar Funktionen hinzufügen.