Könnte mir jemand erklären wie ich genau einzelne Channel erstellen kann?
Hab mir bass.dll runtergeladen und buss 2.3 auch installiert.
Hier mal mein Code wie weit ich bin:
Delphi-Quellcode:
type
TForm1 = class(TForm)
Player1: TBassdllPlayer;
...
procedure TForm1.Button1Click(Sender: TObject);
var length,vol:integer;
begin
if OpenDialog1.Execute then
begin
Player1.LoadFromFile(OpenDialog1.Filename);
TrackBar1.Max := Player1.SongLength;
length := Player1.SongLength;
s := length mod 60; m := length div 60;
vol := Player1.Volume;
Label1.Caption := Format('%.2d:%.2d',[m,s]);
Player1.Play;
end;
end;
Wie kann ich jetzt einen 2. Channel erstellen damit ich ein weiteres Lied gleichzeitig laufen lassen kann?
Danke schonmal
Patrick