Forum: Multimedia
by turboPASCAL,
27. Sep 2005
:warn: Desawegen soltest du ein neues Thema aufmachen
Ja.
Intern mit einem Bitmap ungefähr so vorgehen:
- Bitmap abdunkeln
- neu auf das Bitmap zeichnen
Forum: Multimedia
by turboPASCAL,
26. Sep 2005
Hi.
@padavan, mach doch bitte einen neuen Thread auf für deine Frage und verlinke dann von hier.
Forum: Multimedia
by turboPASCAL,
21. Sep 2005
Hab noch oben schnell 'ne Test-MP3 hinzugefügt, für den Soundcheck. ;)
Forum: Multimedia
by turboPASCAL,
20. Sep 2005
Hi, hab noch ein bissel rum gebastelt ;-)
Jupp.
Jupp.
:hi:
Forum: Multimedia
by turboPASCAL,
20. Sep 2005
:mrgreen:
:gruebel:
RechterKanal := LoWord(WaveData);
LinkerKanal := HiWord(WaveData);
;-)
procedure OscDraw(Paintbox: TPaintBox; WaveData : TWaveData; ScopeOff: Word);
const
DrawRes = 2; // "Genauigkeit"
var
Forum: Multimedia
by turboPASCAL,
20. Jul 2005
Ich würde es eher so machen (Spectrumanalyzer) :
var
data : array of Single;
i : byte;
begin
Bass_ChannelGetData(stream, @data, BASS_DATA_FFT512);
Forum: Multimedia
by turboPASCAL,
20. Jul 2005
... := BASS_ChannelSetFX(chan, BASS_FX_PARAMEQ, 1);
Damit wird der Effekt auf/zum dem aktuellem Stream ( Channel ) gesetzt, mit der Priorität 1.
Also den aktuellen Stream den EQ- Effekt zuweisen.
Mann kann somit auch einzelnen Kanälen verschiedene Effekte zuweisen.
z.B.:
- MP3-Kanal bekommt einen Halleffect,
- Musick–Kanal einen Chorus,
…usw.
Forum: Multimedia
by turboPASCAL,
20. Jul 2005
Hast Du schon einmal bei Demo Samples der Bass.dll reingeschaut ?
...bass21\Delphi\fxtest\FXTest.dpr <- Ein einfaches Beispiel für einen EQ