[FAQ] Вопросы по работе в AIMP SkinEditor v3.50+

[Remoder]

Никто не знает, где подевался провайдер вызова планировщика-будильника в 4.6?

[Black_AVP_Bim]

Никуда не девался. Открой в редакторе любой встроенный скин, ткни по "часикам" и посмотри в связях.

[Remoder]

Спасибо  , а то я ступил  .

[Offworld]

Некоторое время назад был опубликован Magnifier, я изменил размеры нескольких элементов и получил такой результат

Похоже, он не правильно масштабируеться. Может ли кто-нибудь попробовать свои силы в этом, пожалуйста.

[Black_AVP_Bim]

Как видно присутствуют рывки из-за того что деление округляется до 1% (одного процента). Если у вас есть решение этому - буду благодарен.

Position, PositionMax - Вам в помощь.

IMHO, пустая это затея - дискретность волны слишком мала, чтоб эту картинку зумировать:
  //    property Waveform[channel, index]: Single
  //        channel:
  //           0 - left
  //           1 - right
  //        index [0..511]

или в SDK:
  AIMP_VISUAL_WAVEFORM_SIZE = 512;
  TAIMPVisualDataWaveform = array[0..AIMP_VISUAL_WAVEFORM_SIZE - 1] of Single;

Как видите, массив из всего 512 значений, при увеличении (или при ширине >> 500 пикселей) Waveform не пересчитывается и выглядит уже не как волна, а набор палок, что не красиво (сравните с зумированием волны в любом звуковом редакторе).

[Offworld]

пустая это затея

О, я полон этих идей. Мои идеи на самом деле не мои, я просто читаю то, что люди просят сделать и нахожу это интересным.
И я согласен. Но не могу оставить это на финише. По правде говоря, я не мог понять Position, PositionMax 
Есть еще кое-что.
Планируется загрузить случайные текстуры в CoverArtDisplay (когда пустой) из менеджера ресурсов. Вызывается обработчиком OnTrackStarted.
Есть ли примеры таких математических функций, как Random или Randomize? И как через EventHandler переключить  OperatorCounter?

[Black_AVP_Bim]

... По правде говоря, я не мог понять Position, PositionMax 

Position - текущая позиция в треке при воспроизведении,
PositionMax - продолжительность трека, оба параметра в секундах.

Есть ли примеры таких математических функций, как Random или Randomize?

Randomize - это просто перезапуск генератра случайных чисел.
Random(X) - возвращает случайное число в диапазоне, указанном X (вещественное).
Пример можно посмотреть здесь.

И как через EventHandler переключить  OperatorCounter?

У счётчиков тоже есть свойство Position, в том же ^ примере можно увидеть.

[Offworld]

Сработало. Я благодарен.

Position - текущая позиция в треке при воспроизведении,
PositionMax - продолжительность трека, оба параметра в секундах.

Да, я понял это. Но я не могу справиться с математической частью

[Black_AVP_Bim]

.... Но я не могу справиться с математической частью

Если поделить Position / PositionMax, получим тот же прогресс, только в диапазоне 0,000 ... 1,000 и более высокой точностью. Таким образом можно рассчитать координаты WaveForm.

[Offworld]

Спасибо за объяснение. Но это я тоже делал. Я пытаюсь сказать, что я смутно представляю, что именно делать дальше. Чтобы исправить это, я хотел посмотреть, какие числа стоят за этими значениями в режиме реального времени, используя IntToStr, но и эта идея пошла наперекосяк. Взгляните, если есть время, пожалуйста.

как через EventHandler переключить  OperatorCounter?

Я имею в виду что-то вроде Value+1

[Offworld]

Прикольная штука но, бесполезна если нужно что бы объект от которого отслеживается позиция мыши, должен быть недоступен для кликов мыши и если внутри этого объекта есть другие объекты которые должны быть кликабельны.

В 4.60.2153 работает для Playlist.

Но вопросы, всё же, лучше задавать в вышеупомянутой теме, дабы и эта тема не превратилась в свалку.

[svist0plas]

Возможно ли обложку альбома отобразить не строго вертикально, а скажем нестандартно - под наклоном с произвольным углом???

[Artem]

Нет

[yevgeny]

Как в случае с "case State of" правильно прописать смену текстуры для двух объектов одновременно?

procedure Execute(var State: Integer);
var   
  P1, P2: TComponent;

begin   
  P1:= FindObject('Panel_1');
  P2:= FindObject('Panel_1');

  case State of   
  0:     
    P1.Set('Skin.ID', 'Skin.Texture.0');
  1:     
    P1.Set('Skin.ID', 'Skin.Texture.1');
  2:     
    P1.Set('Skin.ID', 'Skin.Texture.2');                   
  end;                                       
end;

А здесь правильно?
Попробовал, работает.
Вот и поговорил сам с собой.

1. Перед созданием темы пользуйтесь поиском/головой.

Вот чего человечеству недостает.

[Black_AVP_Bim]

procedure Execute(var State: Integer);
var   
  P1, P2: TComponent;

begin   
  P1:= FindObject('Panel_1');
  P2:= FindObject('Panel_1');

  case State of   
  0:     
    P1.Set('Skin.ID', 'Skin.Texture.0');
  1:     
    P1.Set('Skin.ID', 'Skin.Texture.1');
  2:     
    P1.Set('Skin.ID', 'Skin.Texture.2');                   
  end;                                       
end;

Переменная P2 лишняя, нигде не используется.
В конкретном случае можно проще:

procedure Execute(var State: Integer);
begin   
  FindObject('Panel_1').Set('Skin.ID', 'Skin.Texture.' + IntToStr(State));
end;