» Indigo Rose AutoPlay Media Studio

dallas page

Цитата:

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

Что значит не подходит? Я тебе показал, как избежать конфликта с двойными кавычками в строках, а не писал конкретный пример для распаковки.

Цитата:

т.е., переменные записались просто как текст.

Как записал, так и получил.

Вот пример того, что ты делаешь: [[Это строка, а это..переменная..и еще строка]]
Почему-то ты решил, что указав 2 точки (..) в строке, AMS будет считать это переменной!?
Переменные нужно не писать в строке, а прикреплять к строке: [[Это строка, а это]]..переменная..[[и еще строка]].

Надеюсь ты понял свою ошибку.

Добавлено:
Опоздал с ответом

Господа, я где-то видел кажись раньше подобный пример, но никак сейчас не найду.
Есть файлы:
0001.brb
0002.brb
0003.brb

Необходимо их запустить как
0001.mp4
0002.mp4
0003.mp4

то есть, отсечь последние 3 знака (brb) в названии и присоединить туда "mp4"

ra700, можно использовать замену, -смотри String.Replace или -получить имя файла String.SplitPath и добавить к нему расширение

Код: tFile={"0001.brb","0002.brb","0003.brb"}; -- массив с именами файлов

for i, file in pairs(tFile) do
--sFileNew = String.Replace(file, "brb", "mp4", false); -- способ з заменой
sFileNew = String.SplitPath(file).Filename..".mp4"; -- способ с сменой расширения
result = Shell.Execute(sFileNew, "open", "", "", SW_SHOWNORMAL, true);
end

Robby, спасибо за подсказку!

collagen !!!

Выложи пожайлуста еще разок частичный перевод справки по АМС на русский язык

Хороший форум и главное живой, давно хотел найти еденомышленников по AMS.

И сразу просьба: может есть у кого AMS 5-ой версии? у меня получилось так, что перешел я с 4-ой сразу на 6-ю, а всегда было интересно посмотреть на пятую. Как только вышла 6-ая версия, на файло обменниках сразу перепилили ссылки и найти реальный установочный покет пятой версии я не смог тогда.
Поделитесь, пожалуйста, если есть у кого.

Вот частичный перевод справки по АМС на русский язык.
http://rghost.ru/42602920

swindos посмотрите здесь http://msilab.net/rus.2186

collagen Спасибо!!!

Rezchik123
там только русификатор

[more] Привет всем!

Ребят совсем не давно познакомился с АМС. Нужна ваша помощь..
Хочу сказать спасибо collagen за русифицированную справку. Во вкладке "Как сделать мне.." хотел попробовать сделать "программу теста/викторины" Все вроде скопировал правильно но вот при просмотре выдает ошибку в последнем коде

Код: string_correct="";
correct = 0;
possible = 0;
for j,k in Correct do
possible = possible + 1;
if k == "Correct" then
correct = correct + 1;
end
end

Paragraph.SetText("Paragraph2",
"Question 1: " .. Correct.Q1 .. "\r\n" ..
"Question 2: " .. Correct.Q2 .. "\r\n" ..
"You answered correctly " .. correct .. " out of " .. possible .. " possible questions for a score of " .. ((correct/possible)*100) .. "%."
);

DeniskinRediskin -- значит не все скопировал...
Ошибка говорит о том, что переменная Correct должна быть таблицей.

Проверил все еще раз.Все на месте, как написано в справке(


Добавлено:
Может ошибка в глобальных функциях? Там код

Код: Q_01 = {Question="How many legs does a three leg'd dog have?", A1="One", A2="Two", A3="Four", ACorrect="Three"};
Q_02 = {Question="How many legs does a one leg'd cat have?", A1="Three", A2="Two", A3="Four", ACorrect="One"};
Correct={Q1="",Q2=""};

DeniskinRediskin
Да, вы правы, вкралась ошибка, вот исправленная версия справки
http://rghost.ru/42602920
Перевод Как сделать мне... был сделан давно, в прошлых версиях АМС был именно такой синтаксис при работе с таблицами.
Спасибо за подсказку. Предыдушую ссылку на справку тоже исправил.

Ребят, нужен еще ваш совет..Как реализовать такое чудо? К примеру тест из 20 вопросов, в одном вопросе 3-4 варианта ответов.Ниже ну скажем 20 квадратиков/кружков серого цвета.При выборе верного ответа квадрат под номером вопроса окрашивается в зеленый цвет, не верный ответ - в красный.

Цитата:

DeniskinRediskin
Ребят, нужен еще ваш совет..Как реализовать такое чудо? К примеру тест из 20 вопросов, в одном вопросе 3-4 варианта ответов.Ниже ну скажем 20 квадратиков/кружков серого цвета.При выборе верного ответа квадрат под номером вопроса окрашивается в зеленый цвет, не верный ответ - в красный.

Нарисовать три рисунка: кружочек серый, кружочек красный и кружочек зеленый.
На странице создать 20 объектов-рисунков, всем присвоить рисунок с серым кружочком.
При правильном ответе на вопрос загружаем в объект-рисунок, сопоставленный с данным вопросом, рисунок с зеленым кружочком, при неправильном - красный.

Привет всем!
Я тут немного туплю вот по какому поводу: раньше при выборе кнопки при установке они отображались в виде картинки, сейчас не отображаются, хотя и выбираю "показывать в виде картинки". Не удобно по одному станавливать в проект и смотреть как выглядит.
Что делаю не так?

ra700
Это в реестре настройки препросмотра или отвалились, или вовсе небыли установлены. Так бывает когда устанавливаешь AMS Repack-и сделанные разными умельцами. Переустановите программу скачав установочный дистрибутив с оф.сайта и все заработает.

swindos, спасибо за направление!
Почистил реестр, переустановил заново и вот, появились кнопки )))

здравствуйте. помогите пожалуйста ни как не могу найти шаблон EasySlider_by_tavria2_ams8 или у кого нибудь есть похоже на эту

Nightout1
http://rghost.net/42832348

Zloy_Gelud спасибо

Ребята, подскажите скрипт, чтоб при запуске проекта, в объекте "CheckBox1" уже стояла галочка.

XITMAH -- проще всего так:

Zloy_Gelud Спасибо!

Есть таблица. Индексы которой это пути к файлам, значения это цифры от 0 и далее, а также символы "---". Всё в строковом формате. Для разных индексов значения могут повторяться.
Например:
tExample = {};
tExample["C:\File1.txt"] = "7";
tExample["C:\File2.txt"] = "0";
tExample["C:\File3.txt"] = "8";
tExample["C:\File4.txt"] = "---";
tExample["C:\File5.txt"] = "1";
tExample["C:\File6.txt"] = "1";
Нужно отсортировать эту таблицу по значениям чтобы те что с нулём шли впереди остальные по возрасанию, а с "---" были в конце. Как это сделать?

KerberX
Почитай здесь.

А как это будет в стиле AMS?

KerberX

Цитата:

А как это будет в стиле AMS?

Да никак не будет.
Там же ясно написано, что сортировка работает только с "нумерованными" таблицами и не работает с "именованными" таблицами (твой случай) и почему.

Я закончил перевод Действий, провел работу над ошибками в Действиях и в Как сделать мне... Далее, собрал справку в СХМ при помощи Майкрософт ХТМЛ ХелпВоркШоп для того, чтобы она полностью соответствовала оригинальной (хтм2схм не поддерживает вкладку Поиск и соответственно поиск по ключевым словам и полнотекстовый поиск). Попробовал заменить своей справкой английскую справку в установленной программе (просто переименовал оригинальный файл, и вставил свой), но при обращении к справке во время работы вылетает вот такая ошибка "The window name "AutoPlay Studio" passed to HH_GET_WIN_TYPE has not been specified." Я перевел это как - При передаче в HH_GET_WIN_TYPE имя окна "AutoPlay Studio" не было указано. У меня стояла АМС 8,1 от Robby, поставил от Fosi, результат тот же. На сайте Майкрософта в качестве решения предлагают убрать из названия окно все пробелы. Я убрал из заголовка окна пробелы, ничего не изменилось (через ХТМЛ ХелпВоркШоп конечно). Далее попробовал заменить оригинальную справку своей справкой сделанной в хтм2схм, та же ошибка.
Может кто сталкивался с подобной проблемой? Как мне подменить оригинальный файл справки?
Да, вот файл справки http://rghost.ru/43082095. Попробуйте подменить им оригинальный файл в программе.

Похоже вопрос снят. Вот новый файл: http://rghost.ru/43093386. Скачайте, проверьте. У меня все хорошо, подменяется и работает.

[more] Ребят, подскажите что не так то, а то зациклился. Вобщем пытаюсь с помощью WinAPI (kernel32, user32) скопировать обычный текст в буфер обмена, вот код:


Код:
curgcellText = "Hello World!";
DLL.CallFunction("user32.dll", "OpenClipboard", Application.GetWndHandle(), DLL_RETURN_TYPE_INTEGER, DLL_CALL_STDCALL);
DLL.CallFunction("user32.dll", "EmptyClipboard", "", DLL_RETURN_TYPE_LONG, DLL_CALL_STDCALL);
globalBuffer = DLL.CallFunction("kernel32.dll", "GlobalAlloc", "GMEM_MOVEABLE," .. tostring(String.Length(curgcellText) + 1), DLL_RETURN_TYPE_LONG, DLL_CALL_STDCALL);
globalBufferPointer = DLL.CallFunction("kernel32.dll", "GlobalLock", globalBuffer, DLL_RETURN_TYPE_LONG, DLL_CALL_STDCALL);
gStatus1 = DLL.CallFunction("kernel32.dll", "lstrcpy", globalBufferPointer .. "," .. tostring(curgcellText), DLL_RETURN_TYPE_LONG, DLL_CALL_STDCALL);
laper = Application.GetLastError();
gStatus2 = DLL.CallFunction("kernel32.dll", "GlobalUnlock", globalBuffer, DLL_RETURN_TYPE_LONG, DLL_CALL_STDCALL);
gStatus3 = DLL.CallFunction("user32.dll", "SetClipboardData", "1," .. globalBuffer, DLL_RETURN_TYPE_LONG, DLL_CALL_STDCALL);
gStatus4 = DLL.CallFunction("user32.dll", "CloseClipboard", "", DLL_RETURN_TYPE_LONG, DLL_CALL_STDCALL);