Что нового

информация на ехе программку

retmike

Новичок
Сообщения
3
Репутация
0
Здравствуйте, я завиртуалил свою программку с помощью VMware ThinApp и теперь хочу сделать так что бы при открытии ехе программа сразу не запускалась а появилось окошко с информацией о проге контакты и ок и отмена. я не очень понимаю эту программу AutoIt кто может помогите разобраться.
 

madmasles

Модератор
Глобальный модератор
Сообщения
7 790
Репутация
2 319
retmike
Если я правильно Вас понял, то Ваша программа уже скомпилирована в .exe.
Тогда можно примерно так:
Код:
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>

_myWindow()

FileInstall(@ScriptDir & "\myproga.exe", @TempDir & "\myproga.exe", 1)
RunWait(@TempDir & "\myproga.exe", @TempDir, @SW_HIDE)
FileDelete(@TempDir & "\myproga.exe")
Exit

Func _myWindow()
	$Form1 = GUICreate("Моя программа", 200, 100, -1, -1, $WS_CAPTION)
	$Label1 = GUICtrlCreateLabel("Это моя программа. Если хотите ее запустить, нажмите Продолжить, не хотите, нажмите Выход.", 5, 5, 190, 50, $SS_CENTER)
	$Button1 = GUICtrlCreateButton("Продолжить", 10, 60, 85, 30, 0)
	$Button2 = GUICtrlCreateButton("Выход", 105, 60, 85, 30, 0)
	GUISetState(@SW_SHOW)

	While 1
		$nMsg = GUIGetMsg()
		Switch $nMsg
			Case $Button1
				GUIDelete($Form1)
				ExitLoop
			Case $Button2
				Exit
		EndSwitch
	WEnd
EndFunc   ;==>_myWindow



Добавлено:
Сообщение автоматически объединено:

OffTopic:
retmike
Я думаю, что те вопросы, которые Вы задали мне в ПМ, лучше задавать в форуме, так как здесь Вы получите более квалифицированные ответы.
Теперь по существу. Если Вас действительно заинтересовал AutoIt, то, конечно, его надо скачать и установить. Здесь на сайте есть все необходимые ссылки. А потом экспериментируйте, если возникают вопросы, то задавайте в форуме и Вам всегда ответят. Знаю это на собственном опыте, так как сам узнал о существовании AutoIt в середине ноября прошлого года. И еще совет. Если Вы дружите с англ. языком, то читайте внимательно справку в оригинале, если не дружите (как я), то читайте справку на русском языке (там очень много нужного и интересного). :IL_AutoIt_1:
 

CreatoR

Must AutoIt!
Команда форума
Администратор
Сообщения
8 473
Репутация
2 403
Вот вариант по проще:
Код:
$iAsk = MsgBox(36, "Внимание", "Запускать?")
If $iAsk = 6 Then Run("MyProga.exe")


:smile:
 

madmasles

Модератор
Глобальный модератор
Сообщения
7 790
Репутация
2 319
CreatoR
Так вопрос был:
...программа сразу не запускалась а появилось окошко с информацией о проге контакты и ок и отмена...
А эту информацию в MsgBox() не засунуть.
 

madmasles

Модератор
Глобальный модератор
Сообщения
7 790
Репутация
2 319
Автор
R

retmike

Новичок
Сообщения
3
Репутация
0
Здравствуйте вопрос так и не решен, на .ехе файл после вирутализации выше указанные методы не подходят, начал пробывать до вирутализации, но столкнулся с проблемой, .ехе файл у меня в проекте (как вьювер) но так же есть еще один файл непосредственно сам проект .qd3, (работает так что при запуске .ехе выводится окошко и еще нужно указать вот этот файл .qd3 после чего проект начинает загружаться) как сделать так что бы при запуске этого вьювера ехе появлялась информация о программе (Описание ее+ контакты тел,емейлы и т д выбор ок и отмена) и после того как нажимаем ок автоматически подхватывал (запускал непосредственно сам файл проекта .qd3)??
 

madmasles

Модератор
Глобальный модератор
Сообщения
7 790
Репутация
2 319
retmike
Я отвечал на Ваш конкретный вопрос:
retmike [?]
..так что бы при открытии ехе..
Никто же не знает, что это за программа, чем она запускается, какие в нее дополнительные файлы входят кроме .exe.
Если файлов несколько, то сколько файлов, столько и :
Код:
FileInstall(@ScriptDir & "\myproga.exe", @TempDir & "\myproga.exe", 1)
FileInstall(@ScriptDir & "\myFile_1.xxx", @TempDir & "\myFile_1.xxx", 1)
..............
FileInstall(@ScriptDir & "\myFile_n.xxx", @TempDir & "\myFile_n.xxx", 1)

А дальше
Код:
Run("Нужный Вам файл для запуска программы")
 
Автор
R

retmike

Новичок
Сообщения
3
Репутация
0
Не получается так ехе не подхватывает вот этот файл qd3
 

madmasles

Модератор
Глобальный модератор
Сообщения
7 790
Репутация
2 319
retmike [?]
Не получается так ехе не подхватывает вот этот файл qd3
И...?

OffTopic:
retmike ,
Вы попробуйте прочитать внимательно Ваши вопросы, при этом учесть, что никто кроме Вас не знает о какой программе идет речь, что она делает, что подхватывает... И как тут можно помочь?
 
Верх