Einzelnen Beitrag anzeigen

newuser01

Registriert seit: 31. Aug 2006
248 Beiträge
 
Delphi 7 Professional
 
#3

Re: Winamp Equalizer Datei auslesen

  Alt 25. Sep 2006, 17:26
Hallo Holle

Ich glaube diese Funktion

Delphi-Quellcode:
function TWinAmpControl.GetEQData: TEQData;
var
  wnd : HWND;
begin
  if IsRunning then
  begin
    wnd := GetHandle;
    Result.EQ_60 := SendMessage(wnd, WM_WA_IPC, 0, IPC_GETEQDATA);
    Result.EQ_170 := SendMessage(wnd, WM_WA_IPC, 1, IPC_GETEQDATA);
    Result.EQ_310 := SendMessage(wnd, WM_WA_IPC, 2, IPC_GETEQDATA);
    Result.EQ_600 := SendMessage(wnd, WM_WA_IPC, 3, IPC_GETEQDATA);
    Result.EQ_1k := SendMessage(wnd, WM_WA_IPC, 4, IPC_GETEQDATA);
    Result.EQ_3k := SendMessage(wnd, WM_WA_IPC, 5, IPC_GETEQDATA);
    Result.EQ_6k := SendMessage(wnd, WM_WA_IPC, 6, IPC_GETEQDATA);
    Result.EQ_12k := SendMessage(wnd, WM_WA_IPC, 7, IPC_GETEQDATA);
    Result.EQ_14k := SendMessage(wnd, WM_WA_IPC, 8, IPC_GETEQDATA);
    Result.EQ_16k := SendMessage(wnd, WM_WA_IPC, 9, IPC_GETEQDATA);
    Result.Preamp := SendMessage(wnd, WM_WA_IPC, 10, IPC_GETEQDATA);
    Result.Enabled := SendMessage(wnd, WM_WA_IPC, 11, IPC_GETEQDATA);
    Result.Autoload := SendMessage(wnd, WM_WA_IPC, 12, IPC_GETEQDATA);
  end;
end;



in der WinAmpControl.pas liest die Equalizerdaten nur dann aus wenn Winamp gestartet ist und das bringt mich ja nicht weiter. Ich möchte ja gerne die "Winamp.q1" Datei auslesen und die darin enthaltenen Werte meinem Equalizier übergeben.
Gruß: Holger

[Hobby-Programmierer]
  Mit Zitat antworten Zitat