» Autoplay Media Studio

Народ. Вопрос у ветерана топика появился

Понадобилось тут править ручками таблицы в MSSQL
Поправить-то поправил, но появилась идея слегка этот процесс на будущее упростить
Но с кавалерийского наскока плагин ODBC мне не сдался...
У кого нибудь был опыт соединения приложения с базой на MSSQL Server 2000?

Цитата:

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

используй флаг
Код: if (not bShow ) then result = DialogEx.Show("Warning", true, nil, nil);
bShow=true end

seryoga393777


Цитата:

Пользователи, помогите разобраться!!! Хочу сделать так, Если игра установлена то кнопка "установить" обесцвечивается, а кнопка "играть" загорается.

попробуй сделать так:

On Preload:

Код: if (Registry.DoesKeyExist(HKEY_LOCAL_MACHINE, "Software\\My Game\\Installation") == true) then
Button.SetEnabled("Button5", true); -- кнопка "играть"
Button.SetVisible("Button5", true);
Button.SetEnabled("Button", false); -- кнопка "Установить"
Button.SetVisible("Button", false;
end
if (Registry.DoesKeyExist(HKEY_LOCAL_MACHINE, "Software\\My Game\\Installation") == false) then
Button.SetEnabled("Button5", false); -- кнопка "играть"
Button.SetVisible("Button5", false);
Button.SetEnabled("Button", true); -- кнопка "Установить"
Button.SetVisible("Button", true);
end

lerik2703
это что будет ?

Добавлено:
lerik2703
круто работает

Добавлено:
как сдлать чтобы кнопка не была доступна 10 секунд ?
ну используя таймер и чтобы обратный отсчёт отобрахался на заблокированой кнопке, как это зделать ?

Цитата:

попробуй сделать так:

On Preload:

Код:
if (Registry.DoesKeyExist(HKEY_LOCAL_MACHINE, "Software\\My Game\\Installation") == true) then
Button.SetEnabled("Button5", true); -- кнопка "играть"
Button.SetVisible("Button5", true);
Button.SetEnabled("Button", false); -- кнопка "Установить"
Button.SetVisible("Button", false;
end
if (Registry.DoesKeyExist(HKEY_LOCAL_MACHINE, "Software\\My Game\\Installation") == false) then
Button.SetEnabled("Button5", false); -- кнопка "играть"
Button.SetVisible("Button5", false);
Button.SetEnabled("Button", true); -- кнопка "Установить"
Button.SetVisible("Button", true);
end



таким образом кнопки будут поочередно задействованы и видимы

Я ввёл Это, кнопка Играть пропала, а кнопка Установить осталась, хотя должно быть наоборот, наверное из-за реестра HKEY_LOCAL_MACHINE, "Software\\My Game\\Installation" в этой папке есть строковый параметр Exepath_______ REG_SZ______D:\My Game\MyGAme.exe. Как это можно указать????

P.S. А в кнопке Играть в Действии что надо писать??

RW4PIR

Цитата:

можно картинку добавить из файла иконок!
как это зделать ?

Долго объяснять да ещё файл иконок найти нужно правельный!
Цитата:

э... незнаю, какая картинка ?

на 95 странице смотри!

добавь вначале эту строку

Код: strRunGamePath = Registry.GetValue(HKEY_LOCAL_MACHINE, "Software\\My Game\\Installation", "ExePath", true).."\\MyGAme.exe";

Цитата:

Долго объяснять да ещё файл иконок найти нужно правельный!

это не такая проблема, акак делать ?

Добавлено:
lerik2703
где прота менюшка ? или чтото я не догнал ? простое меню, а хочу например чтобы выделение было чётным, как сделать ?

RW4PIR
пример на диалоговом окне

Код: if (not timer) then timer =10 end
timer=timer -1
Button.SetText("Button1", "Осталось "..timer);
if(timer==0)then
DialogEx.StopTimer();
Button.SetEnabled("Button1", true);
end

есть dll-ка, реализует эффект воды на картинке, в Innosetup-е реализация элементарная,
вопрс : как можно ее здесь прикрутить ?

кусок кода вызова dll функции на Pascal script-е:
enablewater(WizardForm.WelcomePage.Handle, 0, 0, bmp.Handle, 3, 25)

lerik2703
спс ща проверю

Добавлено:
lerik2703
чото не работает

Подскажите пожалуйста здесь

Код:
cCheckRunApp = "autorun.exe"; -- имя файла для проверки...
tProcesses = System.EnumerateProcesses(); -- список запущенных процессов
for n, cPath in tProcesses do
tFile = String.SplitPath(cPath); -- разлаживаем путь на составляющие
if (String.Lower(tFile.Filename..tFile.Extension) == cCheckRunApp) then -- если ваш файл обнаружен в процессах
Audio.Stop(CHANNEL_BACKGROUND);
end
end

RW4PIR
куда код разместил?

Прога весь мозг вынесла!!!!
Цитата:

goFRyS

Решил сделать так, как ты написал не помогает:
Код:
strRunGamePath = Registry.GetValue(HKEY_LOCAL_MACHINE, "SOFTWARE\\Software\\My Game\\Installation", "ExePath", true).."\\MyGAme.exe";
File.Run(strRunGamePath.."\\MyGAme.exe", "", strRunGamePath, SW_SHOWNORMAL, true);
if (strRunGamePath ~= "") then
Button.SetText("Button5", "Играть");
Button.SetEnabled("Button5", true); -- кнопка "Играть"
else
Button.SetText("Button1", "Установить");
Button.SetEnabled("Button1", false); -- "Установить"
end

На кнопки (Установить, Играть)
On Click:
File.Run(strRunGamePath, "", "", SW_SHOWNORMAL, false);
Тоже никак, обе кнопки активны, но сначала, не поверишь, нажимая на кнопку Играть запускалась игра, правда она не включалась, проста появлялся процесс в Диспетчере задач MyGAme.exe и весел там.

Есть какие - нибудь предположения по этому поводу?????

lerik2703

в он прелоад как то так пишется

olega77

Цитата:

есть dll-ка, реализует эффект воды на картинке

Пробовал я ее, но у меня получается картинка вниз головой

В on timer а on preload можешь таймер запусть!

Знатоки AMS! Неужели никто не знает? Ну подскажите пожалуйста, не силен я в скриптах, что куда нужно вставлять в этом коде:

Код: cCheckRunApp = "Game.exe"; -- имя файла для проверки...
tProcesses = System.EnumerateProcesses(); -- список запущенных процессов
for n, cPath in tProcesses do
tFile = String.SplitPath(cPath); -- разлаживаем путь на составляющие
if (String.Lower(tFile.Filename..tFile.Extension) == cCheckRunApp) then -- если ваш файл обнаружен в процессах
Audio.Stop(CHANNEL_BACKGROUND);
end
end

lerik2703
ну он таймер это после таймера что должно выполнется или нет ?

RW4PIR
А ты скрип читать умеешь?

goFRyS

Цитата:

что куда разложить? очень нужен этот код

ничего не надо делать, это такая команда

Не работает она! Может я ни туда ее ложу? я во все вкладки на странице пытался, менял экзешники, не вырубает она музыку!

lerik2703
не оч ))
в общем не работает
таймер добавил

goFRyS
а куда ты водишь код?

Здраствуйте еще раз !

Спасибо большое tavria2 за ответ. Ну вот ещё один вопрос возник...

Я хочу поставит лицензию на свою созданную прогу:
Для этого я делал:
1. Определил идеинтификационный номер ОС, вроде {e29ac6c0-7037-11de-816d-806e6f6e6963}
2. Зашифровал функцией Crypto.MD5DigestFromStringб получилось

7ea61278dfbad65ae31e707ffe019711

Вообше то хотелось окно ввода ключа сделать как у Виндовса тоисть 16 знаков, вроде ХХХХ-ХХХХ-

ХХХХ-ХХХХ, в нем участвуют цифры и большие латинские буквы.

Вопрос в том как мне еще перекодировать Это ({e29ac6c0-7037-11de-816d-806e6f6e6963}) или Это

(7ea61278dfbad65ae31e707ffe019711) что бы использоват ВСЕ эти символы для проверки

введенного серейника.

И еще что нужно делать что бы взять каждую букву на отдельный элемент массива, на РНР есть функции chunksplit, preg_split с помошью которых всех букв строки (Mystr = "asdfgjertgsdfs") можно разделить в элементы массива, MyArray[1] = "a", MyArray[2] = "s";, MyArray[3] = "d"; .... Как мне это сделать в AMS?

Большое спасибо за ответ !

в свойства страницы -> сценарий, во все вкладки пробовал по очереди

ExtremeAsror

Цитата:

Вообше то хотелось окно ввода ключа сделать как у Виндовса тоисть 16 знаков, вроде ХХХХ-ХХХХ-
ХХХХ-ХХХХ, в нем участвуют цифры и большие латинские буквы.

В объекте Input есть сойство Input Mask...

Цитата:

Вопрос в том как мне еще перекодировать Это ({e29ac6c0-7037-11de-816d-806e6f6e6963}) или Это
(7ea61278dfbad65ae31e707ffe019711) что бы использоват ВСЕ эти символы для проверки введенного серейника.

Обратного действия для MD5 - нет, да оно тебе и не нужно.
Переменной шаблона нужно присвоить строку шифрованную в MD5, а введенный серийник так же преобразовываешь в MD5 и сравниваешь с переменной шаблона.

Цитата:

И еще что нужно делать что бы взять каждую букву на отдельный элемент массива, на РНР есть функции chunksplit...

Такой функции в AMS - нет, но ты можешь в цикле выделять по одному символу из строки и сохранять в таблицу. См. действия String.

goFRyS

On Timer код вводить но без запуска таймера работать код не будет!



и Game.exe с маленькой буквы иначе не работает!

goFRyS

Цитата:

в свойства страницы -> сценарий, во все вкладки пробовал по очереди

я же написал в on timer, т.к. твой проект не знает же когда ты запустил процесс, и не забудь запустить таймер.

Добавлено:
и еще писать по несколько раз один и тот же вопрос не надо, в следующий раз буду просто игнорировать

Цитата:

В объекте Input есть сойство Input Mask...

Спасибо большое за советы ! Они мне очень помогли.

А имеется ли мануал (хелп) для AMS на русском языке ? Друзья если у вас есть скиньте мне на мыло asrorbekk@mail.ru !

Пожалюста очень надо.

Что то Goose не видно и его сайта (gooseweb.ru ) тоже ! (уже давно)