Перейти из форума на сайт.

НовостиФайловые архивы
ПоискАктивные темыТоп лист
ПравилаКто в on-line?
Вход Забыли пароль? Первый раз на этом сайте? Регистрация
Компьютерный форум Ru.Board » Компьютеры » Программы » Indigo Rose AutoPlay Media Studio (часть 2)

Модерирует : gyra, Maz

Widok (30-01-2009 12:11): Лимит страниц. Продолжаем здесь.  Версия для печати • ПодписатьсяДобавить в закладки
Страницы: 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102

   

Widok



Moderator-Следопыт
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
AutoPlay Media Studio часть 2 (часть 1)


Параллельная тема в Варезнике - поиск и обсуждение дополнений и ритейл версий


Где почитать:

Для начала читаем статьи: тут раз или тут раз и два и три
Скриптовый язык LUA (англ) На русском здесь,  еще тут и  тут
Видео-уроки (анг)  
Видео-уроки на YouTube (англ)
Где поживиться:

Видео-уроки (Flash) от производителя (англ)
Тоже официальное видео (англ)
Бесплатные шаблоны (маски) для окон ваших приложений (англ)
"Подарки к Рождеству" на оффсайте (англ)
Плагин LuaCOM (англ)
Примеры для начинающих (англ)
Неплохие примеры, библиотеки (англ)
Еще примеры, один из самых активных юзеров на оффоруме (англ)
Плагины и библиотеки (не все free) (англ)
Еще плагины (англ)
Собрание уроков (иногда с русскими объяснениями)
Где найти ответы на вопросы:

Виды путей, используемых в AMS от GOOSE
Включение\отключение фоновой музыки кнопкой
Вывод HTML отчета с использованием SQLite плагина от IndigoRose
Выделение и копирование в буфер текста\части текста от GOOSE
Для тех, у кого русский проект с "кракозяблами"
Запуск WinRAR'a для распаковки архивов от Reineke
Запуск файлов из Web объекта
Запускаем экзешник по информации из реестра от Lexua
Пример бегущей строки (более красивый способ) от tavria2
Из окна в полноэкранный режим и обратно
Изменяем иконку приложения от Lexua
Изменяем курсор в приложении от GOOSE
Изменяем скроллинг ListBox-у от GOOSE
Используем таймер
Отправка данных из форм по e-mail от GOOSE
Перенос строки во всплывающей подсказке от GOOSE
Альтернативный перенос строки для текста (подходит и для *.ini) от Zloy_Gelud
Показ\скрытие объектов по действиям мыши
Полноэкранный режим для приложения
Последовательный запуск нескольких файлов
Проблема с путями при создании приложения .EXE и ресурсами на CD от Reineke
Проигрвывание MP3 из ListBox-а подряд от UMode
Простой пример бегущей строки от GOOSE
Работаем с запароленными архивами от GOOSE
Работаем с объектом дерева от GOOSE
Ряд вопросов и ответов по созданию меню для DVD от tavria2
Реализация Play-листов для Винампа от BOObastis
Таблица дисков системы от Lexua
Утилита для защиты авторанов
Шапка исправлена. Актуально на 20.08.2008 © NightW0lf

Разработчиков autorun'ов и графических дизайнеров приглашаем посетить проект шаблонов для Autoplay Media Studio:
http://ams-templates.com

 
Список выявленных проблем в AMS 7.0

Всего записей: 24190 | Зарегистр. 07-04-2002 | Отправлено: 23:07 03-09-2007 | Исправлено: Maz, 12:31 25-09-2017
SNata



Junior Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Народ кто может помощь завис с проблемой
Надо кароч функция которая будет сканировать файлы с расширением *.lnk и выводить их в меню, а при выборе меню запускать. Чото оно у меня выдаёт тока первый и всё помогите кто может напишите я хочу понять где натупил.

Всего записей: 66 | Зарегистр. 25-11-2006 | Отправлено: 18:24 28-03-2008
Zloy_Gelud



Silver Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Sprintstar

Цитата:
if Registry.GetValue(HKEY_CURRENT_USER,"Software\\Fox Interactive\\The X-Files\\Preferences","3D Sound","1",REG_DWORD) then  
Image.Load("blank", "AutoPlay\\Images\\Yes.png");  
else  
Image.Load("blank", "AutoPlay\\Images\\No.png");  
end

Ето вапще жесть..))..непонятно как ты читаешь Ман, что пишешь бред такой?!
Вот те правильный кодинг..разберись пожалста =)

Код:
-- статус воспроизведения звука (включен/выключен)
sMuteState = Registry.GetValue(HKEY_CURRENT_USER,"Software\\Fox Interactive\\The X-Files\\Preferences","3D Sound", false);
-- если включен звук
if (sMuteState == "1") then
    Image.Load("blank", "AutoPlay\\Images\\Yes.png");
-- если выключен звук
elseif (sMuteState == "0") then
    Image.Load("blank", "AutoPlay\\Images\\No.png");
end


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

Ну можно конечно и самому создать..образцы изображений вырежи из каких-нить приложений..


SNata
А чем File.Run не подходит?

Всего записей: 3273 | Зарегистр. 30-05-2007 | Отправлено: 00:00 29-03-2008
SNata



Junior Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Ты не понял именно трабла с выводом меню, если ты можеш показать пример такой ф-и то плиз) а то уже голова пухнет

Всего записей: 66 | Зарегистр. 25-11-2006 | Отправлено: 01:42 29-03-2008
Zloy_Gelud



Silver Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
SNata
Я бы показал конечно, но что значит вывод в меню? Что такое "меню"? Листбокс что ли?
 
Добавлено:
В общем случае поиск файлов и вывод их в Листбокс выглядит так:

Код:
-- поиск файлов с расширением *.lnk
tFilePaths = File.Find(_DesktopFolder, "*.lnk", false, false, nil, nil);
-- если таблица существует
if (tFilePaths) then
    -- перебираем пути в цикле
    for n, sFilePath in tFilePaths do
        -- добавляем их Листбокс
        ListBox.AddItem("ListBox1", String.SplitPath(sFilePath).Filename..String.SplitPath(sFilePath).Extension, sFilePath);
    end
end
    


Всего записей: 3273 | Зарегистр. 30-05-2007 | Отправлено: 13:28 29-03-2008 | Исправлено: Zloy_Gelud, 14:11 29-03-2008
BOObastis



Member
Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
Подскажите пожалуйста, может кто знает, отправляю запрос на сервер методом пост:

Код:
HTTP.Submit('http://www.sofort-mail.de', {account='XXXXXX', Submit='Los!'}, SUBMITWEB_POST, 20, 80, nil, nil)

 
В результате получается что параметры запроса,  

Код:
{account='XXXXXX', Submit='Los!'}

передаются в разнобой.  
первым  

Код:
Submit='Los!'

вторым

Код:
account='XXXXXX'

 
Я так понимаю это связано вот с этим:

Цитата:
The reason for this is that internally the scripting engine doesn’t store tables as arrays, but in a super-efficient structure known as a hash table. (Don’t worry, I get confused about hash tables too.) The important thing to know is that when you define table elements, they are not necessarily stored in the order that you define or add them, unless you use a numeric array (i.e. a table indexed with numbers from 1 to whatever).

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

Всего записей: 242 | Зарегистр. 17-05-2004 | Отправлено: 15:07 29-03-2008 | Исправлено: BOObastis, 15:14 29-03-2008
SNata



Junior Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору

Цитата:
SNata  
Я бы показал конечно, но что значит вывод в меню? Что такое "меню"? Листбокс что ли?  
 
Добавлено:  
В общем случае поиск файлов и вывод их в Листбокс выглядит так:  
 
Код:-- поиск файлов с расширением *.lnk  
tFilePaths = File.Find(_DesktopFolder, "*.lnk", false, false, nil, nil);  
-- если таблица существует  
if (tFilePaths) then  
    -- перебираем пути в цикле  
    for n, sFilePath in tFilePaths do  
        -- добавляем их Листбокс  
        ListBox.AddItem("ListBox1", String.SplitPath(sFilePath).Filename..String.SplitPath(sFilePath).Extension, sFilePath);  
    end  
end  
     

Нет мне надо чтобы скан файлов выводился в выпадающее меню) сори что плохо обьяснил) в твоём примере ты забыл перед добавлением заблокировать листбокс) это черевато)
Сенкс ну есть можеш можеш написать код для этого же толдь ко чтоб оно формировало выпадающее меню  и выводило его)

Всего записей: 66 | Зарегистр. 25-11-2006 | Отправлено: 15:16 29-03-2008
Zloy_Gelud



Silver Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
SNata

Цитата:
это черевато)

А чем интересно ето чревато?. Вроде никто никогда не блокировал Листбокс перед добавлением фалов и проблем не наблюдали..

Цитата:
Сенкс ну есть можеш можеш написать код для этого же толдь ко чтоб оно формировало выпадающее меню  и выводило его)

Когда научимсо формулировать свои мысли? =)..Что такое выпадающее меню? Комбобокс? Если да , то так и надо было писать..
Вообщем, если выпад. меню - комбобокс, то что сложного подредактировать одну строчку в моем примере кода?

Всего записей: 3273 | Зарегистр. 30-05-2007 | Отправлено: 15:30 29-03-2008
SNata



Junior Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
не выпадающее оно и в африке выпадающее)))))))
PopupMenu так))))
 
Добавлено:
а по поводу листбокса блокировать за тем что если у тебя несколько ф-й обращаются к нему и записываю стирают) то может быть путаница)

Всего записей: 66 | Зарегистр. 25-11-2006 | Отправлено: 16:51 29-03-2008
Zloy_Gelud



Silver Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
SNata
 

Код:
-- создаем таблицу будующего меню
tMenu = {};
-- поиск файлов с расширением *.lnk
tFilePaths = File.Find(_DesktopFolder, "*.lnk", false, false, nil, nil);
-- если таблица существует
if (tFilePaths) then
    -- перебираем пути в цикле
    for n, sFilePath in tFilePaths do
        -- таблица пункта меню
        tMenu[n] = {};
        -- текст пункта
        tMenu[n].Text = String.SplitPath(sFilePath).Filename..String.SplitPath(sFilePath).Extension;
        -- ID пункта
        tMenu[n].ID = n;
        tMenu[n].Checked = false;
          tMenu[n].Enabled = true;        
    end
end

 
Так как ты не написал каким образом ты выводишь меню (при нажатии на какой-нить объект или место в проекте, или кнопку мыши и т.п.), то для примера - вывод контекстного меню при нажатии правой кнопки мыши и соответственно запуск файла при выборе пункта меню:
On Mouse Button

Код:
if (e_Type == RIGHT_BUTTON_DOWN) then
    nID = Application.ShowPopupMenu(e_X, e_Y, tMenu, TPM_LEFTALIGN, TPM_TOPALIGN, true, true);
    File.Open(tFilePaths[nID], "", SW_SHOWNORMAL);
end

Всего записей: 3273 | Зарегистр. 30-05-2007 | Отправлено: 11:11 30-03-2008 | Исправлено: Zloy_Gelud, 11:13 30-03-2008
samson1

Newbie
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Спасибо за подсказку - Rush. Да, пропустил. Но здесь для поиска ярлыков на Desktop' e, а если на рабочем столе и в меню программ не создавались ярлыки, получается, что поиск будет не корректным (хотя бы и по ярлыкам).
Но все равно спасибо, буду доробатывать, пора научиться работать мозгами, а не жить чужим трудом.

Всего записей: 6 | Зарегистр. 04-12-2006 | Отправлено: 15:32 30-03-2008
Zloy_Gelud



Silver Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
samson1
 

Цитата:
Но здесь для поиска ярлыков на Desktop' e, а если на рабочем столе и в меню программ не создавались ярлыки, получается, что поиск будет не корректным (хотя бы и по ярлыкам).

Это по моему примеру? ). Десктоп здесь в качестве примера, т.к. не обговаривалось какая папка должна сканироватсо на наличие ярлыков..
Если пишут, что

Цитата:
 функция которая будет сканировать файлы с расширением *.lnk и выводить их в меню

то я так думаю подразумевают существование ярлыков в опред. папке, которая и будет сканир-ся.

Цитата:
поиск будет не корректным

Это как? Если ярлыки не будут найдены то соответственно накакова контекст. меню не появитсо.

Всего записей: 3273 | Зарегистр. 30-05-2007 | Отправлено: 16:09 30-03-2008
SNata



Junior Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Огромное спасибо)
 
Добавлено:
Задам ещё одну задачку) может кто поможет давно уже немогу решить)
Вообщем давно хочу сделать такую штуку типа Слайдшоу но чтобы оно опять же ярлыки скинировало но помимо всего вместо картинки выводило иконку и по дабл клику запускался ярлык ну отсканить добавить поняткно а вот как  сделать ну переделывал я  плагин слайдшоу чтоб разрешить добавлять ярлыки но толку нету надо както добавить чтоб он иконку зацеплял. Вот. Если кто посоветует как вывести список ярлыков с иконками то буду очень благодарен)

Всего записей: 66 | Зарегистр. 25-11-2006 | Отправлено: 16:22 30-03-2008
GOOSE



Advanced Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Ребята... У меня "лыжи не едут"...
Хотел побыстрому сделать разбор XML данных с GisMeteo...
И не пойму... половина данных собирается, половина нет... Бред...
Парни, проверьте у себя! Может я чего то не то делаю?
 
--вот кусок эксэмэлки...

Код:
 
  <?xml version="1.0" ?>  
<MMWEATHER>
 <REPORT type="frc3">
  <TOWN index="26063" sname="%D1%E0%ED%EA%F2%2D%CF%E5%F2%E5%F0%E1%F3%F0%E3" latitude="60" longitude="30">
   <FORECAST day="30" month="3" year="2008" hour="15" tod="2" predict="18" weekday="1">
    <PHENOMENA cloudiness="3" precipitation="10" rpower="0" spower="0" />  
    <PRESSURE max="770" min="768" />  
    <TEMPERATURE max="4" min="2" />  
    <WIND min="3" max="6" direction="4" />  
    <RELWET max="98" min="93" />  
    <HEAT min="1" max="3" />  
   </FORECAST>
 

 
--вот так пытаюсь выбрать нужные данные

Код:
 
res_day = XML.GetAttribute ("MMWEATHER/REPORT/TOWN/FORECAST", "day");
res_month = XML.GetAttribute ("MMWEATHER/REPORT/TOWN/FORECAST", "month");
res_year = XML.GetAttribute ("MMWEATHER/REPORT/TOWN/FORECAST", "year");
res_hour = XML.GetAttribute ("MMWEATHER/REPORT/TOWN/FORECAST", "hour");
res_temp_min = XML.GetAttribute("MMWEATHER/REPORT/TOWN/FORECAST/TEMPERATURE", "min");
res_temp_max = XML.GetAttribute("MMWEATHER/REPORT/TOWN/FORECAST/TEMPERATURE", "max");
res_latitude = XML.GetAttribute("MMWEATHER/REPORT/TOWN", "latitude");
 

 
В итоге: день, месяц не парсится, часы парсятся... Температура и координаты тоже парсятся...
 
ЗЫ. Блин!!! Букву пропустил
Удалять не буду, может кому пригодится

----------
AutoPlay Media Studio по-русски!
Русский хелп AutoPlay Media Studio

Всего записей: 903 | Зарегистр. 17-10-2001 | Отправлено: 21:44 30-03-2008 | Исправлено: GOOSE, 21:51 30-03-2008
sttmaster



Advanced Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Народ помогите со скриптом...Образно говоря,после установки программы создается папка в директории C:\Program Files\New Folder (с тремя подпапками),в проекте в директории \CD_Root\AutoPlay\Docs имеется такая же \New Folder (с тремя подпапками),
НАДО, чтобы по нажатию на кнопку или же после установки самой проги папка из проекта с перезаписью заменила существующую C:\Program Files\New Folder....
 
В самой проге Ams 7.1.100 в скриптах моно сотворить такое...
 

Всего записей: 669 | Зарегистр. 29-08-2007 | Отправлено: 20:48 02-04-2008
Zloy_Gelud



Silver Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
sttmaster
 

Код:
File.Copy("AutoPlay\\Docs\\*.*", _ProgramFilesFolder.."\\", true, true, false, true, nil);


Всего записей: 3273 | Зарегистр. 30-05-2007 | Отправлено: 21:49 02-04-2008 | Исправлено: Zloy_Gelud, 22:08 02-04-2008
sttmaster



Advanced Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Спасибо..
 
Добавлено:

Цитата:
Zloy_Gelud

 
Извини что туплю....
 
File.Copy("AutoPlay\\Docs\\Templates", _ProgramFilesNeroNero8"\\", true, true, false, true, nil);
 
Правильно и впаривать в действия под кнопку...

Всего записей: 669 | Зарегистр. 29-08-2007 | Отправлено: 21:58 02-04-2008
Lexua



Silver Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
sttmaster

Цитата:
File.Copy("AutoPlay\\Docs\\Templates\\*.*", _ProgramFilesFolder.."\\Nero\\Nero8\\", true, true, false, true, nil);

Вот так правильно

Всего записей: 2849 | Зарегистр. 15-10-2002 | Отправлено: 16:38 03-04-2008 | Исправлено: Lexua, 16:42 03-04-2008
lorents



Silver Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Всем Привет!
у меня вопрос, Как сделать так чтоб можно было отправлять письмо, вводишь свою почту, тему и т.д, потом кликаешь отправить, и письмо приходит определенному человеку?

Всего записей: 3299 | Зарегистр. 30-12-2007 | Отправлено: 21:47 03-04-2008 | Исправлено: lorents, 21:51 03-04-2008
sttmaster



Advanced Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору

Цитата:
Lexua

 
Спасибо все получилось,подскажи еще как к этому действу привязать Progress на главном окне проекта,потому что 369 метров не за одну секунду копируются хотелось бы это визуально видеть когда оканчивается копирование..
 

Всего записей: 669 | Зарегистр. 29-08-2007 | Отправлено: 23:02 03-04-2008
Lexua



Silver Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
sttmaster

Цитата:
StatusDlg.Show();
File.Copy("AutoPlay\\Docs\\Templates\\*.*", _ProgramFilesFolder.."\\Nero\\Nero8\\", true, true, false, true, nil);
StatusDlg.Hide();
 

Этот код выведет просто диалог с прогрессбар.
Если прогресс на главной странице, то нужно писать код для подсчета количества копируемых файлов.
Где-то пробегала в топике функция.
А вобще то справка рулит  
 
Добавлено:
lorents
В шапке Отправка данных из форм по e-mail от GOOSE

Всего записей: 2849 | Зарегистр. 15-10-2002 | Отправлено: 09:51 04-04-2008 | Исправлено: Lexua, 10:04 04-04-2008
   

Страницы: 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102

Компьютерный форум Ru.Board » Компьютеры » Программы » Indigo Rose AutoPlay Media Studio (часть 2)
Widok (30-01-2009 12:11): Лимит страниц. Продолжаем здесь.


Реклама на форуме Ru.Board.

Powered by Ikonboard "v2.1.7b" © 2000 Ikonboard.com
Modified by Ru.B0ard
© Ru.B0ard 2000-2025

BitCoin: 1NGG1chHtUvrtEqjeerQCKDMUi6S6CG4iC

Рейтинг.ru