» Autoplay Media Studio

Zloy_Gelud
Игра разбита на два диска.
Авторан стартанул, при начале инсталяции авторан закрывается.
При смене дисков авторан должен стартануть, а он не стартует.
Если я не закрываю авторан при начале инсталяции, то при смене дисков появляется ошибка о неверном томе.
GOOSE предложил этот вариант. Но тогда небыло времени этим заниматься, а сейчас пришлось вернуться к этому вопросу.

alfonser

Цитата:

При смене дисков авторан должен стартануть, а он не стартует.

А почему он не стартует? Проект на второй диск записан?

Zloy_Gelud

Цитата:

Проект на второй диск записан?

Да .
Я и сам не понимаю.
Если авторан будет стартовать на втором диске, то проблема отпадет.

Кстати!
GOOSE уже сам не помнит, о чем там шла речь

ЗЫ "Давно не брал я в руки шашек!" (С)
Написали вы тут... не прочесть Придется наверстывать!

Zloy_Gelud
у меня в аутокаде в сылках записаны след. запустить программу...
я хочу чтоб при закрытии аутокада ета программа закрывалась всесте с ней...

Более подробнее... запускаем autorun.exe с диска...
появляеться меню.. там сылка запустить прогу запускаеться прога...
мне надо чтоб... при закрытии autorun.exe закрывалась вместе с ней прога... как раз та которую через нее мы запустили... скажем myprog.exe ... если опять не понятно то я уж не знаю...

Сделал проект, с винта еще нормально запускается, а вот с диска тормозит по страшному, как можно решить эту проблему.

dark_horse

Ну логично, что с диска проект медленней запускается, тем более, если он еще чем-то весовым нагружен (видео, веб, фоновая музыка...). Можно попробывать скомпилить проект как Web/Email executable.

простите не обращайте внимание

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

dark_horse
если на паузу то

Код: Audio.Pause(CHANNEL_BACKGROUND);

Здраствуйте!
Подскажите пожалуйста возможно ли из ListBox'a загружать разные картинки в несколько объектов "Image" при нажатии только на одну из строчек LB_ITEMS .
Код такой:

On Preload

Код:

LB = "ListBox1";
ListBox.DeleteItem(LB, LB_ALLITEMS);
                tFiles = File.Find("AutoPlay\\Images\\", "*.jpg", false, false, nil);
    if tFiles then
                for nIndex, sFilePath in tFiles do
                        sData = sFilePath;
                        sText = String.SplitPath(sFilePath).Filename;
                        ListBox.AddItem(LB, sText, sData);
        end
    end

Crazy_Snake
Что за окна картинок? Два объекта Image на одной странице? Или 2 картинки на разных страницах? Поясни.

Два объекта Image на одной странице

Crazy_Snake
Может так:

Код: LB = "ListBox1";
tSelected = ListBox.GetSelected(LB);
if tSelected then
sFile = ListBox.GetItemData(LB, tSelected[1]);
maxWidth = 822;
maxHeight = 580;
xPos = 230;
yPos = 121;
ResizeImage("Image1", sFile, maxWidth, maxHeight,xPos,yPos);
ResizeImage("Image2", sFile, maxWidth, maxHeight,xPos,yPos);
else
Dialog.Message("Error", "There is no item selected.");
end

Это будет загружаться в два окна одинаковые картинки. Это-то легко. Мне вот надо чтобы загружались от одного клика в ЛистБоксе сразу две разные картинки и в разные объекты Имэйдж.

Crazy_Snake

Из твоего примера следует, что в каждый итем ЛистБокса грузится один файл рисунка, где в качестве Text'a - имя файла (картинки), Data - путь к картинке. При клике на итем загружается картинка в объект "Image1", беря свой путь из Data. И как ты хочешь организовать одновременную загрузку второй картинки? Откуда ее путь должен взяться?

Вот именно это я и спрашиваю, возможно ли это.
Можно конечно с кодом полазить, привязать, присвоить одно к другому, покрутиться, постараться и все сделать, но да ладно, я уже сделал по другому принципу.
Спасибо Zloy_Gelud.

У меня еще вопросик есть. Можно сделать кнопку, при нажатии на которую рандомом совершалось какое-нить действие. Ну скажем к примеру, разная мелодия, разные текстовые сообщнеия, разные картинки и т.п. И желательно все это смешано.

Crazy_Snake

Цитата:

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

Как вариант - созавать таблицы, в которых значения индексов - пути к файлам мелодий, картинок или текстовые сообщения. Затем генеришь рандомное число, которое будет указывать какой индекс из таблицы использовать.

Zloy_Gelud

А как генератор рандомных чисел выглядит в Луа скрипте?

Crazy_Snake
См. действие Math.Random.

Код: function Callback(strSource, strDestination, nCopied, nTotal, nFileCopied, nFileTotal)
nPercent = Math.Round(nCopied / nTotal * 100, 0);
StatusDlg.SetMeterRange(0, 100);
StatusDlg.SetTitle("Сохранено "..nPercent.."%");
StatusDlg.SetMessage("Копирование");
StatusDlg.SetStatusText(strDestination);
StatusDlg.SetMeterPos(nPercent);
StatusDlg.ShowCancelButton(true, "Cancel");
if (StatusDlg.IsCancelled()) then
return false;
else
return true;
end
end
function SaveAs()
strFileToCopy = "AutoPlay\\Videos\\data01.avi";
local strFiles = CommonDialogs.File(false, "Сохранить", Shell.GetFolder(SHF_MYDOCUMENTS), "Видео файл (*.avi)|*.avi|", "Глобальный передел", "avi", false);
if (strFiles ~= "CANCEL") then
local tblFiles = WinApi.DelimitedStringToTable(strFiles, "|");
if (tblFiles) then
if (File.DoesExist(tblFiles[1])) then
local cBut = Dialog.Message("Сохранить как", tblFiles[1].."\r\nУже существует.\r\nЗаменить существующий файл?", MB_YESNO, MB_ICONQUESTION, MB_DEFBUTTON1);
if (cBut == 6) then
StatusDlg.Show(MB_ICONNONE, false);
File.Copy(strFileToCopy, tblFiles[1], true, true, false, true, Callback);
StatusDlg.Hide();
else
SaveAs();
end
else
StatusDlg.Show(MB_ICONNONE, false);
File.Copy(strFileToCopy, tblFiles[1], true, true, false, true, Callback);
StatusDlg.Hide();
end
end
end
end
SaveAs();

Код: SaveAs(String.SplitPath(tblFiles[1]).Drive..String.SplitPath(tblFiles[1]).Folder..String.SplitPath(tblFiles[1]).Filename..String.SplitPath(tblFiles[1]).Extension);

lorents

Вообще-то чтоб те помогли - показал бы измененную функцию SaveAs(). А то твой код не для того варианта ф. SaveAs(), который приведен выше.

Zloy_Gelud



Код: function Callback(strSource, strDestination, nCopied, nTotal, nFileCopied, nFileTotal)
nPercent = Math.Round(nCopied / nTotal * 100, 0);
StatusDlg.SetMeterRange(0, 100);
StatusDlg.SetTitle("Сохранено "..nPercent.."%");
StatusDlg.SetMessage("Копирование");
StatusDlg.SetStatusText(strDestination);
StatusDlg.SetMeterPos(nPercent);
StatusDlg.ShowCancelButton(true, "Cancel");
if (StatusDlg.IsCancelled()) then
    return false;
else
    return true;
end
end
function SaveAs(strOutDir)
strFileToCopy = "AutoPlay\\Videos\\data01.avi";
if (strOutDir == nil) then
strOutDir = Shell.GetFolder(SHF_MYDOCUMENTS);
end
local strFiles = CommonDialogs.File(false, "Сохранить",strOutDir, "Видео файл (*.avi)|*.avi|", "Глобальный передел", "avi", false);
if (strFiles ~= "CANCEL") then
local tblFiles = WinApi.DelimitedStringToTable(strFiles, "|");
if (tblFiles) then
if (File.DoesExist(tblFiles[1])) then
local cBut = Dialog.Message("Сохранить как", tblFiles[1].."\r\nУже существует.\r\nЗаменить существующий файл?", MB_YESNO, MB_ICONQUESTION, MB_DEFBUTTON1);
if (cBut == 6) then
strOutFile = tblFiles[1];
StatusDlg.Show(MB_ICONNONE, false);
File.Copy(strFileToCopy, tblFiles[1], true, true, false, true, Callback);
StatusDlg.Hide();
else

SaveAs(String.SplitPath(tblFiles[1]).Drive..String.SplitPath(tblFiles[1]).Folder..String.SplitPath(tblFiles[1]).Filename..String.SplitPath(tblFiles[1]).Extension);

end
else
strOutFile = tblFiles[1];
StatusDlg.Show(MB_ICONNONE, false);
File.Copy(strFileToCopy, tblFiles[1], true, true, false, true, Callback);
StatusDlg.Hide();
end
end
end
end
SaveAs(strOutDir)

tbPageProperties =
Application.GetPageProperties("Page1");

-- вводим новые параметры свойств страницы
tbPageProperties.BackgroundType = 2;
tbPageProperties.ImageFilename = "AutoPlay\\Images\\Background\\BG1.jpg";

-- меняем текущие на новые
Application.SetPageProperties("Page1", tbPageProperties);

Как задать сразу все страницы? Чтобы при нажатии на кнопку менялся сразу весь фон на всех страницах?
И еще, почему на самой первой странице фон не меняется?

Цитата:

Как задать сразу все страницы? Чтобы при нажатии на кнопку менялся сразу весь фон на всех страницах?

Никак. Вставляй этот код на On Preload каждой страницы.

У меня есть кнопки йветовых схем, при нажатии на которые фон меняется везде, кроме первой странице. И еще, может быть так что на 4 поменяется, на ост нет, или наоборот. Рандомами все время...



Как избавиться от ошибки 9999, которая появляется если загружать *.exe с оболочки?

Crazy_Snake [исправилено]
Поменять все-таки можно при нажатии на одну кнопку.
Глоб. функции:

Код: function SetPageProp()
    local tPages = Application.GetPages();
    for n, strPageName in tPages do
        tblPageProperties = {};
        tblPageProperties.BackgroundType = 2;
        tblPageProperties.ImageFilename = "AutoPlay\\Images\\bg.png";
        Application.SetPageProperties(strPageName, tblPageProperties);
    end
end

Zloy_Gelud
А как чтобы разные можно было фоны?
несколько функций таких с разными путями к файлу фона?

Код:
function SetPageProp()
local tPages = Application.GetPages();
for n, strPageName in tPages do
tblPageProperties = {};
tblPageProperties.BackgroundType = 2;
tblPageProperties.ImageFilename = "AutoPlay\\Images\\bg.png";
Application.SetPageProperties(strPageName, tblPageProperties);
end
end

Crazy_Snake
Ну вообще можно по разному извратиться..
Как вариант:

Код: function SetPageProp()
    local tPages = Application.GetPages();
    for n, strPageName in tPages do
        tblPageProperties = {};
        tblPageProperties.BackgroundType = 2;
        tblPageProperties.ImageFilename = "AutoPlay\\Images\\"..strPageName..".png";
        Application.SetPageProperties(strPageName, tblPageProperties);
    end
end