Что нового

Как запустить приложение.

Bayka

Новичок
Сообщения
6
Репутация
0
Вот для начала я хочу сделать программу, которая будет запускать игры.

Код:
#include <GUIConstants.au3>

;Это окно программы
GUICreate("Стартер",200,200)

;Это надписи
GUICtrlCreateLabel ("Стартер - быстрый запуск игр",23,5,200,20)
GUICtrlCreateLabel ("- Warcraft 3",60,35,50,20)
GUICtrlCreateLabel ("- CS 1.6",60,65,50,20)
GUICtrlCreateLabel ("- Fallout 3",60,95,50,20)
GUICtrlCreateLabel ("- GTA 4",60,125,50,20)
GUICtrlCreateLabel ("- Бинды",60,155,50,20)

;Это кнопки
$start1 = GUICtrlCreateButton ("Start",5,30,50)
$start2 = GUICtrlCreateButton ("Start",5,60,50)
$start3 = GUICtrlCreateButton ("Start",5,90,50)
$start4 = GUICtrlCreateButton ("Start",5,120,50)
$start5 = GUICtrlCreateButton ("Start",5,150,50)
GUISetState ()
	 
;Это завершение на красный крестик, и решение моей проблемы
While 1
    $msg = GUIGetMsg()  
    If $msg = $GUI_EVENT_CLOSE Then
        ExitLoop
    ElseIf $msg = $start1 Then
        Run('путь')
    ElseIf $msg = $start2 Then
         Run('путь')
    ElseIf $msg = $start3 Then
        Run('путь')
    ElseIf $msg = $start4 Then
         Run('путь')
    ElseIf $msg = $start5 Then
        Run('путь')
    EndIf
Wend

Спасибо, решение в спойлере.
 

kaster

Мой Аватар, он лучший самый
Команда форума
Глобальный модератор
Сообщения
4,020
Репутация
626
ок, тут тебе постараются помочь, а ты начни с того, что несомненно по силам - чтения правил.

{CodeWarn.SModer}
 

sngr

AutoIT Гуру
Сообщения
1,010
Репутация
408
Открой справку к autoit и читай о
Код:
run
runas
runaswait
 

kaster

Мой Аватар, он лучший самый
Команда форума
Глобальный модератор
Сообщения
4,020
Репутация
626
Код:
While 1
    $msg = GUIGetMsg()  
    If $msg = $GUI_EVENT_CLOSE Then
        ExitLoop
    ElseIf $msg = $start1 Then
        Run('путь Warcraft 3')
    ElseIf $msg = $start2 Then
         Run('путь CS1 path')
    EndIf
Wend
 

Ganibal95

GreenBytes
Сообщения
877
Репутация
240
Вот вариант:
+ Проверка на запуск, что не запустить много раз...
Код:
$File_Run = @ScriptDir & "\FR.exe" ; --- Путь к файлу .exe, Например: C:\Launcher.exe
$File_Name = 'FR.exe'; --- Название, например: Launcher.exe

HotKeySet('{F1}','_Run') ;--- По нажатию F1 Запустится программа

While 1
	Sleep(1)
WEnd

Func _Run()
If Not ProcessExists($File_Name) Then
	Run($File_Run) ; ---- Это лутше Run
EndIf
EndFunc



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

Или так, пример 2ной, с кнопкой и кнопкой от GUI :smile:
Код:
$File_Run = @ScriptDir & "\FR.exe" ; --- Путь к файлу .exe, Например: C:\Launcher.exe
$File_Name = 'FR.exe'; --- Название, например: Launcher.exe

;Это херн знает что но без этого не работает
#include <GUIConstants.au3>

;Это окно программы
GUICreate("Стартер",200,200)

;Это надписи
GUICtrlCreateLabel ("Стартер - быстрый запуск игр",23,5,200,20)
GUICtrlCreateLabel ("- Warcraft 3",60,35,50,20)
GUICtrlCreateLabel ("- CS 1.6",60,65,50,20)
GUICtrlCreateLabel ("- Fallout 3",60,95,50,20)
GUICtrlCreateLabel ("- GTA 4",60,125,50,20)
GUICtrlCreateLabel ("- Бинды",60,155,50,20)

;Это кнопки
$start1 = GUICtrlCreateButton ("Start",5,30,50)
$start2 = GUICtrlCreateButton ("Start",5,60,50)
$start3 = GUICtrlCreateButton ("Start",5,90,50)
$start4 = GUICtrlCreateButton ("Start",5,120,50)
$start5 = GUICtrlCreateButton ("Start",5,150,50)
GUISetState ()

HotKeySet('{F1}','_Run') ;--- По нажатию F1 Запустится программа

While 1
	Sleep(1)
	Switch GUIGetMsg()
		Case $GUI_EVENT_CLOSE
			Exit
		Case $start1
			_Run()
	EndSwitch
WEnd

Func _Run()
If Not ProcessExists($File_Name) Then
	Run($File_Run) ; ---- Это лутше Run
EndIf
EndFunc
 

ViktorSPB

Новичок
Сообщения
109
Репутация
0
Добрый день!
Я пробую запустить таким скриптом свое приложение, а оно запускается как-то не корректно. :-\
Временные файлы после запуска записываются на рабочий стол и запуск видно без предустановок.. Помогала решить вопрос имуляция запуска с коммандной строки, тогда все нормально. В чем проблема, что не так как обычно делает этот Run? Подскажите, где искать ответ..
 

ViktorSPB

Новичок
Сообщения
109
Репутация
0
Да, я тоже так подумал. Потому в Run указал и директорию, не помогло.
Код:
Run($File_Run,'','C:\Allprograms')

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