Компьютерный форум OSzone.net  

Компьютерный форум OSzone.net (http://forum.oszone.net/index.php)
-   Автоматическая установка приложений (http://forum.oszone.net/forumdisplay.php?f=61)
-   -   AutoPlay Media Studio 8 (http://forum.oszone.net/showthread.php?t=229766)

def_renat 07-03-2012 16:58 1874331
AutoPlay Media Studio 8
 
привет друзья.... вот начиль работать в программе AutoPlay Media Studio 8
и решил создать автоматическую установку нескольких программ....
но не могу не как запустить... можеть что не правильно делаю или что не так.... кто умееть работать в этой проге прошу помогите пожалуйста...
здесь редко бываю если есть желание помочь проу писать на почту или на майл -агент

Iska 07-03-2012 17:11 1874335
Цитата:
Цитата def_renat
здесь редко бываю если есть желание помочь проу писать на почту или на майл -агент »
Обычно в таких случаях сразу принято озвучивать бюджет.

def_renat 07-03-2012 17:13 1874337
Если что создаю по своей инициативе и для свободного распространения...

Iska 07-03-2012 18:08 1874366
Я не про то.

читать дальше »
Я позволю себе процитировать [выделение моё]:
Цитата:
Ответы в форумах

Читая темы форумов и находя решения заковыристых проблем, я всегда узнаю много нового. Ответов у меня набралось уже более 20 тысяч, пусть и не все они технические. Мне доставляет удовольствие делиться знаниями и помогать конкретным людям, даже если я с ними не знаком. Однако я не оказываю поддержку по электронной почте, ICQ и т.д., потому что в этом случае я помогаю лишь одному человеку, в то время как ответ в форуме доступен тысячам людей.
Отсюда: Об авторе | Вадим Стеркин.

В комплекте «AutoPlay Media Studio» есть и справка, и руководство пользователя. Есть готовые примеры. Есть «Мастера», которые проведут Вас по этапам создания того или иного инструмента. Читайте, пробуйте. Если что не будет получаться — задавайте конкретные вопросы («решил создать … не могу не как запустить... можеть что не правильно делаю или что не так» — это не вопрос). Здесь всегда постараются Вам помочь.

def_renat 07-03-2012 21:57 1874470
Хорошо... как ты смотришь на то что прам на форуме пропишем пошагиваю сборку в программе AutoPlay Media Studio 8, по теме авто установка????

Цитата:
Цитата Iska
В комплекте «AutoPlay Media Studio» есть и справка, и руководство пользователя. Есть готовые примеры. Есть «Мастера», которые проведут Вас по этапам создания того или иного инструмента »
да есть но все но английском и технически" простому юзору не понять"

def_renat 07-03-2012 22:19 1874482
вот ссылка на на файл http://files.mail.ru/A9ISM5 просмотрите пожалуйста и помогите со скриптами что нужно прописать??? и как зделать так чтобы устоновливала по харастирикам системы(если винда 64 то 64 битную, а если винда 32 битная то программу 32 битную.... ??? как зделать это???

еще не которые программы не работають ... как зделать чтоб они запускались???

Цитата:
Цитата def_renat
еще не которые программы не работають »
точнее не запускаються

Iska 07-03-2012 23:30 1874514
Цитата:
Цитата def_renat
да есть но все но английском и технически" простому юзору не понять" »
Ситуация, сложившаяся в компьютерной отрасли такова, что знание технического английского является обязательным. Русского, кстати, тоже.

Цитата:
Цитата def_renat
вот ссылка на на файл http://files.mail.ru/A9ISM5 просмотрите пожалуйста »
Не посмотрю. Такие размеры:
Цитата:
Поект _1.7z 380.9 МБ
не для моего канала доступа.

Цитата:
Цитата def_renat
как зделать так чтобы устоновливала по харастирикам системы(если винда 64 то 64 битную, а если винда 32 битная то программу 32 битную.... ??? »
Например: создаёте кнопку, в её свойствах («Ctrl-Enter») на вкладке Сценарий («Script») во вкладке «OnClick» пишете простейший сценарий проверки разрядности системы и запуска того или иного варианта приложения:
Код:
if (System.Is64BitOS()) then
        result = File.Run("WinRAR\\winrar-x64-411ru.exe", "", "", SW_SHOWNORMAL, false);
else
        result = File.Run("WinRAR\\wrar411ru.exe", "", "", SW_SHOWNORMAL, false);
end
Папка «WinRAR» с файлами инсталляций должна быть в том же каталоге, что и получаемый «autorun.exe»; на этапе разработки — в папке проекта.

def_renat 07-03-2012 23:33 1874517
result = File.Run("AutoPlay\\Docs\\1Basa\\7z920.exe", "", "AutoPlay\\Docs", SW_SHOWNORMAL, true);
result = File.Run("AutoPlay\\Docs\\1Basa\\mseinstall.exe", "", "", SW_SHOWNORMAL, true);
result = File.Run("AutoPlay\\Docs\\1Basa\\OOo_3.3.0_Win_x86_install-wJRE_ru.exe", "", "", SW_SHOWNORMAL, true);
result = File.Run("AutoPlay\\Docs\\1Basa\\AdbeRdr1010_ru_RU.exe", "", "", SW_SHOWNORMAL, true);
result = File.Run("AutoPlay\\Docs\\1Basa\\K-Lite_Codec_Pack_840_Full.exe", "", "", SW_SHOWNORMAL, true);
result = File.Run("AutoPlay\\Docs\\1Basa\\aimp_3.00.981.exe", "", "", SW_SHOWNORMAL, true);
result = File.Run("AutoPlay\\Docs\\1Basa\\ashampoo_burning_studio_6_free_6.80_4312.exe", "", "", SW_SHOWNORMAL, true);
result = File.Run("AutoPlay\\Docs\\1Basa\\ccsetup316.exe", "", "", SW_SHOWNORMAL, true);
result = File.Run("AutoPlay\\Docs\\1Basa\\PuntoSwitcherSetup.exe", "", "", SW_SHOWNORMAL, true);
result = File.Run("AutoPlay\\Docs\\1Basa\\Paint.NET.3.5.10.Install.exe", "", "", SW_SHOWNORMAL, false);



что здесь не правильно??? не запускается
result = File.Run("AutoPlay\\Docs\\1Basa\\7z920.exe", "", "AutoPlay\\Docs", SW_SHOWNORMAL, true);
result = File.Run("AutoPlay\\Docs\\1Basa\\mseinstall.exe", "", "", SW_SHOWNORMAL, true);
result = File.Run("AutoPlay\\Docs\\1Basa\\OOo_3.3.0_Win_x86_install-wJRE_ru.exe", "", "", SW_SHOWNORMAL, true);
result = File.Run("AutoPlay\\Docs\\1Basa\\AdbeRdr1010_ru_RU.exe", "", "", SW_SHOWNORMAL, true);
result = File.Run("AutoPlay\\Docs\\1Basa\\aimp_3.00.981.exe", "", "", SW_SHOWNORMAL, true);
result = File.Run("AutoPlay\\Docs\\1Basa\\ashampoo_burning_studio_6_free_6.80_4312.exe", "", "", SW_SHOWNORMAL, true);
result = File.Run("AutoPlay\\Docs\\1Basa\\PuntoSwitcherSetup.exe", "", "", SW_SHOWNORMAL, true);
result = File.Run("AutoPlay\\Docs\\1Basa\\Paint.NET.3.5.10.Install.exe", "", "", SW_SHOWNORMAL, false);

Цитата:
Цитата Iska
Например: создаёте кнопку, в её свойствах («Ctrl-Enter») на вкладке Сценарий («Script») во вкладке «OnClick» пишете простейший сценарий проверки разрядности системы и запуска того или иного варианта приложения:
Код:
if (System.Is64BitOS()) then
result = File.Run("WinRAR\\winrar-x64-411ru.exe", "", "", SW_SHOWNORMAL, false);
else
result = File.Run("WinRAR\\wrar411ru.exe", "", "", SW_SHOWNORMAL, false);
end »
спасибо приходиться)))

if (System.Is64BitOS()) then
result = File.Run("AutoPlay\\Docs\\1Basa\\64-бит\\7z920-x64.msi", "", "", SW_SHOWNORMAL, true);
else
result = File.Run("AutoPlay\\Docs\\1Basa\\7z920.exe", "", "", SW_SHOWNORMAL, false);
end


в чем ошибка???

def_renat 08-03-2012 00:07 1874538
кстати можешь еще помочь с ключами для авто установки???

Iska 08-03-2012 00:10 1874543
Цитата:
Цитата def_renat
в чем ошибка??? »
«File.Run()» не предназначен для запуска не исполняемых файлов, каковым и является msi. Либо используйте:
Код:
msiexec.exe /i …7z920-x64.msi
либо «Shell.Execute()» с соответствующим глаголом:
Код:
Shell.Execute("AutoPlay\\Docs\\1Basa\\64-бит\\7z920-x64.msi", "open", "", "", SW_SHOWNORMAL);
Цитата:
Цитата def_renat
кстати можешь еще помочь с ключами для авто установки??? »
Весь форум (и все возможности поиска) в Вашем распоряжении.

def_renat 08-03-2012 00:13 1874545
Цитата:
Цитата Iska
Весь форум (и все возможности поиска) в Вашем распоряжении. »
знаю, искал, побывал.... не получается((( не установление в автомат режиме.... есть один вариант конечно... сейчас просмотрю

def_renat 09-03-2012 16:33 1875561
if(CheckBox.SetChecked("Avira Free Antivirus ", true))
then
CheckBox.SetEnabled("Microsoft Security Essentials ", false);
CheckBox.SetEnabled("avast! Free Antivirus", false);
end
if(CheckBox.SetChecked("Microsoft Security Essentials ", true))
then
CheckBox.SetEnabled("Avira Free Antivirus ", false);
CheckBox.SetEnabled("avast! Free Antivirus", false);
end
if(CheckBox.SetChecked("avast! Free Antivirus", true))
then
CheckBox.SetEnabled("Microsoft Security Essentials ", false);
CheckBox.SetEnabled("Avira Free Antivirus ", false);
end
CheckBox.SetEnabled("AIMP ", true);



http://forum.oszone.net/thread-229766.html



просмотри пожалуйста.. что не правильно???



надо чтоб когда та или иной чекбокс в галочки, то другие отключались???

Iska 09-03-2012 18:11 1875625
def_renat, научитесь, пожалуйста, пользоваться тэгом «code».

Неправильно то, что Вы, в данном случае, используете не тот инструмент.

Здесь Вам следует использовать не «CheckBox», а набор из нескольких «RadioButton», объединённых одним свойством «GroupID», например — «Antivirus». Каждому элементу управления также назначаете свойство «Value». Сделанный выбор проверяете при помощи «Page.GetRadioValue()»:
Код:
Page.GetRadioValue("Antivirus");

def_renat 09-03-2012 18:18 1875631
спасибо за совет... но есть какой нибудь инструмент для того что бы при заимо не совместимые... или флаг (!) или Флаг(2) но чтоб нельзя было ставить обо одновременно???

Iska 09-03-2012 20:22 1875711
Цитата:
Цитата def_renat
есть какой нибудь инструмент для того что бы при заимо не совместимые... или флаг (!) или Флаг(2) но чтоб нельзя было ставить обо одновременно??? »
См. выше:
Цитата:
Цитата Iska
набор из нескольких «RadioButton», объединённых одним свойством «GroupID», например — «Antivirus». »
Что непонятно здесь?! Создаёте несколько элементов управления «RadioButton», у каждого из них устанавливаете одно и то же свойство «GroupID» — «Antivirus». Создаёте ещё несколько элементов управления «RadioButton», у каждого из них устанавливаете другое, но тоже одно и то же свойство «GroupID» — например, «Player».

Из всех «RadioButton» со свойством «GroupID» равным «Antivirus» можно будет установить только один из них. Аналогично для следующей группы «RadioButton», со свойством «GroupID» равным «Player». И так далее.

def_renat 09-03-2012 23:31 1875841
Цитата:
Цитата Iska
if (RadioButton.GetChecked("Avira Free Antivirus "))
then
Shell.Execute("AutoPlay\\Docs\\1Basa\\avira_free_antivirus_en.exe", "open", "", "", SW_SHOWNORMAL, true);
end

if (RadioButton.GetChecked("Microsoft Security Essentials "))
then
if
System.Is64BitOS()
then
result = Shell.Execute("AutoPlay\\Docs\\1Basa\\64-бит\\mseinstall.exe", "open", "", "", SW_SHOWNORMAL, true);
else
result = Shell.Execute("AutoPlay\\Docs\\1Basa\\mseinstall.exe", "open", "", "", SW_SHOWNORMAL, true);
end
end

if (RadioButton.GetChecked("avast! Free Antivirus"))
then
Shell.Execute("AutoPlay\\Docs\\1Basa\\setup_av_free.exe", "open", "", "", SW_SHOWNORMAL, true);
end

if (RadioButton.GetChecked("Winamp"))
then
Shell.Execute("AutoPlay\\Docs\\1Basa\\winamp5623_full_emusic-7plus_all.exe", "open", "", "", SW_SHOWNORMAL, true);
end

if (RadioButton.GetChecked("AIMP "))
then
Shell.Execute("AutoPlay\\Docs\\1Basa\\aimp_3.00.981.exe", "open", "", "", SW_SHOWNORMAL, true);
end

if
System.Is64BitOS()
then
MSI.InstallProduct("AutoPlay\\Docs\\1Basa\\64-бит\\7z920-x64.msi", "REMOVE=ALL");
else
result = Shell.Execute("AutoPlay\\Docs\\1Basa\\7z920.exe ", "open", "/S", "", SW_SHOWNORMAL, true);
end
if (RadioButton.GetChecked("Офис"))
then
result = Shell.Execute("AutoPlay\\Docs\\1Basa\\OOo_3.3.0_Win_x86_install-wJRE_ru.exe", "open", "/S", "", SW_SHOWNORMAL, true);
end
result = Shell.Execute("AutoPlay\\Docs\\1Basa\\AdbeRdr1010_ru_RU.exe", "open", "/quiet /norestart", "", SW_SHOWNORMAL, true);

if
System.Is64BitOS()
then
result = Shell.Execute("AutoPlay\\Docs\\1Basa\\64-бит\\K-Lite_Codec_Pack_64bit_590.exe", "open", "/VERYSILENT /SP-", "", SW_SHOWNORMAL, true);
else
result = Shell.Execute("AutoPlay\\Docs\\1Basa\\K-Lite_Codec_Pack_840_Full.exe", "open", "/VERYSILENT /SP-", "", SW_SHOWNORMAL, true);
end


result = Shell.Execute("AutoPlay\\Docs\\1Basa\\Paint.NET.3.5.10.Install.exe", "open", "/S", "", SW_SHOWNORMAL, true);


result = Shell.Execute("AutoPlay\\Docs\\1Basa\\ashampoo_burning_studio_6_free_6.80_4312.exe", "open", "/S", "", SW_SHOWNORMAL, true);


result = Shell.Execute("AutoPlay\\Docs\\1Basa\\ccsetup316.exe", "open", "/S", "", SW_SHOWNORMAL, true);


result = Shell.Execute("AutoPlay\\Docs\\1Basa\\PuntoSwitcherSetup.exe", "open", "/quiet /norestart", "", SW_SHOWNORMAL, true);

»
вот примерно так получилось....

def_renat 11-03-2012 00:29 1876528
кстати разобрался с флажками ..... если один флажок нажат, чтоб остальные флажки бы ли сняты.... три кнопки
и выглядить где то так
[U ]if
( CheckBox.GetChecked("Avira Free Antivirus "))
then
CheckBox.SetChecked("Microsoft Security Essentials ", false);
CheckBox.SetChecked("avast! Free Antivirus", false);
end [/u]

Цитата:
Цитата def_renat
if
( CheckBox.GetChecked("Avira Free Antivirus "))
then
CheckBox.SetChecked("Microsoft Security Essentials ", false);
CheckBox.SetChecked("avast! Free Antivirus", false);
end »

Iska 11-03-2012 01:01 1876538
Цитата:
Цитата def_renat
кстати разобрался с флажками ..... если один флажок нажат, чтоб остальные флажки бы ли сняты.... »
Не разобрались. Я уже говорил Вам, что CheckBox предназначен для иного, но Вы упорно продолжаете забивать гвозди микроскопом.

Читайте руководство: Windows Application UI Development.

Check Boxes:
Цитата:
With a check box, users make a decision between two clearly opposite choices. The check box label indicates the selected state, whereas the meaning of the cleared state must be the unambiguous opposite of the selected state. Consequently, check boxes should be used only to toggle an option on or off or to select or deselect an item.



A typical group of check boxes.
И, соответственно, Radio Buttons:
Цитата:
With a radio button, users make a choice among a set of mutually exclusive, related options. Users can choose one and only one option. Radio buttons are so called because they function like the channel presets on radios.



A typical group of radio buttons.

A group of radio buttons behaves like a single control. Only the selected choice is accessible using the Tab key, but users can cycle through the group using the arrow keys.

def_renat 11-03-2012 19:06 1877026
но мне надо ка крас для выбора ... как ты себе приставляешь например выбор нескольких флажков и радио кнопок.... там же будут не только за имо заменяющие, но и для выбора программы

Iska 12-03-2012 04:51 1877373
Вложений: 1
def_renat, для «выбора одного из» — RadioButton, для просто «выбора или не выбора» — CheckBox. Выше у Вас везде шла речь именно про «выбор одного из» антивирусов, что вполне логично: как правило, одновременно несколько антивирусов на машине не живут.

Как я представляю? Например, так: Файл 79080.

В роли устанавливаемых приложений — игры и стандартные приложения Windows:

def_renat 12-03-2012 04:53 1877375
все понятно.... сейчас скину на скачивания архив с скриптами...

http://files.mail.ru/BW5SM4
я думаю на 10 мегабайт сможете скачать???

Iska 12-03-2012 05:07 1877378
И что? Зачем мне всё это?! Где сам файл проекта «*.autoplay»?

def_renat 12-03-2012 05:08 1877379
в архиве ...

autorun.exe

Iska 12-03-2012 05:14 1877383
def_renat, причём здесь «autorun.exe», что он мне даст? Я веду речь о файле проекта «*.autoplay». Именно в этом файле XML-формата содержится описание, содержимое, настройки и скрипты проекта.

def_renat 12-03-2012 05:18 1877385
Цитата:
Цитата Iska
Именно в этом файле XML-формата содержится описание, содержимое, настройки и скрипты проекта. »
http://files.mail.ru/Q9W93K

Iska 12-03-2012 05:22 1877387
Теперь вижу. Что дальше?

def_renat 12-03-2012 05:24 1877388
пока думаю... все таки мысли не сразу появляются..... еще много вопросов .... но все постепенно.... впереди поровоза бежать не хочу...
но буду прописывать здесь свои действия пошагова

Iska 12-03-2012 05:28 1877390
def_renat, могу сразу сказать, с чего Вам следует начать: с прочтения хорошей книги по проектированию пользовательских интерфейсов.

def_renat 12-03-2012 05:29 1877391
Iska, да согласен, москва тоже сразу не строилась.... я буду очень рад если во сможете мне помогать изучать скрипты....

Цитата:
Цитата Iska
по »
вы

даже если быть точнее не только мне и многим пользователям интернета для которых будет интересно программа AutoPlay Media Studio 8

DesVik 21-08-2012 21:05 1974215
Доброго времени суток!!!
Господа, подскажите новичку,возможно ли в AutoPlay Media Studio создать поле ввода для поиска определенной папки(по названию)и открытия этой папки на новой странице в виде названий файлов в искомой папке.Заранее спасибо!!!

Iska 22-08-2012 03:45 1974406
Цитата:
Цитата DesVik
создать поле ввода »
Можно.

Цитата:
Цитата DesVik
для поиска определенной папки(по названию) »
Для поиска где?

Цитата:
Цитата DesVik
и открытия этой папки на новой странице в виде названий файлов в искомой папке. »
Можно. Что делать, если будет найдено несколько подходящих папок?

DesVik 22-08-2012 12:23 1974595
Если несколько папок с одинаковыми названиями, то показать на новой странице эти папки с возможностью их открыть.

Iska 22-08-2012 17:29 1974803
DesVik, остался ещё один вопрос:
Цитата:
Цитата Iska
Для поиска где? »
Где мы ищем? Откуда начинать поиск?

DesVik 22-08-2012 18:16 1974840
Цитата:
Цитата Iska
Где мы ищем? Откуда начинать поиск? »
У меня программа авто запуска будет находится на переносном HDD (я хочу как бы сделать переносное файловое хранилище)Поэтому искать будем либо рядом с самим файлом авто запуска или в папке рядом с ним.

Iska 22-08-2012 21:37 1974959
Вложений: 1
Смотрите: Файл 86590. Для простоты понимания делать на куче страниц не стал.

DesVik 23-08-2012 18:11 1975591
Спасибо за помощь.Но я маленько не то хотел.Возможно ли сделать так чтоб не указывать где искать, а чтоб автоматически искалась в конкретной папке (Resources)находящаяся рядом с файлом авто запуска.И хотелось бы если папка находится то открывалась бы новая странница именно авто запуска и на ней отображались названия файлов в этой папке( с возможностью их запустить)А если же папок несколько то чтоб на новой странице отобразились просто это папки (названия с возможностью их открыть)заранее спасибо.

Iska 24-08-2012 04:06 1975937
Цитата:
Цитата DesVik
Но я маленько не то хотел.Возможно ли сделать так чтоб не указывать где искать, а чтоб автоматически искалась в конкретной папке (Resources)находящаяся рядом с файлом авто запуска. »
Именно то, что хотели. Смотрите выше Ваши ответы. Ни о какой конкретной папке с именем «Resources» речь выше не шла. Речь шла о поиске папки с заданным названием.

Я перестал понимать, что Вам нужно. Давайте, я попробую описать, а Вы скажете, правильно ли я понял.

Итак, будет исполняемый файл, созданный при помощи AutoPlay Media Studio, помещённый в некую папку на съёмном устройстве. В той же папке, рядом с этим файлом будет находиться папка «Resources». Так?

Дальше что?

DesVik 24-08-2012 12:38 1976114
Цитата:
Цитата Iska
Итак, будет исполняемый файл, созданный при помощи AutoPlay Media Studio, помещённый в некую папку на съёмном устройстве. В той же папке, рядом с этим файлом будет находиться папка «Resources». Так?
Дальше что? »
Все так только исполняемый фаил бутет прямо на жестком диске и рядом с ним папка (Resources)И я хочу чтобы просто в строке поиска набрать название папки,и в ответ чтоб открылась новая страница (AutoPlay Media Studio)на которй отобразятся названия вложенных файлов с возможностью их запустить.

Mancoffee 28-04-2014 20:43 2344308
Запустил виртуальной Xp с ключом /S . Всё нормально.
ПС. Версия 8.0.7 Personal

baglan97kz 04-05-2014 12:23 2346873
Как сделать такую окно в меню с изображениями
[IMG][/IMG]

minutka15 01-06-2014 19:16 2358576
baglan97kz
Создаешь на нужной страничке WEB object (CTRL+C) и далее суешь в проект свой *.HTML файл, куда втыкаешь картинки стрелки переходы и все прочие команды...

cartmenezz 17-08-2017 18:08 2759007
Iska, Здравствуйте, может подскажете?

Пытаюсь создать простейшее окошко с парой кнопок. при нажатии кнопки должна запуститься программа из рядомлежащей папки.
Сценарий для кнопки нужен примерно такой:
result = Shell.Execute("setup\\proga1.exe", "open", "", "", SW_SHOWNORMAL, false);

нужно собрать проект именно в exe ("Исполняемый файл Web/Email"), одним файлом. А то, что он должен запускать лежит рядом в папке setup.
пробовал по разному прописать путь, но работать никак не хочет, только если собирать внутрь exe. а это совершенно не то что нужно..

пробовал:
result = Shell.Execute("setup\\proga1.exe", "open", "", "", SW_SHOWNORMAL, false);
result = Shell.Execute("\\setup\\proga1.exe", "open", "", "", SW_SHOWNORMAL, false);
result = Shell.Execute(".\\setup\\proga1.exe", "open", "", "", SW_SHOWNORMAL, false);
result = Shell.Execute("\\.\\setup\\proga1.exe", "open", "", "", SW_SHOWNORMAL, false);
result = Shell.Execute("..\\setup\\proga1.exe", "open", "", "", SW_SHOWNORMAL, false);
result = Shell.Execute("\\..\\setup\\proga1.exe", "open", "", "", SW_SHOWNORMAL, false);

ничего не получается...
Возможно ли это вообще? или придется собирать проект как "Папка на жестком диске"?
Извиняюсь если вопрос глупый/

Iska 18-08-2017 01:45 2759095
cartmenezz, а чем Вас не устраивает Quick Action→Run Program, что Вы вместо него предпочитаете именно скрипт?

Цитата:
Цитата cartmenezz
при нажатии кнопки должна запуститься программа из рядомлежащей папки. »
Цитата:
Цитата cartmenezz
А то, что он должен запускать лежит рядом в папке setup. »
«рядом» — с чем? Вот у меня каталог «Setup» расположен в том же каталоге, что и «autorun.exe»:
Скрытый текст

и всё работает. А у Вас?

Цитата:
Цитата cartmenezz
нужно собрать проект именно в exe ("Исполняемый файл Web/Email"), одним файлом. »
И так тоже работает. Только это вовсе не «один файл», а банальный sfx-zip, при запуске он извлекает всё своё содержимое в %TEMP% и оттуда исполняет autorun.exe.

cartmenezz 19-08-2017 12:02 2759382
Iska,
Благодарю за ответ!

1) Quick Action→Run Program устраивает, но там прога не дает редактировать путь, поэтому полез в скрипт
2) Так как у вас на скрине у меня тоже работает, просто хотел избежать доп.папки AutoPlay и lua5.1.dll, lua51.dll
3) Уже понял что это SFX :-((
но тогда не понимаю как он у Вас работает? или вы имеете ввиду что у Вас и папка setup внутри этого Sfx ???
просто этого я тоже пытаюсь избежать, так как эта папки очень большая...
Пытался добиться результата: exe (как оказалось sfx.exe) и рядом папка setup, но естественно все варианты путей,
которые я перебирал не катят, так как окончательно прога уже рабоет из %temp%.
Или есть какая-то константа обозначающая место запуска sfx ?? как у 7z sfx builder ??? просто я такой инфы не нашел.
конечно можно было собрать проект в папку а уже потом запаковать тем же 7z sfx builder или аналогичной прогой,
но на подобный софт антивирусники любят ругаться, хотел полностью обойтись AutoPlay

Iska 19-08-2017 12:52 2759391
Цитата:
Цитата cartmenezz
но там прога не дает редактировать путь »


Цитата:
Цитата cartmenezz
но тогда не понимаю как он у Вас работает? или вы имеете ввиду что у Вас и папка setup внутри этого Sfx ??? »
Да:

И всё остальное — тоже.

Цитата:
Цитата cartmenezz
так как окончательно прога уже рабоет из %temp%. »
Именно так. Там создаётся папка, в неё извлекается содержимое sfx, затем оттуда запускается autorun.exe.

Цитата:
Цитата cartmenezz
Или есть какая-то константа обозначающая место запуска sfx ?? как у 7z sfx builder ??? »
И что бы это Вам дало? Ну, так, чисто гипотетически? sfx — это одно, проект, результатом которого является autorun.exe — совсем другое.

Цитата:
Цитата cartmenezz
а уже потом запаковать тем же 7z sfx builder или аналогичной прогой, »
Игла в яйце, яйцо в утке, утка в зайце…


Что Вы хотите получить в конечном итоге и для каких целей?

cartmenezz 19-08-2017 13:36 2759396
Iska,
хочу получить:

1) setup.exe (одним файлом)
2) setup\proga1.exe, proga2.exe, proga3.exe,...

тоесть нужен лаунчер для запуска других прог, окошко с кнопками. прог много и папка setup большая. плюс планирую их обновлять,
поэтому и не хочу внутрь sfx паковать - файл будет оч большой и обновление будет требовать перепаковок.
при сохранении проекта в виде папки с файлами все работает, но хотелось избежать dll и папки AutoPlay, исключительно в эстетических соображениях))
константа обозначающая папку запуска дала бы именно то что нужно:
проект (малого размера) бы распаковывался в %temp%, запускался бы temp\autorun.exe но при нажатии кнопок открывались бы проги из папки setup которая осталась в месте запуска, рядом с SFX. тоесть я бы смог прописать путь запуска для кнопки что-то вроде - {source}\setup\proga1.exe

PS: в принципе проблему уже решил другими средствами, один добрый человек посоветовал AutorunPro (на выходе один компактный файл, подхватывает что нужно из соседней папки)... просто уже хотелось домучать вариант с AutoPlay Media Studio , так как возможностей у нее поболее.. но для моих целей они пока необязательны..

СПАСИБО за помощь))

Iska 19-08-2017 13:51 2759398
cartmenezz, не вижу в этом необходимости.

zloyPraded 12-03-2019 09:43 2862661
Здравствуйте Старожилы.
Вопрос: Как взять напечатанный текст из объекта [Input] и сохранить его в файл.txt.
Пример-> Объект Input1 (xxxxxxxxxx сам текст) ---> далее Буттон[кнопка] ,_ на неё вешаем сценарий, только какой? Работал с переменной массива, после клика на [буттон] он создает файл и данные записывает из текста массива. Но как заменить текст массива на переменную текста объекта input1 ?
>>>>
Button [OnClick] -
result = Input.GetText("Input1");
-- Перечисляемые данные (массив).
my_table = {"First Element","Second Element","Third Element"}; --как заменить данный текст на переменную объекта Input1?
result = Input.GetText("Input1");
-- Перечисляемые данные (массив).
my_table = ("Input1");
TextFile.WriteFromTable("C:\\MyFile.txt", my_table, false); --так отваливается буттон.

Напишу проще.
Условие:
Если в объекте Input что-то напечатали, значит сохраняем напечатанное в фал.txt
2 объекта. 1(это Input) 2(это кнопка Button)

Iska 12-03-2019 10:25 2862670
Например:
Скрытый текст
Код:
local sDestPath = 'C:\\Мои проекты\\0251\\Sample.txt'
local sValue    = Input.GetText('Input1');

if (String.Length(sValue) > 0) then
        TextFile.WriteFromString(sDestPath, sValue);
end

zloyPraded 12-03-2019 10:44 2862674
Уважаемый Iska, Вы можете подробно рассказать, какие переменные или , что Вы использовали в вашем скрипте?
Вопрос: Как задать команду, чтобы файл создавался новый, не перезаписывая старый.
local sDestPath = 'C:\\Sample.txt'<- Каждый новый текст, новый файл. Новое нажатие.
local sValue = Input.GetText('Input1');
=======
local sDestPath = 'C:\\Sample1.txt'<- Каждый новый текст, новый файл. Новое нажатие.
local sValue = Input.GetText('Input1');
=======
local sDestPath = 'C:\\Sample3.txt' <- Каждый новый текст, новый файл. Новое нажатие.
local sValue = Input.GetText('Input1');

Iska 12-03-2019 12:56 2862705
Цитата:
Цитата zloyPraded
Вопрос: Как задать команду, чтобы файл создавался новый, не перезаписывая старый.
local sDestPath = 'C:\\Sample.txt'<- Каждый новый текст, новый файл. Новое нажатие.
local sValue = Input.GetText('Input1'); »
а) опишите принципы, по которому будет определяться и формироваться новое имя файла, б) где и как это имя будет храниться (если нужно сохранять имя файла между сеансами).

zloyPraded 12-03-2019 14:26 2862725
Объект - Input1 (Он имеет в себе напечатанный текст пользователем.)
Объект - Button (Сохраняет текст в файл 1.txt) но при новом тексте, новый фал 1(a).txt имя рандомно.
Объект - Button (Открывает любой из сохраненных фалов в папке. Но открывает в объекте Input1)

Iska 12-03-2019 17:06 2862749
zloyPraded, так мы далеко не уедем. Лучше опишите задачу, а не выбранный способ реализации.

zloyPraded 12-03-2019 17:25 2862753
Задача:
Объект Input. В нем с помощью кнопок реализовать небольшой редактор txt файлов.
Первая кнопка сохраняет информацию из объекта Input. (имя документа состоит из системной даты и времени) для удобства.
Вторая кнопка служит для отображения информации из файла txt. Она открывает проводник, где можно выбрать txt файл из созданного дистрибутива.. Отображает информацию в том же объекте Input.

zloyPraded 12-03-2019 17:47 2862755
Вложений: 1
Пример

Iska 12-03-2019 19:36 2862768
Ну, например:
ButtonOpen
Код:
local result = Dialog.FileBrowse(true, 'Locate File', _SourceFolder, 'Text File (*.txt)|*.txt|All Files(*.*)|*.*', '', 'txt', false, true)

if (result[1] ~= 'CANCEL') then
        local sDestPath = result[1]
        local sValue    = TextFile.ReadToString(sDestPath)
        Input.SetText('Input1', sValue);
end
ButtonSave
Код:
local result = Dialog.FileBrowse(true, 'Locate File', _SourceFolder, 'Text File (*.txt)|*.txt|All Files(*.*)|*.*', '', 'txt', false, true)

if (result[1] ~= 'CANCEL') then
        local sDestPath = result[1]
        local sValue    = Input.GetText('Input1')
       
        if (String.Length(sValue) > 0) then
                TextFile.WriteFromString(sDestPath, sValue)
        end
end

zloyPraded 12-03-2019 20:42 2862775
Выражаю Большое Уважение Ветерану-Старожилу Iska!! Мой низкий поклон Вам.
Но, файл нужно создавать новый. Открывается диалоговое окно, нужно избежать этого, потому, что на кнопку открыть привязывается функция сохранения, обман.А имя у файла дата и время создания.
Как реализовать это?
Есть переменные
local date = System.GetDate(DATE_FMT_ISO);
local time = System.GetTime(TIME_FMT_MIL);
local sDestPath = 'C:\\file_'..date..'_'..time..'.txt'
Но данный код не работает.

zloyPraded 12-03-2019 22:01 2862787
Вопрос 2
Есть объект [Image]
Есть объект [Input]
Цель: отображения информации: координат курсора (x), (y) на объекте [image]
Как реализовать?
Для конкретного объекта имеются решения, но для Курсора не смог решить.

Iska 12-03-2019 22:57 2862800
Цитата:
Цитата zloyPraded
Но, файл нужно создавать новый. Открывается диалоговое окно, нужно избежать этого, потому, что на кнопку открыть привязывается функция сохранения, обман.А имя у файла дата и время создания. »
Не смог перевести на русский.

Цитата:
Цитата zloyPraded
Есть переменные
local date = System.GetDate(DATE_FMT_ISO);
local time = System.GetTime(TIME_FMT_MIL);
local sDestPath = 'C:\\file_'..date..'_'..time..'.txt'
Но данный код не работает. »
Естественно: в именах файлов недопустимы двоеточия. Используйте замену:
Код:
local sDestPath = 'C:\\file_' .. System.GetDate(DATE_FMT_ISO) .. '_' .. String.Replace(System.GetTime(TIME_FMT_MIL), ':', '-') .. '.txt'

Dialog.Message('', sDestPath)
Цитата:
Цитата zloyPraded
Вопрос 2
Есть объект [Image]
Есть объект [Input]
Цель: отображения информации: координат курсора (x), (y) на объекте [image]
Как реализовать? »
Полагаю, никак. Нет событий, связанных с перемещением мышки над объектом, есть только события входа, выхода, щелчка и правого щелчка.

Update:
Цитата:
Цитата Iska
Полагаю, никак. Нет событий, связанных с перемещением мышки над объектом, есть только события входа, выхода, щелчка и правого щелчка. »
Хотя нет, можно. Хоть и кривовато, но можно.

Добавьте следующий код:
Код:
local tInfo = Image.GetPos('Image1')
local tSize = Image.GetSize('Image1')

local iDeltaX = e_X - tInfo.X
local iDeltaY = e_Y - tInfo.Y

if iDeltaX > 0 and iDeltaX < tSize.Width and iDeltaY > 0 and iDeltaY < tSize.Height then
        Input.SetText('Input1', iDeltaX .. 'x' .. iDeltaY)
else
        Input.SetText('Input1', '')
end
на вот эту:
Скрытый текст
вкладку.

zloyPraded 15-03-2019 00:12 2863199
Уважаемый Iska, у меня созрел к Вам следующий вопрос:
Как изменить меру измерения координат? Если координатная сетка на изображении имеет другую измерительную систему.

zawodskoi 11-01-2020 08:55 2904492
Уважаемые знатаки, помогите мне подалуйста с одной проблемкой В AutoPlay Media Studio.
есть Listbox с большим списком наименований и есть поле input, как организовать поиск в листбоксе при помощи поля инпут, например; вписываем в поле инпут слово и если оно присутствует в листбоксе то выделяется там. Помогите пожалуйста, я начинающий.
Заранее благодарен.

Iska 11-01-2020 16:06 2904540
zawodskoi, ну, например, помещаете в событие On Key поля Input следующий код ('ListBox1' — имя Вашего поля ListBox'а):
Код:
local sListBoxName = 'ListBox1';
local iIndex = ListBox.FindItem(sListBoxName, LB_ALLITEMS, LB_BYTEXT, '*' .. Input.GetText(this) .. '*');

ListBox.DeselectItem(sListBoxName, LB_ALLITEMS);

if(iIndex ~= LB_ERROR) then
        ListBox.SelectItem(sListBoxName, iIndex)
end

zawodskoi 12-01-2020 02:26 2904598
Iska, спасибо, хороший код, ищет даже по символам. Мне бы самому недодуматься было.

Катран007 03-10-2023 16:28 3017430
У меня возникла такая проблема при составлении карты из нескольких страниц все команды прописываются но при просмотре ничего не работает и сохранение недоступно.[

griazetskiy@vk 15-02-2024 12:08 3024213
Здравствуйте! Делаю лаунчер для старой игры. С добавлением записи в реестр, с настройками в ini. Справился почти со всем, кроме установки .sdb через sdbinst.exe. Это необходимо, так как в игре на современных системах не верно отображается цвет шрифтов.
Делал так:
File.Run("sdbinst.exe", "D:\\Launcher G3Part1\\genesis.sdb", "", SW_SHOWNORMAL, false);
Не сработало. Причем просто установка с bat файла работает хорошо. Подскажите в чем может быть проблема? Заранее спасибо!

griazetskiy@vk 15-02-2024 12:25 3024214
Нашел закономерность!
Беда все в пробелах. Если \Launcher G3Part1 заменить на \Launcher-G3Part1, то все работает.
Не подскажите как избежать этого. Ну кроме как убирать пробелы из пути к файлу. Хочется игру сделать максимально портативной, чтобы пользователь мог положить ее в любую папку и запустить.


Время: 05:56.

Время: 05:56.
© OSzone.net 2001-