PCCar.ru - Ваш автомобильный компьютер

Вернуться   PCCar.ru - Ваш автомобильный компьютер > MP3Car ТехИнфа > Разработка программ > Программы управления > iCarDS

Ответ
 
Опции темы Поиск в этой теме
Старый 01.12.2014, 09:22   #581
Bersenev
Бывалый писикарщик
 
Аватар для Bersenev
 
Регистрация: 23.04.2009
Возраст: 53
Город: Ставрополь
Регион: 26
Машина: Opel Zafira 2007
Сообщений: 5,275
Bersenev has a brilliant futureBersenev has a brilliant futureBersenev has a brilliant futureBersenev has a brilliant futureBersenev has a brilliant futureBersenev has a brilliant futureBersenev has a brilliant futureBersenev has a brilliant futureBersenev has a brilliant futureBersenev has a brilliant futureBersenev has a brilliant future
По умолчанию

Цитата:
Сообщение от Lexins Посмотреть сообщение
Как применить такой же алгоритм, как при ручной регулировке громкости?
Вроде удалось исправить, правда я не гарантирую что в результате не сломается что то другое, поэтому надо тестировать https://cloud.mail.ru/public/140ddad...S_1_7_0_54.rar
Bersenev вне форума   Ответить с цитированием
Старый 01.12.2014, 12:40   #582
Lexins
Старший Пользователь
 
Регистрация: 05.02.2014
Возраст: 41
Город: Москва
Регион: 77, 97, 99, 177
Машина: Kia Cerato
Сообщений: 139
Lexins has a spectacular aura aboutLexins has a spectacular aura aboutLexins has a spectacular aura about
По умолчанию

Цитата:
Сообщение от Bersenev Посмотреть сообщение
Вроде удалось исправить, правда я не гарантирую что в результате не сломается что то другое, поэтому надо тестировать https://cloud.mail.ru/public/140ddad...S_1_7_0_54.rar
Проверил, действительно работает, буду тестировать дальше.
Огромное Спасибо.
Lexins вне форума   Ответить с цитированием
Старый 09.12.2014, 19:26   #583
Lexins
Старший Пользователь
 
Регистрация: 05.02.2014
Возраст: 41
Город: Москва
Регион: 77, 97, 99, 177
Машина: Kia Cerato
Сообщений: 139
Lexins has a spectacular aura aboutLexins has a spectacular aura aboutLexins has a spectacular aura about
По умолчанию

Есть ли возможность прикрутить к фабару полоску, которая показывает длину трека, как в стандартном муз.плеере (пометил красным на скрине)
Lexins вне форума   Ответить с цитированием
Старый 10.12.2014, 23:49   #584
macarych
Старший Пользователь
 
Регистрация: 12.07.2013
Возраст: 58
Регион: 63, 163
Сообщений: 211
macarych has a reputation beyond reputemacarych has a reputation beyond reputemacarych has a reputation beyond reputemacarych has a reputation beyond reputemacarych has a reputation beyond reputemacarych has a reputation beyond reputemacarych has a reputation beyond reputemacarych has a reputation beyond reputemacarych has a reputation beyond repute
По умолчанию

Цитата:
Сообщение от Lexins Посмотреть сообщение
Есть ли возможность прикрутить к фабару полоску, которая показывает длину трека, как в стандартном муз.плеере (пометил красным на скрине)
Сначала Вы просите от нее избавится, потом вернуть обратно...

Код:
//7 inch v4.5.for iCar by macarych

$set_ps_global(color3,225-150-20)
$set_ps_global(color2,96-96-96)
$set_ps_global(color0,60-60-60)
$set_ps_global(color4,225-150-20-60)
$set_ps_global(color5,225-150-20-40)
$set_ps_global(color1,$if(%isplaying%,$if(%ispaused%,%color2%,%color4%),%color2%))
$set_ps_global(color6,$if(%isplaying%,$if(%ispaused%,%color2%,%color3%),%color2%))
//
$set_ps_global(xp1,15)
$set_ps_global(yp,15)
$set_ps_global(wp,$sub(%ps_width%,30))
$set_ps_global(hp,$sub(%ps_height%,85))
$set_ps_global(img_path1,%ps_foobar2000_path%\themes\off)
$set_ps_global(img_path2,%ps_foobar2000_path%\themes\on)
$set_ps_global(img_path,$if(%isplaying%,$if(%ispaused%,%img_path1%,%img_path2%),%img_path1%))
$set_ps_global(rs,$sub(%ps_width%,%ps_height%))
//
$fillrect(0,0,%ps_width%,%ps_height%,60-60-60)
$drawimage(5,5,$sub(%ps_width%,10),$sub(%ps_height%,65),%img_path%\bg.png,nokeepaspect,,)
//
$textbutton(0,0,1,1,,,COMMAND:Help/About)
//
//$imagebutton(5,$sub(%ps_height%,55),50,50,%img_path%\3n.png,%img_path%\3h.png,COMMAND:Playback/Previous)
//$if(%isplaying%,
//    $if(%ispaused%,
//    $imagebutton(75,$sub(%ps_height%,55),50,50,%img_path%\4n.png,%img_path%\4h.png,COMMAND:Playback/Play or pause),
//    $imagebutton(75,$sub(%ps_height%,55),50,50,%img_path%\5n.png,%img_path%\5h.png,COMMAND:Playback/Play or pause)),
//   $imagebutton(75,$sub(%ps_height%,55),50,50,%img_path%\4n.png,%img_path%\4h.png,COMMAND:Playback/Play or pause)
//)
//$imagebutton(145,$sub(%ps_height%,55),50,50,%img_path%\6n.png,%img_path%\6h.png,COMMAND:Playback/Next)
//
$if($isvisible_c(main_panel_1),
    $imagebutton($sub(%ps_width%,125),$sub(%ps_height%,55),50,50,%img_path%\7n.png,%img_path%\7h.png,PANELSHOW:main_panel_1:0;PANELSHOW:main_panel_3:0;PANELSHOW:main_panel_2:1;REFRESH),
    $if($isvisible_c(main_panel_2),
    $imagebutton($sub(%ps_width%,125),$sub(%ps_height%,55),50,50,%img_path%\71n.png,%img_path%\71h.png,PANELSHOW:main_panel_1:0;PANELSHOW:main_panel_2:0;PANELSHOW:main_panel_3:1;REFRESH),
    $imagebutton($sub(%ps_width%,125),$sub(%ps_height%,55),50,50,%img_path%\72n.png,%img_path%\72h.png,PANELSHOW:main_panel_2:0;PANELSHOW:main_panel_3:0;PANELSHOW:main_panel_1:1;REFRESH)
    )
)
//
$if($isvisible_c(toolbar_1),
    $imagebutton($sub(%ps_width%,195),$sub(%ps_height%,55),50,50,%img_path%\8n.png,%img_path%\8h.png,PANELSHOW:toolbar_1:0;PANELSHOW:toolbar_3:0;PANELSHOW:toolbar_2:1;REFRESH),
    $if($isvisible_c(toolbar_2),
    $imagebutton($sub(%ps_width%,195),$sub(%ps_height%,55),50,50,%img_path%\55n.png,%img_path%\55h.png,PANELSHOW:toolbar_1:0;PANELSHOW:toolbar_2:0;PANELSHOW:toolbar_3:1;REFRESH),
    $imagebutton($sub(%ps_width%,195),$sub(%ps_height%,55),50,50,%img_path%\19n.png,%img_path%\19h.png,PANELSHOW:toolbar_2:0;PANELSHOW:toolbar_3:0;PANELSHOW:toolbar_1:1;REFRESH)
    )
)
$imagebutton($sub(%ps_width%,55),$sub(%ps_height%,55),50,50,%img_path%\1n.png,%img_path%\1h.png,COMMAND:View/Popup Main Menu)
//
$movepanel_c(main_panel_1,%xp1%,%yp%,%wp%,%hp%)
$movepanel_c(main_panel_2,%xp1%,%yp%,%wp%,%hp%)
$movepanel_c(main_panel_3,%xp1%,%yp%,%wp%,%hp%)
$movepanel_c(toolbar_1,5,$sub(%ps_height%,55),$sub(%ps_width%,220),50)
$movepanel_c(toolbar_2,5,$sub(%ps_height%,55),$sub(%ps_width%,220),50)
$movepanel_c(toolbar_3,5,$sub(%ps_height%,55),$sub(%ps_width%,220),50)
будет вот так

Последний раз редактировалось macarych; 16.03.2015 в 20:50.
macarych вне форума   Ответить с цитированием
Старый 11.12.2014, 00:35   #585
Lexins
Старший Пользователь
 
Регистрация: 05.02.2014
Возраст: 41
Город: Москва
Регион: 77, 97, 99, 177
Машина: Kia Cerato
Сообщений: 139
Lexins has a spectacular aura aboutLexins has a spectacular aura aboutLexins has a spectacular aura about
По умолчанию

Цитата:
Сообщение от macarych Посмотреть сообщение
Сначала Вы просите от нее избавится, потом вернуть обратно...
будет вот так
Это не одно и тоже, хочется стандартную полоску икара
Lexins вне форума   Ответить с цитированием
Старый 11.12.2014, 01:10   #586
macarych
Старший Пользователь
 
Регистрация: 12.07.2013
Возраст: 58
Регион: 63, 163
Сообщений: 211
macarych has a reputation beyond reputemacarych has a reputation beyond reputemacarych has a reputation beyond reputemacarych has a reputation beyond reputemacarych has a reputation beyond reputemacarych has a reputation beyond reputemacarych has a reputation beyond reputemacarych has a reputation beyond reputemacarych has a reputation beyond repute
По умолчанию

ОК. Будет время - сделаю такой вариант: 2 окна (если без стрелок), отображаются поочередно, 1 - плейлист и снизу (или сверху) тонкая полоска прогресса проигрывания, 2 - библиотека и прогресс (3 - если нужно, стрелки) и никаких кнопок. Клик по прогрессу меняет, циклом, плейлист и библиотеку.
Обращаюсь ко всем - делать? будет это удобно в использовании?
macarych вне форума   Ответить с цитированием
Старый 11.12.2014, 08:24   #587
Lexins
Старший Пользователь
 
Регистрация: 05.02.2014
Возраст: 41
Город: Москва
Регион: 77, 97, 99, 177
Машина: Kia Cerato
Сообщений: 139
Lexins has a spectacular aura aboutLexins has a spectacular aura aboutLexins has a spectacular aura about
По умолчанию

macarych, Вы меня не так поняли. Мой вопрос не касается сборки фубара, меня полностью устраивает ее внешний вид в данный момент. Хотелось бы прикрутить прогрессбар iCar'a, если есть такая возможность. Надеюсь разработчики нас слышат;
Lexins вне форума   Ответить с цитированием
Старый 11.12.2014, 12:30   #588
Bersenev
Бывалый писикарщик
 
Аватар для Bersenev
 
Регистрация: 23.04.2009
Возраст: 53
Город: Ставрополь
Регион: 26
Машина: Opel Zafira 2007
Сообщений: 5,275
Bersenev has a brilliant futureBersenev has a brilliant futureBersenev has a brilliant futureBersenev has a brilliant futureBersenev has a brilliant futureBersenev has a brilliant futureBersenev has a brilliant futureBersenev has a brilliant futureBersenev has a brilliant futureBersenev has a brilliant futureBersenev has a brilliant future
По умолчанию

Цитата:
Сообщение от Lexins Посмотреть сообщение
Есть ли возможность прикрутить к фабару полоску, которая показывает длину трека, как в стандартном муз.плеере (пометил красным на скрине)
В икаре есть возможность создать свой показатель (label) и на основе его сделать слайдер. Допустим показатель будет !foobar_trackpos, тогда слайдер будет выглядеть так

S,228,93,566,10,212,55,600,55,,01,,10,"Label;!foob ar_trackpos;0;100;1",""

Задать значение показателя можно командой SetLabel;!foobar_trackpos;50

Для передачи значения показателя из фубара в икар есть такие варианты:

1. Скрипт AutoIt, но в этом случае слайдер или значение позиции должно быть в окне фубара. Примерно как реализован скрипт SkinMediaTitle.exe

2. Компонент фубара, который передаёт данные в икар, в этом случае можно передавать в икар всё что угодно, а не только позицию трека.
Bersenev вне форума   Ответить с цитированием
Старый 11.12.2014, 14:15   #589
Lexins
Старший Пользователь
 
Регистрация: 05.02.2014
Возраст: 41
Город: Москва
Регион: 77, 97, 99, 177
Машина: Kia Cerato
Сообщений: 139
Lexins has a spectacular aura aboutLexins has a spectacular aura aboutLexins has a spectacular aura about
По умолчанию

Цитата:
Сообщение от Bersenev Посмотреть сообщение
Задать значение показателя можно командой SetLabel;!foobar_trackpos;50
Можно, пжл, поподробнее, как выполнить это действие?
Lexins вне форума   Ответить с цитированием
Старый 11.12.2014, 14:59   #590
Bersenev
Бывалый писикарщик
 
Аватар для Bersenev
 
Регистрация: 23.04.2009
Возраст: 53
Город: Ставрополь
Регион: 26
Машина: Opel Zafira 2007
Сообщений: 5,275
Bersenev has a brilliant futureBersenev has a brilliant futureBersenev has a brilliant futureBersenev has a brilliant futureBersenev has a brilliant futureBersenev has a brilliant futureBersenev has a brilliant futureBersenev has a brilliant futureBersenev has a brilliant futureBersenev has a brilliant futureBersenev has a brilliant future
По умолчанию

Цитата:
Сообщение от Lexins Посмотреть сообщение
Можно, пжл, поподробнее, как выполнить это действие?
Если речь про AutoIt, то вот исходник SkinMediaTitle.au3, а если про компонент для фубара, то всё зависит от того на чём его писать.

Код:
_Main()

Func _Main()

    $rr = ObjCreate("RideRunner.sdk")

    Global $IsWork = 1    ; Ключ цикла, выполнять пока равно 1
    Global $IsRun = 0    ; Ключ запуска окна, если 0 окно ещё не найдено

    Global $name = ""    ; Имя окна, которое необходимо перехватить
    Global $namecontrol = ""    ; Имя окна, которое необходимо перехватить
    Global $FoobarWindowTitlePrev=""

    If $CmdLine[0] = 0  Then
        $IsWork = 0
    Else
        If $CmdLine[0] > 0  Then $name = $CmdLine[1]
        EndIf


    While $IsWork

        Opt("WinTitleMatchMode", 2)

        $handle = WinGetHandle($name)     ; Ищем окно с заданным именем
        If @error Then
            If $IsRun Then
                $IsWork = 0
            EndIf ; если окно не найдено, а ключ запуска окна установлен в 1, т.е. окно закрыто, то сбросить ключ выхода для завершения скрипта
        Else
            $IsRun = 1    ; если окно найдено устанавливаем ключ запуска окна
            $FoobarWindowTitle = WinGetTitle($handle)
            $FoobarWindowTitlePrev = $rr.getinfo("=$CurrentSkinMediaTitle$")
            If $FoobarWindowTitlePrev <> $FoobarWindowTitle Then $rr.Execute("SETVAR;CurrentSkinMediaTitle;" & $FoobarWindowTitle)
             $FoobarWindowTitlePrev = $FoobarWindowTitle
        EndIf


         $state = WinGetState($name, "")
         If BitAnd($state, 2) Then
            $CurrentApp = $rr.getinfo("=$CurrentApp$")
            $SkinMediaId = $rr.getinfo("=$SkinMediaId$")
            $SkinMediaN = $rr.getinfo("=$SkinMedia" & $SkinMediaId & "$")

             If $CurrentApp <> $SkinMediaN Then
                $rr.Execute("Activate;iCar DS")
            EndIf
         EndIf

        Sleep(500)
    WEnd
EndFunc   ;==>_Main
Bersenev вне форума   Ответить с цитированием
Ответ


Здесь присутствуют: 13 (пользователей: 0 , гостей: 13)
 

Ваши права в разделе
Вы не можете создавать новые темы
Вы не можете отвечать в темах
Вы не можете прикреплять вложения
Вы не можете редактировать свои сообщения

BB коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.



Часовой пояс GMT +4, время: 03:56.


Работает на vBulletin® версия 3.8.4.
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Перевод: zCarot