-
Forum: Multimedia
Delphi
by Nils_13,
28. Dez 2004
@wishmaster: kennst du den Fehler?
Sorry to Topic!
-
Forum: Multimedia
Delphi
by Nils_13,
28. Dez 2004
@wishmaster: in dem type von dem langen Code fehlt einiges z.B. engine_stop, engine_song_end :wink:, aber egal!
@mika: Es ist dein Problem ob du nicht anders kannst!!! Ich hab schon längst gesucht!!!!!!!!!!!!!!!!!!!!
-
Forum: Multimedia
Delphi
by Nils_13,
28. Dez 2004
:wall: danke!
-
Forum: Multimedia
Delphi
by Nils_13,
27. Dez 2004
Hi,
mit der JVCL-Trackbar möchte ichs jetzt machen!
Es funktioniert nicht: wenn ich wieder die Mausloslasse geht der Slider zur ursprünglichen Position zurück und es ist nichts passiert!
procedure TFormPlayer.Timer1Timer(Sender: TObject);
var
hFileStream, TrackPos: Integer;
begin
hFileStream := BASS_StreamCreateFile(FALSE, @FileName, 0, 0, BASS_MP3_SETPOS
or BASS_STREAM_AUTOFREE);
-
Forum: Multimedia
Delphi
by Nils_13,
12. Dez 2004
Hi Wishmaster!
Da hast du dir aber viel Arbeit gemacht (immerhin über 1000 Zeilen Code) :thumb: :thumb:
Danke für die TAudioEngine, damit mit kann ich jetzt etwas anfangen!
-
Forum: Multimedia
Delphi
by Nils_13,
11. Dez 2004
Weiß :oops: .
-
Forum: Multimedia
Delphi
by Nils_13,
11. Dez 2004
Der Beweis:
-
Forum: Multimedia
Delphi
by Nils_13,
11. Dez 2004
@Spider: siehe 3 Beiträge über deinen!!!
-
Forum: Multimedia
Delphi
by Nils_13,
11. Dez 2004
Hi,
1. Das Prinzip hab ich kapiert!
2. Das umstetzen ist eine andere Sache!
3. Max gibt es nicht!
4. Falls es hier noch niemanden aufgefallen ist: die Umsetzung ist doch gerade das Problem
:wink:
-
Forum: Multimedia
Delphi
by Nils_13,
11. Dez 2004
@alki: in die Klammern sollte man den Befehl fürs erzeugen einer Datei!
-
Forum: Multimedia
Delphi
by Nils_13,
11. Dez 2004
@Fkerber: Siehe 2 Beiträge drüber!
-
Forum: Multimedia
Delphi
by Nils_13,
11. Dez 2004
Cool, automatisch wird ein ladestand angezeigt.
Na ja dafür läuft wichtigeres nicht mehr :cry:
Wenn ich einfach
tb1.MaxValue := aStream;
und
TrackPos := BASS_ChannelGetPosition(hFileStream);
tb1.Position := hFileStream;
sage, läufts nicht, nur warum?!
-
Forum: Multimedia
Delphi
by Nils_13,
11. Dez 2004
1. (Play)
procedure TFormPlayer.Image1Click(Sender: TObject);
var aStream: integer;
begin
BASS_Start();
BASS_ChannelPause(channel);
position := 0;
op1.Title := 'Open Files';
if not op1.Execute then exit;
Channel := BASS_StreamCreateFile(FALSE, PChar(op1.FileName), 0, 0, 0);
-
Forum: Multimedia
Delphi
by Nils_13,
11. Dez 2004
Den ganzen?
-
Forum: Multimedia
Delphi
by Nils_13,
11. Dez 2004
Keine Fehlermeldung, die Trackbar funktioniert leider nicht!
-
Forum: Multimedia
Delphi
by Nils_13,
11. Dez 2004
Wenn ich das richtig verstanden habe sollte man statt
TrackBar1.Max := BASS_StreamLength(aStream);
einfach
tb1.MaxValue := BASS_MusicGetLength(aStream, True);
nehmen, da Spiders Funktion nicht funktioniert.
Folgendes bei menem Code hab ich in die Play-funktion (die Playfunktion öffnet auch)
tb1.MaxValue := BASS_MusicGetLength(aStream, True);stehen, bei dem Timer hab ich den Code von...
-
Forum: Multimedia
Delphi
by Nils_13,
11. Dez 2004
Hab ich schon längst!!!
-
Forum: Multimedia
Delphi
by Nils_13,
11. Dez 2004
Es ist ja nicht nur ein Fehler, wenn ich alles aufzählen würde wäre die Seite locker voll.
-
Forum: Multimedia
Delphi
by Nils_13,
11. Dez 2004
Hi,
Luckie hat mal etwas von:
var TrackPos, hFileStream: integer;
begin
TrackPos := BASS_ChannelGetPosition(hFileStream);
Wie könnte ich das in der Trackbar verwenden?
-
Forum: Multimedia
Delphi
by Nils_13,
11. Dez 2004
Hi,
könnt ihr mir auf die Sprünge helfen? Ich kanns leider nicht finden :roll:
-
Forum: Multimedia
Delphi
by Nils_13,
11. Dez 2004
thx!!!
Wie heißt denn die Engine :drunken:
:hi:
-
Forum: Multimedia
Delphi
by Nils_13,
10. Dez 2004
Hi,
klar Chef!
:hi:
-
Forum: Multimedia
Delphi
by Nils_13,
10. Dez 2004
Mit dem MediaPlayer wär es mir ein leichtes eine TrackBar zu proggen, der MediaPlayer ist aber schlechter als die BASS.dll.
-
Forum: Multimedia
Delphi
by Nils_13,
10. Dez 2004
Hi,
1. Wie berechne ich die Zeit eines Liedes (BASS.dll)
2. Wie stelle ich das in der Trackbar da?
