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

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

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

 Версия для печати • Подписаться • Добавить в закладки
Страницы: 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 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124 125 126 127 128 129 130 131 132 133 134 135 136 137 138 139 140 141 142 143 144 145 146 147 148 149 150 151 152 153 154 155 156 157 158 159 160 161 162 163 164 165 166 167 168 169 170 171 172 173 174 175 176 177 178 179 180 181 182 183 184 185 186 187 188 189 190 191 192 193 194 195 196

Открыть новую тему     Написать ответ в эту тему

Cheery



.:МордератоР:.		Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
AutoPlay Media Studio


Часть 5 [Часть 4 [?], Часть 3 [?], Часть 2 [?], Часть 1 [?]]


  AutoPlay Media Studio - мощная программа для создания меню автозагрузки CD/DVD. Эта программа создаст все необходимые файлы для автозапуска и его графическую оболочку, и даже сама встроит в нее использованные в проекте нестандартные шрифты. Пользователю останется лишь записать готовый проект на свой CD/DVD.
  AutoPlay Media Studio не требует от пользователя никаких особых знаний и очень прост в освоении, имеет дружественный и интуитивно понятный интерфейс. Приложение, которое будет создано AutoPlay Media Studio в конце работы, представлено в виде объектной модели. Эта модель состоит из группы отдельных страниц. На этих страницах можно размещать объекты, которые могут представлять собой графику, музыку, текст, видео, Flash, HTML и пр. Любому элементу можно назначить определенное действие. Например, при наведении на рисунок курсора мыши, может возникать текст с комментариями, при нажатии на кнопку "Play" начнет проигрываться фильм и т.д. Программа предоставляет сотни различных действий, которые можно связать с объектами. В AutoPlay Media Studio присутствует большое количество уже готовых шаблонов.
  AutoPlay Media Studio имеет широкие возможности и богатый набор инструментов для разработки мультимедийных проектов. Использовать программу можно не только для создания файлов автозапуска, но и, например, для разработки интерактивного обучающего софта или мультимедийной презентации.

Язык интерфейса: Английский
Страница загрузки: AutoPlay Media Studio Trial 9.0
Скриптовый язык LUA:
на Lua.Org (Official) - на Lua.Ru

Ресурсы, посвященные AMS (содержат коллекции примеров, дополнений, уроков):
  • icynorth.com
  • imagine-programming.com
  • mindquake.com.br

    Инструменты:
  • ScriptOMatic Tool - создает скрипт обращения ко всем свойствам выбранного WMI-класса

    Ответы на наиболее часто задаваемые вопросы [?]
    Раскраска AMS-кода для публикации на форуме от UModeL: версия 1 и версия 2.
    • Всего записей: 52737 | Зарегистр. 04-04-2002 | Отправлено: 06:17 05-08-2012 | Исправлено: Komandor, 13:51 03-08-2024
    leserg73



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

    Цитата:
    Можно как-то избавиться от белёсой рамки вокруг xButton (той что вокруг серой)?  

    Это зависит от выбранной темы Windows, от выбранной темы для кнопки, от выбранной темы для всего проекта. Для начала посмотрите свойства кнопки, вкладка "Settings", опция "Theme".
    Всего записей: 116 | Зарегистр. 27-07-2008 | Отправлено: 18:38 24-09-2014
    KerberX



    Full Member    		Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    Там на любой теме есть. В проекте стоит тема Office 2007 Scenic, но она не используется. Кнопка использует тему Windows. Но и на стандартной теме и на сторонней эта рамка есть в то время как на системных кнопках такой рамки нет.
     
    Есть ли способ прикрепить к проекту тему (*.cjstyles, *.msstyles) и чтобы при этом не менялась рамка окна?
    Всего записей: 597 | Зарегистр. 08-09-2011 | Отправлено: 18:44 24-09-2014 | Исправлено: KerberX, 23:12 02-10-2014
    dodakaedr



    Junior Member    		Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    Как создать условие чтобы при выбранной определенной радиокнопки создаваль запись в реестр?
    Всего записей: 178 | Зарегистр. 31-01-2014 | Отправлено: 00:14 03-10-2014
    Zloy_Gelud



    Silver Member    		Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    dodakaedr
     
    Событие On Click кнопки > действие Registry.CreateKey, Registry.SetValue
    Всего записей: 3281 | Зарегистр. 30-05-2007 | Отправлено: 09:05 03-10-2014
    dodakaedr



    Junior Member    		Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    del
    Всего записей: 178 | Зарегистр. 31-01-2014 | Отправлено: 20:41 03-10-2014 | Исправлено: dodakaedr, 22:29 03-10-2014
    dallas page



    Member    		Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    Всем привет. Я решил уйти от технологии webdav и перейти на rest api. Хочу скачать файл с яндекс диска. Приложение (My Project) зарегистрировано, токен получен. В теле ответа приходит ссылка на скачивание файла, но скачивание через ams не происходит. Через браузер качает. Подскажите пожалуйста, где ошибка?

    Код:
    sToken = "a04059f0848b4585828ce869000a9522";
    sURL = 'https://cloud-api.yandex.net:443/v1/disk/resources/download?path=1.flac';
     
    oHTTP = luacom.CreateObject("WinHttp.WinHttpRequest.5.1");
    oHTTP:Open("GET", sURL, 0);
    oHTTP:SetRequestHeader("Authorization", "OAuth " .. sToken);
    oHTTP:Send("");
     
    a = oHTTP.ResponseBody;
    a = String.Replace(a, '{"href":', "", false);
    a = String.Replace(a, '}', "", false);
    a = String.Replace(a, ',"method":"GET","templated":false', "", false);
    a = String.Replace(a, '"', "", false);
     
    Dialog.Message("", oHTTP.ResponseBody .. "\r\n\r\n" .. a, MB_OK, MB_ICONINFORMATION, MB_DEFBUTTON1);
     
    HTTP.DownloadSecure(a, Shell.GetFolder(SHF_DESKTOP) .. "\\1.flac", MODE_BINARY, 20, 443, nil, nil, nil);
    error = Application.GetLastError();
    if error ~= 0 then
        Dialog.Message("Error", _tblErrorMessages[error], MB_OK, MB_ICONEXCLAMATION, MB_DEFBUTTON1);
    else
        Dialog.Message("", "OK", MB_OK, MB_ICONINFORMATION, MB_DEFBUTTON1);
    end

    На всякий случай:
    Логин: userwe
    Пароль: Qazx123456
    Всего записей: 205 | Зарегистр. 28-03-2010 | Отправлено: 01:23 04-10-2014 | Исправлено: dallas page, 01:24 04-10-2014
    dallas page



    Member    		Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    Через браузер качает только если ты авторизован на яндексе. Попробовал сделать так:

    Код:
    sToken = "a04059f0848b4585828ce869000a9522";
    sURL = 'https://cloud-api.yandex.net:443/v1/disk/resources/download?path=1.flac';
     
    oHTTP = luacom.CreateObject("WinHttp.WinHttpRequest.5.1");
    oHTTP:Open("GET", sURL, 0);
    oHTTP:SetRequestHeader("Authorization", "OAuth " .. sToken);
    oHTTP:Send("");
     
    a = oHTTP.ResponseBody;
    a = String.Replace(a, '{"href":', "", false);
    a = String.Replace(a, '}', "", false);
    a = String.Replace(a, ',"method":"GET","templated":false', "", false);
    a = String.Replace(a, '"', "", false);
     
    Dialog.Message("", oHTTP.ResponseBody .. "\r\n\r\n" .. a, MB_OK, MB_ICONINFORMATION, MB_DEFBUTTON1);
    Download.Start(Application.GetWndHandle(), a, Shell.GetFolder(SHF_DESKTOP) .. "\\1.flac", "", "Authorization: OAuth" .. sToken, false, nil, -1, "", "");

    Качает только 8кб.
    Всего записей: 205 | Зарегистр. 28-03-2010 | Отправлено: 12:34 04-10-2014 | Исправлено: dallas page, 15:16 04-10-2014
    Zloy_Gelud



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

    Цитата:
    Качает только 8кб

    А ты думаешь у тебя кусок файла скачивается? Открой то, что скачалось, текстовым редактором и посмотри.
     
    Если на диске есть файл 1.flac, то должно скачиваться:

    Код:
    local sToken = "a04059f0848b4585828ce869000a9522";
    local sURL   = 'https://cloud-api.yandex.net:443/v1/disk/resources/download?path=1.flac';
     
    local oHTTP = luacom.CreateObject("WinHttp.WinHttpRequest.5.1");
    oHTTP:Open("GET", sURL, 0);
    oHTTP:SetRequestHeader("Authorization", "OAuth " .. sToken);
    oHTTP:Send();
     
    local sLink
    if (oHTTP.Status == 200) then sLink = oHTTP.ResponseBody:match('(http.-)"'); end
     
    oHTTP = nil;
     
    if sLink then
        result = Download.Start(Application.GetWndHandle(), sLink, "C:\\1.flac", "", "Authorization: OAuth "..sToken, false, nil, -1, "", "");
    end
    Всего записей: 3281 | Зарегистр. 30-05-2007 | Отправлено: 15:35 04-10-2014 | Исправлено: Zloy_Gelud, 15:46 04-10-2014
    dallas page



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

    Цитата:
    Если на диске есть файл 1.flac, то должно скачиваться

    На диске он есть, если авторизоваться через браузер и вставить ссылку из тела, то скачивание происходит. А ams не качает, создает пустой файл 8кб. Может заголовок Authorization не правильно передается в коде Download.Start?
    Всего записей: 205 | Зарегистр. 28-03-2010 | Отправлено: 16:57 04-10-2014
    Zloy_Gelud



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

    Цитата:
    А ams не качает, создает пустой файл 8кб.

    AMS качает то, что ему отдают. Я тебе посоветовал посмотреть содержимое того, что скачалось.

    Цитата:
    Может заголовок Authorization не правильно передается в коде Download.Start?

    Я написал проверенный код. Проверял на своем диске. Скачал 2 файла без проблем.
    Всего записей: 3281 | Зарегистр. 30-05-2007 | Отправлено: 17:01 04-10-2014
    dallas page



    Member    		Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    Zloy_Gelud проверил и вот что обнаружил. Текстовые файлы (txt) скачивает без проблем, а jpg (2мб) и flac не хочет (в файле: Страница, которую вы читаете, не существует).
    Всего записей: 205 | Зарегистр. 28-03-2010 | Отправлено: 17:48 04-10-2014 | Исправлено: dallas page, 18:21 04-10-2014
    Zloy_Gelud



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

    Цитата:
    а jpg (2мб)

    JPG 250Kb скачал без проблем. Больше тестить нет желания.
    Всего записей: 3281 | Зарегистр. 30-05-2007 | Отправлено: 21:16 04-10-2014
    dodakaedr



    Junior Member    		Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    Как сделать кнопку "Обзор..." чтобы указать путь извлечения и чтобы этот путь записывался в "Input"?
    Всего записей: 178 | Зарегистр. 31-01-2014 | Отправлено: 11:37 05-10-2014
    dallas page



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

    Код:
    local sToken = "a04059f0848b4585828ce869000a9522";
    local sURL   = 'https://cloud-api.yandex.net:443/v1/disk/resources?path=%2F1.jpg';
     
    local oHTTP = luacom.CreateObject("WinHttp.WinHttpRequest.5.1");
    oHTTP:Open("GET", sURL, 0);
    oHTTP:SetRequestHeader("Authorization", "OAuth " .. sToken);
    oHTTP:Send();
     
    if (oHTTP.Status == 200) then pKey = oHTTP.ResponseBody:match('(public_key":".-)"'); end
    local pKey = String.Replace(pKey, 'public_key":"', "", false);
    local pKey = String.Replace(pKey, "/", "%2F", false);
    local pKey = String.Replace(pKey, "+", "%2B", false);
    local pKey = String.Replace(pKey, "=", "%3D", false);
     
    local sURL   = 'https://cloud-api.yandex.net:443/v1/disk/public/resources/download?public_key=' .. pKey;
     
    oHTTP:Open("GET", sURL, 0);
    oHTTP:SetRequestHeader("Authorization", "OAuth " .. sToken);
    oHTTP:Send();
     
    local sLink
    if (oHTTP.Status == 200) then sLink = oHTTP.ResponseBody:match('(http.-)"'); end
     
    oHTTP = nil;
     
    if sLink then
        HTTP.DownloadSecure(sLink, "C:\\1\\001.jpg", MODE_BINARY, 20, 443, nil, nil, nil);
    end

    Файл должен быть публичным. Единственное, помогите пожалуйста правильно получить pKey, вместо:

    Код:
    if (oHTTP.Status == 200) then pKey = oHTTP.ResponseBody:match('(public_key":".-)"'); end
    local pKey = String.Replace(pKey, 'public_key":"', "", false);

     
    Добавлено:
    dodakaedr Событие On Click кнопки:

    Код:
    result = Dialog.FolderBrowse("Please select a folder:", "");
    if result ~= "CANCEL" then
        Input.SetText("Input1", result);
    end

    Всего записей: 205 | Зарегистр. 28-03-2010 | Отправлено: 13:49 05-10-2014 | Исправлено: dallas page, 13:54 05-10-2014
    Zloy_Gelud



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

    Код:
    function escape (str)
        local str = string.gsub (str, "\n", "\r\n");
        str = string.gsub (str, "([^0-9a-zA-Z ])",
            function (c) return string.format ("%%%02X", string.byte(c)) end);
        str = string.gsub (str, " ", "+");
        return str
    end
     
    --********************************************************************************************************
    local sLink = "";
     
    local sToken = "a04059f0848b4585828ce869000a9522";
    local sURL   = 'https://cloud-api.yandex.net:443/v1/disk/resources?path=1.jpg';
     
    local oHTTP = luacom.CreateObject("WinHttp.WinHttpRequest.5.1");
    oHTTP:Open("GET", sURL, 0);
    oHTTP:SetRequestHeader("Authorization", "OAuth " .. sToken);
    oHTTP:Send();
     
    if (oHTTP.Status == 200) then
        local sKey = oHTTP.ResponseBody:match('public_key":"(.-)"');
        TextFile.WriteFromString("C:\\MyFile.txt", sKey, false);
     
        sURL = 'https://cloud-api.yandex.net:443/v1/disk/public/resources/download?public_key=' .. escape(sKey);
        oHTTP:Open("GET", sURL, 0);
        oHTTP:Send();
     
        if (oHTTP.Status == 200) then
            sLink = oHTTP.ResponseBody:match('(http.-)"');
        end
    end
    oHTTP = nil;
    --********************************************************************************************************
    if (sLink ~= "") then
        HTTP.DownloadSecure(sLink, "C:\\001.jpg", MODE_BINARY, 20, 443, nil, nil, nil);
    end
    Всего записей: 3281 | Зарегистр. 30-05-2007 | Отправлено: 16:42 05-10-2014
    dallas page



    Member    		Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    Zloy_Gelud спасибо!!!
    Всего записей: 205 | Зарегистр. 28-03-2010 | Отправлено: 16:53 05-10-2014
    dodakaedr



    Junior Member    		Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    dallas page
    Спасибо! Не подскажите, реально ли с помощью AMS создать ярлыки на рабочий стол, папку в меню "Пуск" и закрепить на панели задач и в меню пуск?
    Всего записей: 178 | Зарегистр. 31-01-2014 | Отправлено: 16:56 05-10-2014
    dallas page



    Member    		Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    dodakaedr смотри действия Shell.CreateShortcut и Shell.GetFolder
    Всего записей: 205 | Зарегистр. 28-03-2010 | Отправлено: 17:52 05-10-2014 | Исправлено: dallas page, 17:53 05-10-2014
    dodakaedr



    Junior Member    		Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    dallas page
    что не правильно делаю? Не получается создать папку в меню пуск.

    Цитата:
    Shell.CreateShortcut(Shell.GetFolder('SHF_STARTMENUPROGRAMS\\My programm'), "Hello", "AutoPlay\\Docs\\setup.exe", "", "", "", 0, SW_SHOWNORMAL, nil, "", START_OPTION_DEFAULT);
     

     
    и не получается закрепить ярлык в меню пуск

    Цитата:
    Shell.CreateShortcut(Shell.GetFolder(SHF_STARTUP), "My Programm", "AutoPlay\\Docs\\setup.exe", "", "", "", 0, SW_SHOWNORMAL, nil, "", START_OPTION_PIN);
     
    Всего записей: 178 | Зарегистр. 31-01-2014 | Отправлено: 19:01 05-10-2014 | Исправлено: dodakaedr, 19:03 05-10-2014
    Zloy_Gelud



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

    Цитата:
    не получается закрепить ярлык в меню пуск  

    Ты хочешь закрепить ярлык на стартовом экране Windows 8?
     
    Добавлено:

    Цитата:
    Не получается создать папку в меню пуск.

    Неправильно указываешь путь  к папке.

    Код:
    Shell.CreateShortcut(Shell.GetFolder(SHF_STARTMENUPROGRAMS)..'\\My programm', "Hello", "AutoPlay\\Docs\\setup.exe", "", "", "", 0, SW_SHOWNORMAL, nil, "", START_OPTION_DEFAULT);
    Всего записей: 3281 | Зарегистр. 30-05-2007 | Отправлено: 20:04 05-10-2014
    Открыть новую тему     Написать ответ в эту тему

    Страницы: 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 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124 125 126 127 128 129 130 131 132 133 134 135 136 137 138 139 140 141 142 143 144 145 146 147 148 149 150 151 152 153 154 155 156 157 158 159 160 161 162 163 164 165 166 167 168 169 170 171 172 173 174 175 176 177 178 179 180 181 182 183 184 185 186 187 188 189 190 191 192 193 194 195 196

    Компьютерный форум Ru.Board » Компьютеры » Программы » Indigo Rose AutoPlay Media Studio (часть 5)


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

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

    BitCoin: 1NGG1chHtUvrtEqjeerQCKDMUi6S6CG4iC

    Рейтинг.ru