» Autoplay Media Studio

XITMAH -- отвечу за себя: если б знал чем помочь, или вопрос был бы более конкретнее сформулирован, то я бы помог, чем смог.
З.Ы. Дубли постов не помогут..

Zloy_Gelud
Я думал понятно свою проблему расписал, ладно спрошу по другому.
Мне нужно в объекте "Tree1", на каждую его ветку дерева, задать определенную функцию.
Пример:

При нажатии на "Matrix" загружается изображение (тоесть запускается вот этот код "Image.Load("Image1", "AutoPlay\\Images\\1.png");"), когда нажимаю на "Matrix Reloaded" загружается другое изображение (тоесть запускается вот этот код "Image.Load("Image1", "AutoPlay\\Images\\2.png");") и дт.
Подскажите как это реализовать?

P.S. Вроде как не дублировал, а переспросил.

XITMAH -- вот сейчас хорошее описание проблемы, я все понял.
On Select объекта Tree:

Код: local sSel = Tree.GetSelectedNode("Tree1");
if sSel ~= "" then
local bIsOneRoot = (String.Find(sSel, ".") ~= -1) and (String.Left(sSel, String.Find(sSel, ".") - 1) == "1") or false;
if bIsOneRoot then
local sPosterName = String.Mid(sSel, String.ReverseFind(sSel, ".") + 1, -1) .. ".png";
local sPosterPath = "AutoPlay\\Images\\"..sPosterName;
Image.Load("Image1", sPosterPath);
end
if sSel == "2.1" then
Paragraph.SetText("Paragraph1", "New paragraph text...");
end
end

Zloy_Gelud
А если нужно чтоб на отдельную ветку дерева не только загружалось изображение, но и еще появлялся текст, вот к примеру этот код «Paragraph.SetText("Paragraph1", "New paragraph text...");», подскажи как это можно реализовать?

XITMAH -- подправил код в посте выше.

Zloy_Gelud
Большое спасибо!

Не подскажите, можно ли использовать в одном проекте несколько масок?
Например, страница один одной формы, а страница два другой

падскажите как пользоватса стандартним listbox abo combobox d v ams8 как у Inno Setup Scripting 5.1 от Kindly
или дайте пример Inno Setup Scripting 5.1

torkea --можно. См. действие Window.SetMask.

Zloy_Gelud
Спасибо огромное!

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

P.S.
сам разобрался - вопрос снимается.

Помогите, пожайлуста, решить такую проблему:
При нажатии на изображение открывается Dialog, а как сделать так, чтобы при закрытии диалога выполнялся определенный скрипт на той странице с которой был запущен Dialog?

KRAUSER0993 -- Dialog или DialogEx?

Zloy_Gelud

DialogEx

Возможно каким-то образом создать каталог, который всю основную информацию «название», «описание», «постер» будет брать с внешних файлов?

Примерно чтоб это выглядело так:

Когда по адресу "*\AutoPlay\Docs\" кидаю три файла:
1) "1.txt" - в средине файла написано только название, к примеру "Matrix"
2) "01.txt" - в средине файла написано описание, к примеру "фильм фантастика…"
3) "1.png" - постер.
После чего, объект "ListBox1" автоматически загружает информацию с файла "1.txt", выглядит это так:

При нажатии на "Matrix" происходит загрузка постера(1.png) и описания(01.txt).


P.S. Надеюсь понятно описал)

KRAUSER0993 -- честно даже и не знаю в чем проблема.. Вроде все элементарно.

Код: local cRes = DialogEx.Show("Dialog1", true, nil, nil);
-- если нажали на кнопку закрытия окна (крестик в правом верхнем углу)
if cRes == 2 then
-- здесь любые действия
Dialog.Message("Notice", "Закрыли диалоговое окно.", MB_OK, MB_ICONINFORMATION, MB_DEFBUTTON1);
end

Цитата:

local cRes = DialogEx.Show("Dialog1", true, nil, nil);
-- если нажали на кнопку закрытия окна (крестик в правом верхнем углу)

У меня закрывается окно не с помощью крестика, а с помощью изображения.Что тогда нужно поменять?

KRAUSER0993
Во-первых, необходимо посмотреть, какое значение у тебя стоит в аргументах действия, которое закрывает диалоговое окно - DialogEx.Close(4) (в данном случае 4). Затем поправь код на этот:

Код: local cRes = DialogEx.Show("Dialog1", true, nil, nil);
-- если нажали на кнопку закрытия окна (крестик в правом верхнем углу)
if cRes == 2 or cRes == 4 then
-- здесь любые действия
Dialog.Message("Notice", "Закрыли диалоговое окно.", MB_OK, MB_ICONINFORMATION, MB_DEFBUTTON1);
end

Zloy_Gelud

Большое спасибо!Получилось!

Добавлено:
У меня возник еще один вопрос:
Как сделать так, чтобы несколько CheckBox выделяли программы, которые хочется установить и через одну кнопку все выделенные проги устанавливались по очереди, по порядку, как в софтах?

падскажите как пользоватса стандартним listbox abo combobox d v ams8 как у Inno Setup Scripting 5.1 от Kindly
или дайте пример Inno Setup Scripting 5.1

Цитата:

Как сделать так, чтобы несколько CheckBox выделяли программы, которые хочется установить и через одну кнопку все выделенные проги устанавливались по очереди, по порядку, как в софтах?

Ну если файлов не много тогда можно так

Код: sFolderInstall=_SourceFolder.."\\Install\\"
tFileInstall={"Сократ\\SPERS41.EXE","CheMax\\chemaxrus105.exe","OceanRange2\\OceanRange2Rus_5910.exe","UPXShell\\Upx_Shell.exe"}
for x,sFileInstall in pairs(tFileInstall)do
if CheckBox.GetChecked("CheckBox"..x) then
sFolder = String.SplitPath(sFolderInstall..sFileInstall);
File.Run(sFolderInstall..sFileInstall, "", sFolder.Drive..sFolder.Folder, SW_SHOWNORMAL, true);
--Application.Sleep(50);
end
end

lerik2703

А куда это написать?


Цитата:

Ну если файлов не много тогда можно так

А если файлов много, то какой скрипт?

KRAUSER0993
просто в собитие кнопки!

Цитата:

А если файлов много

а если много то тогда лучше будет воспользоваться внешней базой данных XML например вечером напишу!

KRAUSER0993 -- тоже пример.

On Preload страницы:

Код: --[[ Описание: Функция создает вертикальный список чекбоксов,
формируя их названия согласно названиям найденных папок
в папке Soft, находящейся рядом с исполняемым файлом.
Параметры: x - позиция по оси X
y - начальная позиция по оси Y]]
_MakeList = function(x, y)
local tblCheckBoxProps = {};
tblCheckBoxProps.FontName = "Verdana"; -- тип начертания
tblCheckBoxProps.FontSize = 8; -- размер шрифта
tblCheckBoxProps.FontScript = 204; -- кирил. набор символов
local nHeight = 15; -- высота чекбокса
tblCheckBoxProps.Height = nHeight ;
local nWidth = 200; -- ширина чекбокса
tblCheckBoxProps.Width = nWidth;
tblCheckBoxProps.X = x; -- отступ по оси Х
local tDirs = Folder.Find(_SourceFolder.."\\Soft", "*", false, nil);
if tDirs then
for i = 1, #tDirs do
local sDirPath = String.TrimRight(tDirs[i], "\\");
local sFoldername = String.Mid(sDirPath, (String.ReverseFind(sDirPath, "\\") + 1), -1);
tblCheckBoxProps.Text = sFoldername;
if i == 1 then
nY = y;
else
nY = y + (i - 1) * (nHeight + 2);
end
tblCheckBoxProps.Y = nY;
Page.CreateObject(OBJECT_CHECKBOX, "Chk_"..i, tblCheckBoxProps);
end
end
end

_MakeList(10, 10);

Добрый день, я пользуюсь этой программой недавно - так вот у меня вопрос: при создании лист бокса, как сделать так чтобы на нажатие строчки в лист боксе меня переносило на страницу?
Там ведь в пунктах окна списка можно указывать только путь к файлу, а не к странице?

Zloy_Gelud

У меня стоит AutoPlay Media Studio 7.5 может ли скрипт отличаться от 8 версии? А то мне написанные выше скрипты не подходят

1 код -создает только один CheckBox, хотя подпапок в папке Soft больше одной
2-код -нажимаю на кнопку, но ничего не происходит

И то это результат после исправления скриптов, без исправления выдает ошибки

Zloy_Gelud

Цитата:

У меня стоит AutoPlay Media Studio 7.5 может ли скрипт отличаться от 8 версии? А то мне написанные выше скрипты не подходят

Может и отличается.. У меня АМС 8.0.0.3.

Цитата:

1 код -создает только один CheckBox, хотя подпапок в папке Soft больше одной

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

Цитата:

2-код -нажимаю на кнопку, но ничего не происходит

Должно работать.

Для АМС 7.5 вроде так должно быть (не тестировал):
Изменение в первом коде:

Код: if tDirs then
for i = 1, Table.Count(tDirs) do
local sDirPath = String.TrimRight(tDirs[i], "\\");

А мне помочь? Очень надо...

Elfog [Исправлено]

Цитата:

Там ведь в пунктах окна списка можно указывать только путь к файлу, а не к странице?

Можно вводить все что угодно.

Цитата:

как сделать так чтобы на нажатие строчки в лист боксе меня переносило на страницу?

Сначала в настройках объекта ListBox в столбце Item Data укажите названия ваших страниц, например, Page1, Page2 и т. д.

On Select ListBox'a:

Код: local tSel = ListBox.GetSelected("ListBox1");
if tSel then Page.Jump(ListBox.GetItemData(this, tSel[1])); end

Zloy_Gelud, Ураа! Спасибо, помог! Вот только моя любознательность не даёт мне покоя, что означает

Код: (ListBox.GetItemData(this, tSel[1])