Forum: Multimedia
Delphi
by Killerregenwurm,
24. Feb 2008
:dancer: nice klappt jetzt
Forum: Multimedia
Delphi
by Killerregenwurm,
24. Feb 2008
also das updaten der InputListe funktioniert noch nicht bei device change.
wenn du willst kann ich das dann noch für dich testen bis das klappt ;)
Forum: Multimedia
Delphi
by Killerregenwurm,
24. Feb 2008
vielen dank langsam raff ich es :coder2: :D
procedure TmfMovinhead.btItunesClick(Sender: TObject);
var
_Channel:HStream;
fft : array of single;
n,i : integer;
dName: PChar;
begin
Forum: Multimedia
Delphi
by Killerregenwurm,
24. Feb 2008
ok,
das Programm muss auch gar nicht auf anderen Rechnern erstmal laufen, da es im eh bestimme Externe Hardware braucht, die nur an diesem Rechner existiert.
Bei deinem Programm sehe ich ein Spektrum des Mikro einganges. Bei Sounddevice kann ich zwischen meiner webcam(oben) und meiner Soundkarte(unten) wählen.
Also ist die Webcam sounddevice 0 und die Soundkarte 1, oder?
bei Input...
Forum: Multimedia
Delphi
by Killerregenwurm,
24. Feb 2008
zum einen: Ja ich habe damit Probleme wie Delphi das macht^^
zum anderen, ich kann bei deinem Test Programm nach wählen des Sounddevices also meiner Soundkarte nur ein Mirko auswählen :(
Aber bei delphi muss ich dann erstmal über
BASS_RecordSetDevice(i);
die Karte Auswählen und danach über
Forum: Multimedia
Delphi
by Killerregenwurm,
24. Feb 2008
den Aufnahme Kanal StereoMix habe ich.
Doch auch wenn ich diesen, über die Windows Soundcontrol auswähle aus Aufnahme Kanal ändert dies nichts im Programm BassTest.
Dies hatte ich schon vorher ausprobiert.
Fakt ist, da ich StereoMix habe, dass ich als channel in Bass_channelGetData diesen Stereomix angeben kann. Doch dies bekomme ich nicht gebacken...
Muss ich also, wenn ich StereoMix...
Forum: Multimedia
Delphi
by Killerregenwurm,
23. Feb 2008
vielen dank.
Das ist mal nen Beispiel das direkt funktioniert.
Allerdings bräuchte ich dies für den Output Kanal, nicht wie dort für Input (also mikro).
Was muss ich dennd ann ändern?
Grüße
Forum: Multimedia
Delphi
by Killerregenwurm,
23. Feb 2008
nahc langem tüfteln und rumprobieren bin ich endlich ein Stpck weiter:
procedure TmfMovinhead.btItunesClick(Sender: TObject);
var
ch:HMusic;
fft : array of single;
n,i : integer;
begin
self.laItunetrackOut.caption := getCurrentTitle(iTunesApp);
BASS_ChannelGetData(ch,@fft,BASS_DATA_FFT512);
Forum: Multimedia
Delphi
by Killerregenwurm,
20. Feb 2008
*Push*
Kann mir da echt keiner weiterhelfen?