-
Forum: Multimedia
Delphi
by Aike,
19. Okt 2009
Ok, ich konnte die Lautstärke anpassen, indem ich im OnScroll-Event das hier eingefügt habe:
Lautstaerke:=(100 - Scrollpos) / 100;
MeMPPlaylist.Volume := Lautstaerke;
BASS_ChannelSetAttribute(chan, BASS_ATTRIB_VOL,Lautstaerke);
Den Stream zum Halt bringen konnte ich mit
BASS_ChannelPause(chan);
beim Stopp-Button. :hello:
Allerdings habe ich immer noch das Problem, dass ich die...
-
Forum: Multimedia
Delphi
by Aike,
13. Okt 2009
Hm, also ... Mir scheint, als wäre BASS_GetDevice bzw BASS_SetDevice das richtige, aber ...
procedure TForm1.Button2Click(Sender: TObject);
begin
showmessage(inttostr(BASS_GetDevice()));
BASS.BASS_SetDevice(0);
showmessage(inttostr(BASS_GetDevice()));
end;... macht gar nichts, bzw. es kommt immer "1", wobei "0" eigentlich sogar gemutet sein sollte :-/
Mein Radiostream funktioniert...
-
Forum: Multimedia
Delphi
by Aike,
13. Okt 2009
Ok, ich werd mir das gleich ansehen.
Zwischenfrage: Internet-Radio? *g* Ich dachte an sowas wie "http://62.26.214.248:80/swr1bwlive/livestream.mp3", "http://stream-1.ssatr.ch:80/rsp/mp3" oder "http://cdn-two.977music.com/classic64?.wma". Das sind die drei, die ich grade gespeichert habe, und sie haben alle 'n anderes Format. Wie könnte ich denn sowas mit einbinden? *g*
gibt ja genug hier im...
-
Forum: Multimedia
Delphi
by Aike,
13. Okt 2009
Ich habe Punkt 1 und 3 meines Edits fixen können, indem ich meine Version mit dem (original) Source Code verglichen und kopiert hab. Leider weiß ich überhaupt nicht, was schiefgegangen sein könnte *g* OnEndFile etc. geht auch.
Allerdings gibt es immer noch das 27-Zeichen-Problem.
Ich hab ein bisschen weiterprogrammiert und bin jetzt zu einem weiteren Problem gekommen: Ich möchte gerne die...
-
Forum: Multimedia
Delphi
by Aike,
11. Okt 2009
Na ja, du musst die Mp3FileUtils.pas halt runterladen und einbinden.
-
Forum: Multimedia
Delphi
by Aike,
10. Okt 2009
Gut, gut. Ich bin fertig mit dem Tutorial (*schnauf*), danke nochmals.
Leider funktioniert nicht alles wie gewünscht:
Weder "OnMeMPChange" noch "OnMeMPEndFile" werden jemals aktiviert. "OnMeMPEndFile" konnte ich aber überbrücken, indem ich die Position des Schiebereglers abgefragt habe. Bei dem Change ist mir nichts eingefallen. "OnMeMPPlay" funktioniert komischerweise auch nicht richtig,...
-
Forum: Multimedia
Delphi
by Aike,
9. Okt 2009
*Seufz* Ok, Explode hab ich eingefügt, gibt immer noch einen Fehler:
>> tmpext := Explode(';',Info.Formats.exts); << liefert der Fehler ...
"Incompatible types: 'TStringList' and 'TStringDynArray'"
-
Forum: Multimedia
Delphi
by Aike,
9. Okt 2009
Gut, danke euch beiden :-)
Ich bin jetzt auch sehr viel weitergekommen, allerdings bin ich auf diese Fehlermeldung gestoßen:
-->> (Error) Player_Klasse.pas: Undeclared identifier: 'Explode'
Quelltext dazu: tmpext := Explode(';',Info.Formats.exts); (Im Original Zeile 188)
-
Forum: Multimedia
Delphi
by Aike,
9. Okt 2009
Ich hab nirgendwo eine Assign-Methode gefunden in deinen Dateien, was mir etwas sagen würde :-(
Ok, Assign gefunden in der AudioDatei_Klasse.pas :angel:
"BASS_ChannelSetAttribute(fMainStream, BASS_ATTRIB_VOL, fMainVolume);" steht auch in deiner Version, Zeile 255 von Player_Klasse.
-
Forum: Multimedia
Delphi
by Aike,
9. Okt 2009
*Seufz* Nächstes Problem: Ich will gerade Version 2.0 compilieren, habe alles soweit ausgeführt mit Buttons erstellen, destructor, constructor etc. pp., aber ich bekomme wieder einen Haufen Fehlermeldungen:
Player_Klasse.pas(70): Undeclared identifier: 'Assign'
Player_Klasse.pas(73): Undeclared identifier: 'BASS_ChannelSetAttributes'
Player_Klasse.pas(115): Undeclared identifier:...
-
Forum: Multimedia
Delphi
by Aike,
9. Okt 2009
Ok, hab ich gemacht. Jetzt bekomme ich den Fehler in ATL_WMAfile:
(Code: uses Classes, SysUtils, TntClasses;)
File not found: TntClasses.dcu
-
Forum: Multimedia
Delphi
by Aike,
9. Okt 2009
Ok, das waren jetzt grauenvolle 30 Minuten ;-p
Ich habe das Tutorial gelesen (Seite 1, 2 und die letzte). Teilweise leider etwas zu ungenau für mich, darum bin ich gleich zum Ende, hab mir die fertigen Dateien angeschaut und dann verstanden, was er auf Seite 2 meinte. Gut, ich hab also die erforderlichen Dateien in einen Ordner kopiert (ATL_WMAfile.pas, bass.dll, config.inc, Mp3FileUtils.pas,...
-
Forum: Multimedia
Delphi
by Aike,
9. Okt 2009
Hallo, Leute,
nachdem ich über ein Jahr nicht mehr programmiert habe, möchte ich mich mal wieder mit einem Problem beschäftigen: Ich möchte mir einen MP3-Player programmieren. Seither habe ich halt Winamp benutzt, aber zum einen bin ich mit einigen Funktionen unzufrieden, zum anderen möchte ich es für meinen Gebrauch vereinfachen/umgestalten und außerdem ist es natürlich die Herausforderung...