Delphi 7 -> Узнать, что проигрывается в Winamp'e

Discussion in 'С/С++, C#, Rust, Swift, Go, Java, Perl, Ruby' started by lamer811, 27 Aug 2010.

  1. lamer811

    lamer811 Elder - Старейшина

    Joined:
    8 Nov 2009
    Messages:
    132
    Likes Received:
    39
    Reputations:
    12
    Всем привет.
    Собственно очень хочется узнать, как с помощью Delphi, можно узнать, что проигрывается в Winamp.
    Возможно у кого-то есть собственные примеры или подскажите где почитать?

    Очень интересны были бы простенькие исходники.
     
  2. FeRiuS

    FeRiuS Member

    Joined:
    26 Feb 2010
    Messages:
    130
    Likes Received:
    49
    Reputations:
    5
    1 person likes this.
  3. HakaR

    HakaR Active Member

    Joined:
    23 Jul 2009
    Messages:
    301
    Likes Received:
    200
    Reputations:
    3
    PHP:
    function get_track:string;
    var
      
    Hhwnd;
      
    buf: array[0..255of char;
      
    linteger;
    begin
      H 
    := FindWindow(pchar('winamp v1.x'), nil);
      if 
    0 then Result := 'none';
      else
       
    begin
        l 
    := sendmessage(Hwm_gettextlength00);
        
    SendMessage(hwm_gettextl+1integer(@buf));
        
    Result := copy(bufpos('.'buf)+2l-pos(' - winamp'buf)-length(' - winamp')-pos('.'buf));
       
    end;
    end;
    Давно где то находил в гугле этот пример, юзал в своей программе.
     
    2 people like this.
  4. GRRRL Power

    GRRRL Power Elder - Старейшина

    Joined:
    13 Jul 2010
    Messages:
    823
    Likes Received:
    185
    Reputations:
    84
    Можно открыть Winamp sdk, который в основном представлен одним файлом wa_ipc.h, который очень хорошо прокомментирован, выдрать оттуда все необходимые Windows-сообщения, и написать плагин. Были даже примеры, правда, на C++. Или задача получать название композиции не из плагина, а из внешней программы? Тогда код HakaR'а, наверное, поможет.
     
  5. lamer811

    lamer811 Elder - Старейшина

    Joined:
    8 Nov 2009
    Messages:
    132
    Likes Received:
    39
    Reputations:
    12
    Да сама суть, получить название играющей композиции на данный момент в Winamp
    С С++ знаком, но интересны всё же готовые реализации и HakaR очень помог (+ик поставил)