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

НовостиФайловые архивы
ПоискАктивные темыТоп лист
ПравилаКто в 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
GOOSE



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

Код:
 
--Вкладка OnClick кнопки 1
bres = Button.IsEnabled("Button2");   --присваиваем булевое значение переменной bres
 
if bres == true then                          --если кнопка 2 активна, то
Button.SetEnabled("Button2", false);  --делаем ее неактивной
elseif bres == false then                   --если кнопка 2 неактивна, то
Button.SetEnabled("Button2", true);   --делаем ее активной
end
 


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

Всего записей: 903 | Зарегистр. 17-10-2001 | Отправлено: 16:44 17-10-2007 | Исправлено: GOOSE, 17:52 17-10-2007
firstdock

Newbie
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
спасибо этот код рабочий.

Всего записей: 29 | Зарегистр. 09-10-2007 | Отправлено: 17:30 17-10-2007
GOOSE



Advanced Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
firstdock, рабочий, но избыточный
Вот так тоже работает

Код:
 
if Button.IsEnabled("Button2") then        --Если кнопка 2 активна
Button.SetEnabled("Button2", false);      --то делаем ее неактивной
else                                                     --Если иначе
Button.SetEnabled("Button2", true);       --То делаем ее активной
end
 



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

Всего записей: 903 | Зарегистр. 17-10-2001 | Отправлено: 17:40 17-10-2007 | Исправлено: GOOSE, 17:50 17-10-2007
servint



Junior Member
Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
tavria2
 
Спасибо за пример! Честно говоря, даже как-то стыдно стало, ведь мог же сам докумекать!
И опять у меня вопрос, к счастью для него пример не нужен.  
 
Я знаю, что есть функция перезагрузки компа. А можно ли как-то выключить комп, или погрузить его в спящий режим?
Может быть есть какая-то недокументированная функция?

Всего записей: 37 | Зарегистр. 02-04-2007 | Отправлено: 18:44 17-10-2007
tavria2



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

Всего записей: 1127 | Зарегистр. 19-01-2005 | Отправлено: 20:03 17-10-2007
Zloy_Gelud



Silver Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
2All
А можно при стандартном стиле проекта при клике на кнопку "Закрыть" выполнять другое действие, например перйти на другую страницу..?
Пытался делать так, но не выходит:

Код:
function QueryAllowProjectClose()
    if (Application.GetCurrentPage() ~= "Page1") then
        nBut = Dialog.Message("Выход", "Вы установили все, что хотели?", MB_YESNO, MB_ICONQUESTION, MB_DEFBUTTON1);
               if (nBut == IDYES) then
                return true;
               else
                return false;
               end
       else
           Page.Jump("Page4");
           return false;
    end
end

И ещё:
P.S.
Есть ли какие-нидь дополнительные плагины, позволяющие создавать всплывающие сообщения? (хотелось бы вставлять свою картинку в качестве бэкграунда, текст и прочее..)

Всего записей: 3266 | Зарегистр. 30-05-2007 | Отправлено: 23:26 17-10-2007
firstdock

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

Код:
if Button.IsEnabled("Button2") then        --Если кнопка 2 активна  
Button.SetEnabled("Button2", false);      --то делаем ее неактивной  
else                                                     --Если иначе  
Button.SetEnabled("Button2", true);       --То делаем ее активной  
end  

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

Всего записей: 29 | Зарегистр. 09-10-2007 | Отправлено: 00:25 18-10-2007
tavria2



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

Цитата:
А можно при стандартном стиле проекта при клике на кнопку "Закрыть" выполнять другое действие, например перйти на другую страницу..?  
Пытался делать так, но не выходит:  

Да, есть заморочки с QueryAllowProjectClose(), предлагаю следующее: Вместо вызова действия Page.Jump("Page4"); - вызвать таймер с интервалом 100 мсек, а в таймере сделать переход страницы и остановку таймера.

Всего записей: 1127 | Зарегистр. 19-01-2005 | Отправлено: 01:26 18-10-2007
firstdock

Newbie
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
ещё вопрос на счёт извлечение диска  

Код:
drives = Drive.Enumerate();
all_drives = Table.Concat(drives, "\r\n");  
error = Application.GetLastError();
 if (error ~= 0) then
      result = Drive.GetType(drives[x]);
   if (result  == 5) then                          -- ищем drive_type == DRIVE_CDROM
      Drive.Eject(drives[x]);
   end
 end
 

 
этот код не рабочий подскажите что не правильно написал
вижу альтернативу только чтобы запрашивать метку диска у юзера..
и если есть возможность раскрывать не все имеющие сидиромы а только тот к котором именно данный диск??

Всего записей: 29 | Зарегистр. 09-10-2007 | Отправлено: 07:22 18-10-2007 | Исправлено: firstdock, 07:33 18-10-2007
GOOSE



Advanced Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
servint
Есть пример с dll-кой DLLPCPower.apz
Смотри у меня в разделе "Примеры для 6 версии"


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

Всего записей: 903 | Зарегистр. 17-10-2001 | Отправлено: 14:38 18-10-2007
firstdock

Newbie
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
найдено грамоское решение извлечение диска

Код:
result = Drive.GetType("C");  
   if (result  == 5) then
   Drive.Eject("C");
end
    result = Drive.GetType("D");  
    if (result  == 5) then
    Drive.Eject("D");
end
     result = Drive.GetType("E");  
     if (result  == 5) then
     Drive.Eject("E");
end
      result = Drive.GetType("F");  
      if (result  == 5) then
      Drive.Eject("F");
end
       result = Drive.GetType("G");  
       if (result  == 5) then
       Drive.Eject("G");
end
        result = Drive.GetType("H");  
        if (result  == 5) then
        Drive.Eject("H");
end
         result = Drive.GetType("I");  
         if (result  == 5) then
         Drive.Eject("I");
end
          result = Drive.GetType("J");  
          if (result  == 5) then
          Drive.Eject("J");
end
 

кто может помочь его уменьшить
 
Добавлено:
подобное
Код:
eject = Dialog.Input("Запрос метки диска", "метка диска:", MB_ICONQUESTION);  
   result = Drive.GetType(eject);
   if result  == 5 then
   Drive.Eject(eject);
   else
   if (eject ~= "CANCEL") then
result = Dialog.Message("error", "Этот диск локальный его нельзя извлеч!", MB_OK, MB_ICONSTOP, MB_DEFBUTTON1);
end
end

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

Всего записей: 29 | Зарегистр. 09-10-2007 | Отправлено: 21:10 18-10-2007 | Исправлено: firstdock, 17:26 19-10-2007
oumser

Newbie
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Помогите профи добрые кто чем сможет у меня две проблемы:
1. На preload Page1 в listbox1 загружается два item, при переходе на Page2 (тот же самы код) остаеся два итема(норма),далее обратно на первую страницу 4 итема, и так далее добавляется по два.
2. Как не прерывать таймер запущеный на первой странице при переходе на любую другую.

Всего записей: 19 | Зарегистр. 30-09-2007 | Отправлено: 17:39 19-10-2007
firstdock

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

Цитата:
Как не прерывать таймер запущеный на первой странице при переходе на любую другую.
если я не ошибаюсь таймер надо запустить в global функциях тогда будет работать пока ты не закроешь проект.
 
Добавлено:
подскажите как вписать html код в кнопку.

Всего записей: 29 | Зарегистр. 09-10-2007 | Отправлено: 17:45 19-10-2007
Zloy_Gelud



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

  1. На On Preload перед добавлением итемов вставь енто:

    Код:
    ListBox.DeleteItem("ListBox1", -1);


firstdock

Цитата:
и если есть возможность раскрывать не все имеющие сидиромы а только тот к котором именно данный диск??

Чтото мне подсказывает, что так   :

Код:
Drive.Eject(_SourceDrive);


Цитата:
этот код не рабочий подскажите что не правильно написал

И не удивительно, что он не работает..что такое x в твоем коде?
Вот рабочий код:

Код:
tDrives = Drive.Enumerate();
    for n, cDriveLetter in tDrives do
        if (Drive.GetType(cDriveLetter) == 5) then
            Drive.Eject(cDriveLetter);
        end
    end


Цитата:
подскажите как вписать html код в кнопку.

Это вапще как???
 

Всего записей: 3266 | Зарегистр. 30-05-2007 | Отправлено: 01:17 20-10-2007
firstdock

Newbie
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
oumser  оргомное спасибо

Код:
Drive.Eject(_SourceDrive);  
ъ
не думал что всё так просто
ошибка моя что я не пробовал записывать на диск свой проект.
 
если можно объясни знчение этой строки!

Код:
    for n, cDriveLetter in tDrives do  

вообще не понимаю.
 
по html коду. например при нажатии кнопки выполнялся допустим вот этот код

Код:
<b><a href='info: Справка' onclick='top.wopen("cmd.php?jsclose=1&c=help{$asess}","help", 600,575);return false;'title="НАЖМИТЕ СЮДА! ТУТ ОЧЕНЬ ИНТЕРЕСНО! "><font color="#FFFFFF">Справка</font></a></b>

 
а ещё лучше если допустим вот это html код можно разместить прям на страничке авторана
 

Код:
<p align="left"><h5>1) Написать письмо мне на мало <a href="mailto:Bat-pavel@mail.ru?subject=Hello&Body=text:&cc=eagleowl@newtown.ru&bcc="""><img src="images1/pochta.gif" border="0"></a><br>2) Написать мне в Маил агенте по адресу <br>"bat-pavel@mail.ru"<br>3) по ISQ <span class=btd>452424679 <img src=http://web.icq.com/whitepages/online?icq=452424679&img=5 alt=452424679 border=0> (<small><a target=_blank href='redirect_from_cpsr.php?url=http%3A%2F%2Fwwp.icq.com%2F452424679&md5=635fd23fbb51e2b3'>http://wwp.icq.com/452424679</a></small>)</span></h5></td>

просто html и php я знаю достаточно хорошо а это как я понимаю делфи..
с ним к сожалению не знаком поэтому ошибки ламерские.
 
вот по этому коду на страничку грузится картинка. если этот номер аськи в он лайн, грузит одну картинку, иначе другую.

Код:
<img src=http://web.icq.com/whitepages/online?icq=452424679&img=5 alt=452424679>

как это можно написать в делфи вообще не понимаю.
 

Всего записей: 29 | Зарегистр. 09-10-2007 | Отправлено: 04:15 20-10-2007 | Исправлено: firstdock, 04:30 20-10-2007
oumser

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

Цитата:
На On Preload перед добавлением итемов вставь енто:  
 
Код:ListBox.DeleteItem("ListBox1", -1);  

Тогда на первой странице загружается один итем (только первый раз при загрузке проекта), в последующих переходах все нормально.
 
firstdock

Цитата:
Цитата:Как не прерывать таймер запущеный на первой странице при переходе на любую другую.  
если я не ошибаюсь таймер надо запустить в global функциях тогда будет работать пока ты не закроешь проект.

Неработает Сам таймер для аудио сайдера. Поблема в том что при переходе на др.страницу он либо останавливается либо включается заново с начальной позиции.
Вот его код:
if (SliderEx.GetActiveAlias() == "Slider_Audio")  then                -- если аудио слайдер активный (ручная установка позиции слайдера)
    nHandPos = SliderEx.GetSliderPos("Slider_Audio");                -- позиция аудио слайдера, установленная вручную
else                                                                -- если аудио слайдер не активный
    if (nHandPos) then                                                -- если есть новая позиция аудио слайдера, установленная вручную            
        Audio.Seek(CHANNEL_BACKGROUND, SEEK_SPECIFIC, Math.Round(nHandPos, 0));    -- устанавливаем новую позицию аудио трека
        nHandPos = nil;                                                -- очищаем значение новой позиции аудио слайдера
    end
    nPosAudio = Audio.GetCurrentPos(CHANNEL_BACKGROUND);                    -- получаем позицию аудио трека
    SliderEx.SetSliderPos("Slider_Audio", nPosAudio);                -- устанавливаем позицию аудио слайдера  
    CounterAudio();                                                    -- вывода на экран оставшегося времени воспроизведения аудио трека
end
 
Добавлено:
firstdock

Цитата:
oumser  оргомное спасибо

Видимо ты ошибся

Всего записей: 19 | Зарегистр. 30-09-2007 | Отправлено: 13:37 20-10-2007
Lexua



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

Цитата:
если можно объясни знчение этой строки!  

Код:
for n, cDriveLetter in tDrives do  

вообще не понимаю.

 
Сначала создается таблица дисков

Цитата:
tDrives = Drive.Enumerate();

А потом выполняется цикл for т.е. перебираются все значения из таблицы.
 
for n, cDriveLetter in tDrives do
--здесь выпоняются действия с текущим элементом таблицы
end
 
где:  
n - индекс (т.е. порядковый номер ячейки таблицы)
cDriveLetter - значение текущей ячейки
tDrives - собственно сама таблица  
 
 

Всего записей: 2844 | Зарегистр. 15-10-2002 | Отправлено: 16:19 20-10-2007
servint



Junior Member
Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
Tavria2
 
Подскажите пожалуйста как можно сделать следущее:
 
Есть меню бар с меню... Всего 3 пункта.
Каждый пункт меню имеет несколько подменю.
 
Как можно прописать в функцию g_OnUpdateMenuEnabled эти пункты с подменю?
Насколько я знаю функция g_OnUpdateMenuEnabled работает только с одиночными пунктами (без подменю). А мне нужно чтобы действия выполнялись на пунктами с подменю.  
 
Приэтом прописать функцию в глобал и вызывать её со страницы не подходит, т.к нужно чтобы при вызове меню оно настраивалось, так как делает g_OnUpdateMenuEnabled.  
 
Подскажите как это можно реализовать?

Всего записей: 37 | Зарегистр. 02-04-2007 | Отправлено: 00:01 21-10-2007 | Исправлено: servint, 19:13 21-10-2007
Drusus



Junior Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Сделал полностью свой проект мультимедийного диска для бардов. В проекте 36 страниц, 560 фото, 350 mp3, 90 видеороликов. Всё это добро размещено на DVD. Проблема, что диск загружается очень долго, с момента загрузки диска до появления титульной страницы авторана проходит минуты 2, если не больше. При том, что титульная страница простейшая: по центру картинка, по бокам кнопки, никаких фоновых аудио или видео.
С чем связана скорость загрузки? Можно ли ускорить? Зависит ли скорость чтения от выбранной скорости записи болванки: 4-я, 8-я, 16-я?
Вообще сейчас думаю, может неправильно выбрал софт под задачу. Выбирал между Macromedia Director, Multimedia Builder, HyperMethod. AMP предпочёл из-за лёгкости освоения, возможностей и накопленной пользовательской базы. Или я был неправ?

Всего записей: 119 | Зарегистр. 03-08-2005 | Отправлено: 12:31 21-10-2007
Kindly



Silver Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Drusus. Предполагаю, что у тебя все загружается за один раз, а не динамически. И почему аж 36 страниц, если можно только две: одна титульная, а во вторую динамический подгружаются указанные в INI данные (фото, плейлисты и т.д.). Проблема в (НЕ)оптимизации проекта. Скорость чтения диска зависит от скорости чтения привода и поддерживаемой скорости диска.
 
может выложи проект (без файлов), будет виднее.

Всего записей: 3000 | Зарегистр. 04-08-2005 | Отправлено: 12:40 21-10-2007 | Исправлено: Kindly, 12:42 21-10-2007
   

Страницы: 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-2024

BitCoin: 1NGG1chHtUvrtEqjeerQCKDMUi6S6CG4iC

Рейтинг.ru