» Autoplay Media Studio

GOOSE
Наткнулся сейчас на интересный пример с ini-файлом для WMP-плагина (www.amsuser.com/ams/examples/INI-AMS6-Intrigued.apz)
Там, по-моему, есть зацепка на подгрузку плейлиста не с первой строки, а с указанной.

В Page.OnShow есть строки:

Код: MediaPlayer.Load("Plugin1", INIFile.GetValue("AutoPlay\\Docs\\test.ini", "playlist", "File1"))
MediaPlayer.Play("Plugin1")

У меня следующая задача, которую не могу выполнить. Задача динамического характера. На форме имеется следующие объекты:
Image1
Button1
Paragraph1
Label1
ListBox1

Надо из списка ListBox1 выбирать строки по которым информация будет даваться на следующие объекты формы - Image1,Button1,Paragraph1,Label1.

Возьмем пример: Выбираем строку на программу из списка ListBox1 -
Image1 - рисунок программы
Button1 - установка программы
Paragraph1 - описание программы
Label1 - сайт разработчика.
Ссылку на label1 выдает, но теперь надо и на остальные.

В глобальном(на форме) на вкладке On Show описано следующее:

Код: tFruits = TextFile.ReadToTable("AutoPlay\\Docs\\fruits.txt");

for index,fruit in tFruits do

nPipePos = String.Find(fruit, "|", 1, false);
sWebAddress = String.Mid(fruit, nPipePos+1, -1);
sFruitName = String.Left(fruit, nPipePos+1);

ListBox.AddItem("ListBox1", sFruitName, sWebAddress);

end;

Drusus

Цитата:

как указать относительные пути для данного случая? С SourceFolder экспериментировал, что-то никак не выходит.

А где физически лежат файлы? И что указывал, когда не получилось?

Andrwxw
..вот я удивляюсь, ребят... вы свои посты читаете после написания?
Вот лично я нифига не понял! Какие данные нужно передавать в твои объекты? Ты привел то, что ты хочешь сделать.
Например: "Image1 - рисунок программы" - передавай путь к скиншоту
Button1 - установка программы - передавай путь к установочному файлу
Paragraph1 - описание программы - соответственно, вывод текстового описания, можно из файла
Label1 - сайт разработчика - передается URL.
А тот код, который ты приводишь, взят из примера БЕЗ ИЗМЕНЕНИЙ!
Ты хочешь, чтобы тебе написали авторан для сборника софта? Так тут это не принято А твой постскриптум я вообще не понял, извини...

Половину из заявленного тобой функционала я разжевал в примере к своей статье. Думаю, что ты ее не читал... Начни с нее, если будут вопросы - обращайся по ходу, мы поможем обязательно.

Да, все правильно из примера. Но дальше не могу сделать, так как в первые столкнулся с этой программой. Я сторался объяснить по максимому, но...
Софт я взял для примера, это авторан для игр с консоли для удобства.


Добавлено:
GOOSE, я на твоем сайте еще не был. Я посмотрю что там и потом постараюсь более конкретный вопрос задать. Надеюсь, мне помогут.

Andrwxw
Авторан тут в теме обсуждали не раз, и примеры выкладывали.
Если новичек, то наверное, не стоит сразу замахиваться на сложные задачи... Попробуй начать с простых, для того, чтобы понять идеологию скриптов АМС.
А мы поможем, чем сможем

Возможно плохо искал, но на эту тему я примеров не нашёл:
Очень нужно да и возможно ли как-то запретить выход по сочетанию клавищ Alt+F4 ?
Что надо прописать чтобы отключить или убрать ненужные кнопки на панели загаловка(свернуть, развернуть) ?
Заранее блогодарен!

Цитата:

Наткнулся сейчас на интересный пример с ini-файлом для WMP-плагина (www.amsuser.com/ams/examples/INI-AMS6-Intrigued.apz)

Подскажите плизз,долго думал все никак разобраться немогу.Как можно в этом примере вывести данные из ini в листбокс и уже отсюда управлять ими(к примеру запустить файл,или воспроизвести музыку видео)...похожий пример находил но там только считывается текст и по команде выводится в параграф(это оказалось совсем не то)

oumser

Цитата:

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

Для этого примера работает следующее:

Код: testing = INIFile.GetValue("AutoPlay\\Docs\\test.ini","playlist", "File1");
result = ListBox.AddItem("ListBox1", "testing", "");

bratanes

Цитата:

Очень нужно да и возможно ли как-то запретить выход по сочетанию клавищ Alt+F4 ?

На On Key страницы:

Код: if (e_Modifiers.alt) then
    if (e_Key == 115) then
        -- здесь можно какой-нидь код написать по нажатию Alt+F4, а можешь и не писать
    end
end

Цитата:

(www.amsuser.com/ams/examples/INI-AMS6-Intrigued.apz)

Насчет этого примера:
Добавил две строки File1 и File2 (2 песни с разными путями)...в double-clicke Listbox1 добавил следущее

LB = "ListBox1";
-- Get the selected items
tSelected = ListBox.GetSelected(LB);

-- Because we are not allowing multiple select in the
-- ListBox object, we are only concerned with tSelected[1]

if tSelected then
    -- There is an item selected, get the data!
    sFileName = ListBox.GetItemText(LB, tSelected[1]);
    sFileToOpen = ListBox.GetItemData(LB, tSelected[1]);
    
    -- Load the audio File
MediaPlayer.Load("Plugin1",sFileToOpen);

-- Play the audio File
MediaPlayer.Play("Plugin1");

    

else
    -- Display an error message
    -- Dialog.Message("Error", "There is no item selected.");
end

Проблема в том что какую бы item не выбрал все время загружается File1...я вот думаю как бы при клике в Listbox1 соответствующий путь файла брался из ini

Я лично в 7 версии не вижу ничего нового глобально!
напхали плагинья и всё! и ради этого выпускать новую версию...

Мдя всётаки странные они немного...

ИМХО: Радует что не придёться теперь чекбоксы рисовать)))

oumser
Создай файл Test.ini примерно с таким содержанием:

Код: [playlist]
File1="\Autoplay\Videos\video1.avi"
File2="\Autoplay\Videos\video2.avi"
File3="\Autoplay\Videos\Magnolia.mpg"

Zloy_Gelud

Цитата:

testing должен быть без кавычек

Ну да, разумеется. Писал ночью, да после корпоративной вечеринки
Спасибо за относительные пути!

Zloy_Gelud
Спасибо!

На счёт -
Цитата:

Что надо прописать чтобы отключить или убрать ненужные кнопки на панели загаловка(свернуть, развернуть) ?

- я бы тут уточнил немного, вооще-то надо их отключить да лучше будет убрать, но при этом не меняя стиль и не меняя панель загаловка типа как на примере:

...и типа:

Просматриваю различные примеры с медиаплеерами. Чаще всего после команды MediaPlayer.Load или Video.Load идёт MediaPlayer.Play (Video.Play). Не могу понять, какой в этом особый смысл, если через .Load всё прекрасно загружается и тут же воспроизводится?
--------
Блин, всё элементарно. Сам сообразил.
Это на случай, если в плагине или видео-объекте отключено автоматическое воспроизведение при загрузке.

Zloy_Gelud
А как чтобы песня продолжалась играть при переходе на следущую страницу с global не получается, в on show прописан этот код

MediaPlayer.Load("Plugin1", INIFile.GetValue("AutoPlay\\Docs\\test.ini", "playlist", ""))
MediaPlayer.Play("Plugin1") его надо

И еще автовоспроизведение работает только если в ini написан соотв код, несмотря на вкл функцию в плагине и прописаных кодах на страницах

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

Код: MediaPlayer.Load("Plugin1", INIFile.GetValue("AutoPlay\\Docs\\test.ini", "playlist", ""))
MediaPlayer.Play("Plugin1")

Ребя, у меня такая проблема:

Моя программа сидит в трее и через определённое время выполняет определённое действие
(не буду подробно описывать дабы не нагружать). Проблема в том, что при выполнении этого действия программа как-бы перетягивает фокус на себя и делает любое активное окно неактивным. (допустим я сижу в браузере, печатаю текст, а при срабатывании программы активность с окна браузера убирается, нужно опять щёлкать) !!!

Как можно этого избежать? Можно ли как-нибудь вернуть назад активность окну?

Буду рад, если tavria2 уделить мне чуточку своего времени ))

servint

Цитата:

Проблема в том, что при выполнении этого действия программа как-бы перетягивает фокус на себя и делает любое активное окно неактивным.

Что за действие? Манипуляция с окнами? Подробнее...

Цитата:

этот плагин не умеет воспроизводить песни, а ток *.mpg и *.wmv...так для чего он?

Ничего подобного! Он воспроизводит все типы файлов, который берёт системный WMP. Сейчас дал ему для поиска список расширений:
"*.dat","*.avi","*.mpg","*.wmv","*.asf","*.mov","*.flv","*.3gp","*.mpeg","*.mp3","*.wav","*.wma","*.mid","*.ogg"
плагин спокойно вопроизвёл все, кроме ogg, но у меня ogg и системный WMP не открывает.
Так что наезды по-поводу его низкой всеядности необоснованы , а вот по-поводу кривизны реализации функций - это да, дайте мне автора на растерзание!

Zloy_Gelud

Цитата:

и тем более этот плагин не умеет воспроизводить песни

Прекрасно воспроизводит mp3, только путь+имя файла нужно указывать вручную, а не через встроенный диалог выбора файлов.

Добавлено:
Drusus
Сорри, за дубль. Пока я писал, ты уже ответил.

Цитата:

Прекрасно воспроизводит mp3, только путь+имя файла нужно указывать вручную, а не через встроенный диалог выбора файлов

Через диалог тоже работает. См. пример http://www.azman.info/ams/MyMediaPlayer3.apz

Drusus

Цитата:

Через диалог тоже работает. См. пример...

Ты меня не так понял, я имел ввиду диалог выбора файлов встроенный в действия:
MediaPlayer.Load
Audio.Load

Ну и это не проблема, обходится правкой файла _res_types.xml, находящегося:
C:\Program Files\AutoPlay Media Studio 6.0\Data\.
Это файл содержит список форматов, которые поддерживает AMS.

AMS поддерживает формат mp3 издавна, просто из-за нарушения лицензионного соглашения, разработчики AMS вынуждены были отказаться от него, путем исключения его из списка поддерживаемых форматов.

Drusus, tavria2 -- точно не обоснованы, сорри, что не проверив ляпнул..

Zloy_Gelud
Кароче мне надо чтобы треки загруженные в wmp через ini, были как бы фоновыми с автовоспроизведением при загрузке проекта(не зависимы от перехода на страницы).Этот код получается

Цитата:

tValueNames = INIFile.GetValueNames("AutoPlay\\Docs\\test.ini", "playlist");
if (tValueNames) then
for n, sValueName in tValueNames do
sValue = INIFile.GetValue("AutoPlay\\Docs\\test.ini", "playlist", sValueName);
if (sValue ~= "") then
tPaths = String.SplitPath(sValue);
ListBox.AddItem("ListBox1", tPaths.Filename..tPaths.Extension, sValue);
end
end
end

только добавляет строки из ini, но связи же нету с wmp плагином, поэтому в show страницы я добавил:
MediaPlayer.Load("Plugin1", INIFile.GetValue("AutoPlay\\Docs\\test.ini", "playlist", ""))
MediaPlayer.Play("Plugin1")...вот тут как раз и есть ошибка, при переходе на страницу заново загружается данный код,а без него треки не загружаютсяв wmp....что мне делать?

Люди такую штуку хочу сделать, если приложение ( игра) не установлена, то в авторане есть кнопка - "Установить", если установлена, то вместо нее - "Играть" . Можно так сделать?

Andrey_Wlodimirovich
Легко..проверяй наличие записи в реесте, если запись присутствует (т.е. игра установлена), то меняй текст кнопки на "Играть":

Код: Button.SetText("Button1", "Играть");

И еще никак не моуг сообразить .. Допустим когда я делаю Параграф, появляется зона с текстом и с ползунком прокрутки если текст не вмещается, а я хочу сделать в границах окна авторана, тоже зону но чтоб там было и изображения и текст и тоже при необходимости ползунок прокрутки ..

oumser
А использование WMP обязательно?..может быть проще было бы использовать действия Audio? Если WMP не обязателен, то как вариант так:
На On Preload страницы:

Код: n = 1;
tValueNames = INIFile.GetValueNames("AutoPlay\\Docs\\test.ini", "Playlist");
    if (tValueNames) then
        Audio.Load(CHANNEL_BACKGROUND, _SourceFolder..INIFile.GetValue("AutoPlay\\Docs\\test.ini", "Playlist", tValueNames[n]), true, false);
    end

Здравствуйте.. у меня вопрос .
Я пытаюсь создать авто ран для диска с заархивированными архивами чтоб проще было востанавливать нужные мне данные. при этом столкнулся с небольшой проблемой
для изорхивации использую код кнопки:

Код: Zip.Extract("AutoPlay\\Docs\\MyZip.zip", {"*.*"}, "C:\\My Folder", true, true, Dialog.PasswordInput("Запрос архива", "Введи пароль:", MB_ICONQUESTION))