» Autoplay Media Studio

RW4PIR
А как ты поля в сомбобоксе заполнял?

data1 = tonumber(ComboBox.GetItemData("ComboBox1", e_Selection)); должно быть

в iten data а что ?
ща прверю

Добавлено:
чтото я не так сделал корень не находит

data1 = tonumber(ComboBox.GetItemData("ComboBox1", e_Selection));
data2 = tonumber(Input.GetText("Input2"));

data3 = (data1*data2)^0.5; -- формула

Input.SetText("Input3", data3);


Добавлено:
считает так а дожнополучится не 8... а 12
http://img187.imageshack.us/img187/7386/000ylf.jpg

RW4PIR
У меня и получается 12

Код на кнопку

Цитата:

data2 = tonumber(ComboBox.GetText("ComboBox1"));
data1 = tonumber(Input.GetText("Input1"));
data3 = (data1*data2)^0.5; -- формула
Input.SetText("Input2", data3);

только имена объектов свои подставь

RW4PIR
http://solidfiles.com/d/98e02ed5ca680f564fa28c5b50b865ed - 10,36 kb
Реализация с радиобаттонами и Комбобоксом (2 варианта).

Добавлено:
RW4PIR
На On Click каждого радиобаттона повесь это (а то забыл в проекте дописать):

Код: Input.SetText("Input1", RadioButton.GetText(this));

Zloy_Gelud
Lexua
спасибо всё работает

можно ли с помощью плагина ThumbList сделать тоже самое что на картинке



т.е. к каждой картинке добавить CheckBox

и еще помогите, как сделать что при нажатии на Enter мое диалоговое окно закрывалось но без без звуков, как этот звук отключить (то которое если открыто диалоговое окно, а ты кликаешь на страницу проекта)?

Код: if e_Key == 13 then
    Window.Close(DialogEx.GetWndHandle(), CLOSEWND_SENDMESSAGE);
end

Вопрос - есть такой сценарий:


Код: result = Dialog.Message("Notice", "Would you like to install your customized company database?", MB_YESNO, MB_ICONINFORMATION, MB_DEFBUTTON1);
if result ~= 7 then
Folder.Create("C:\\Quantum\\Data\\Directmail & Attachments");
Folder.Create("C:\\Quantum\\Data\\Hvac\\Database");
File.Copy(_SourceFolder.."\\Autoplay\\Directmail & Attachments\\Attachments.dat", "C:\\Quantum\\Data\\Directmail & Attachments", true, false, false, true, nil);
File.Copy(_SourceFolder.."\\Autoplay\\Directmail & Attachments\\directmail.mdb", "C:\\Quantum\\Data\\Directmail & Attachments", true, false, false, true, nil);
File.Copy(_SourceFolder.."\\Autoplay\\Hvac\\Database\\HVAC01.DAT", "C:\\Quantum\\Data\\Hvac\\Database", true, false, false, true, nil);
end
result = Dialog.Message("Notice", "Database Files Installed Successfully.", MB_OK, MB_ICONINFORMATION, MB_DEFBUTTON1);

Djon1970

Цитата:

Что в нем обозначает цифра 7?

Это означает, что если пользователь НЕ нажал на кнопку "Нет", то будет выполнен нижеследующий сценарий. Логичнее было бы сделать так:

Код: if result == 6 then -- если нажали "Да"

Zloy_Gelud
Этот сценарий я нашел в примере от 5 версии AMS, в справке пытался искать насчет семерки, вводил тильду, знак равенства, но так и не врубился. По тому примеру сделал такой сценарий:

Код: result = Dialog.Message("Сообщение", "Установка русского языка!", MB_OK, MB_ICONINFORMATION, MB_DEFBUTTON1);
if result ~= 7 then
Folder.Create(_ProgramFilesFolder.."\\Trillian\\languages\\ru");
File.Copy("AutoPlay\\Docs\\INTERNET MESSENGER\\Trillian\\Trillian 3.1 Final\\ru\\skin.dtd", _ProgramFilesFolder.."\\Trillian\\languages\\ru", true, true, false, true, nil);
File.Copy("AutoPlay\\Docs\\INTERNET MESSENGER\\Trillian\\Trillian 3.1 Final\\ru\\*.dll", _ProgramFilesFolder.."\\Trillian\\languages\\ru", true, true, false, true, nil);
File.Copy("AutoPlay\\Docs\\INTERNET MESSENGER\\Trillian\\Trillian 3.1 Final\\ru\\*.xml", _ProgramFilesFolder.."\\Trillian\\languages\\ru", true, true, false, true, nil);
end
result = Dialog.Message("Сообщение", "Русский язык установлен!", MB_OK, MB_ICONINFORMATION, MB_DEFBUTTON1);

Djon1970

Цитата:

result = Dialog.Message("Сообщение", "Установка русского языка!", MB_OK, MB_ICONINFORMATION, MB_DEFBUTTON1);
if result ~= 7 then

Здесь неправильно построен сценарий. В данном случае переменная result будет возвращать всегда значение 1, а у тебя result сравнивается с 7. Или убери это сравнение или сделай как-то так:

Код: cBut = Dialog.Message("Руссификация", "Установить русский язык?", MB_YESNO, MB_ICONQUESTION, MB_DEFBUTTON1);
if (cBut == IDYES) then
    Folder.Create(_ProgramFilesFolder.."\\Trillian\\languages\\ru");
    File.Copy("AutoPlay\\Docs\\INTERNET MESSENGER\\Trillian\\Trillian 3.1 Final\\ru\\skin.dtd", _ProgramFilesFolder.."\\Trillian\\languages\\ru", true, true, false, true, nil);
    File.Copy("AutoPlay\\Docs\\INTERNET MESSENGER\\Trillian\\Trillian 3.1 Final\\ru\\*.dll", _ProgramFilesFolder.."\\Trillian\\languages\\ru", true, true, false, true, nil);
    File.Copy("AutoPlay\\Docs\\INTERNET MESSENGER\\Trillian\\Trillian 3.1 Final\\ru\\*.xml", _ProgramFilesFolder.."\\Trillian\\languages\\ru", true, true, false, true, nil);
Dialog.Message("Руссификация", "Русский язык успешно установлен!", MB_OK, MB_ICONINFORMATION, MB_DEFBUTTON1);
end

Я много узнал с ваших форумов... только немогу найти Скрипт, чтобы можно было видео сделать во весь экран при двойном клике...
Мне это очень срочно надо...
помогите плиз...
заранее спасиб

F305

Цитата:

немогу найти Скрипт, чтобы можно было видео сделать во весь экран при двойном клике

А зачем искать скрипт, объект MediaPlayer прекрасно поддерживает двойной клик для полноэкранного режима.

Люди Добрые! Помогите мне пожалуйста. У меня прблемма такая: На одной странице авторана
допустим две программы-у каждой своя кнопка, нажимая на которую появляется её описание
(как это сделать я знаю-просто). И на этой же странице есть кнопка "Установить", нажимая на которую (!!!) устанавливается выбранная кнопкой программа. Для каждой программы делать свою кнопку "Установить" я не хочу. Логически все вроде бы просто, а вот как это скриптами прописать...Заранее Огромное Человеческое Спасибо.

Ozhogin
Ну так назначь на кнопки переменную и присваивай ей значение

на кнопке 1
Цитата:

current_program = 1;

на кнопке 2
Цитата:

current_program = 2;

а на кнопке "установить" контрол структуру


Цитата:

if current_program == 1 then
File.Run("AutoPlay\\Docs\\MyProg_1.exe", "", "", SW_SHOWNORMAL, false);
elseif current_program == 2 then
File.Run("AutoPlay\\Docs\\MyProg_2.exe", "", "", SW_SHOWNORMAL, false);
end

Ребята подскажите как сделать функцию прогресса удаления файлов.
В чем ошибка?


Код: function CallBack(del, nPercent)

Progress.SetStep("Progress1", nPercent);
Progress.SetCurrentPos("Progress1", nPercent);
Bar = Progress.GetCurrentPos("Progress1");
Progress.SetText("Progress1", Bar.."%");
end

Folder.DeleteTree(WC3.."\\", CallBack);

Спасибо!!!

777Dima
У тебя вообще мало чего правильно написано..
Вот так будет правильно:

Код: function Callback(strSource, nDeleted, nTotal)
nPercent = Math.Round((nDeleted * 100) / nTotal, 0);
Progress.SetCurrentPos("Progress1", nPercent);
Progress.SetText("Progress1", nPercent.."%");
end

Folder.DeleteTree("C:\\MyDir\\", Callback);

Zloy_Gelud
Функция должна возвращать булево значение, в справке прочитал, иначе функция не работает. Ну это уже пустяки:

Код: function Callback(strSource, nDeleted, nTotal)
nPercent = Math.Round((nDeleted * 100) / nTotal, 0);
Progress.SetCurrentPos("Progress1", nPercent);
Progress.SetText("Progress1", nPercent.."%");
return true
end

Folder.DeleteTree("C:\\MyDir\\", Callback);

777Dima

Цитата:

Функция должна возвращать булево значение, в справке прочитал, иначе функция не работает.

Да, ты прав. Написал и не проверил работоспособность. Извиняюсь.

Доброе время суток!!!
Хотел узнать, возможно ли изменить scrollbar-ы в элементе "Tree". Вся инфо не помещается, а стандартный скролл не радует дизайном....

NeedBeHappy
Нет, нельзя.

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

lorents
Ты сам то хоть понял, что написал?

Zloy_Gelud

Цитата:

хочу сделать чтобы при перемещении диалогового окна, окно становилось

нет
как сделать, чтобы во время перемещения пользователем диалогового окна, оно было прозрачным?

Как у объекта Input сделать прозрачный фон?

Cmaster2K
Никак. Можешь только цвет фона объекта Input под цвет фона страницы подобрать.

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

NeedBeHappy
Как один из возможных вариантов..

Код: strSelectedNode = Tree.GetSelectedNode("Tree1");
if (strSelectedNode ~= "") then
strData = Tree.GetNode("Tree1", strSelectedNode);
if (strData ~= nil) or (strData ~= "") then
Image.Load("Image1", strData);
end
end

2 Zloy_Gelud

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

Может быть есть другие варианты?
в любом случае - спасибо за внимание!