[Dmitry_DM]

Сообщение от angvelem

Меня для таких целей PaintBox также больше устраивает, меньше проблем с мерцанием.
Кнопка стоит в фокусе вот и срабатывает на пробел, можно подправить

Код:

    VK_SPACE :
    begin
      case Active of
        BASS_ACTIVE_PAUSED :
        begin
          BASS_ChannelPlay(ChanPlay, False);
          Caption := 'BASS spectrum analyser';
        end;

        BASS_ACTIVE_PLAYING :
        begin
          BASS_ChannelPause(ChanPlay);
          Caption := 'BASS spectrum analyser - PAUSED';
        end;
      end;
      Key := 0;
    end;

Пример днём накидал, так что объединение ещё не смотрел.

Мне этот пример очень даже понравился, как для накиданного.