Что нового

Как передать параметры CreateCombo в ключ запуска программы?

Вовчик55

Новичок
Сообщения
57
Репутация
0
В CreateCombo есть выпадающий список С-Z (диски) и второе окошко с параметрами запуска. Как передать букву диска, и ключ запуска программы в строчку кода? Например нужно запустить с такими параметрами: ShellExecute("C:\flash.exe D: -b")
 

Fever

Скриптер
Сообщения
308
Репутация
112
Код:
GUICreate("")

$hCombo = GUICtrlCreateCombo("C:", 10, 10, 100, 20)
GUICtrlSetData($hCombo, "D:|E:|F:|..|Z:")

$hInput = GUICtrlCreateInput("-b", 10, 50, 100, 20)

$hButton = GUICtrlCreateButton("Button", 10, 90, 60, 20)

GUISetState()

While 1
	Switch GUIGetMsg()
		Case -3
			Exit
		Case $hButton
			MsgBox(0, "", "C:\flash.exe " & GUICtrlRead($hCombo) & " " & GUICtrlRead($hInput))
	EndSwitch
WEnd


если я Вас правильно понял :scratch:
 
Автор
Вовчик55

Вовчик55

Новичок
Сообщения
57
Репутация
0
Вот как-то так сделал, но при запуске выдает ошибку, что не может найти такой файл

Код:
DirCreate("C:\new")
FileCopy("D:\Проги\AutoIT\Проверка флешек\*.*", "C:\new\")

#include <GUIConstants.au3>

GUICreate("Проверка флешек", 600, 400)


$filemenu = GUICtrlCreateMenu ("&Файл")
$fileitem = GUICtrlCreateMenuitem ("Открыть",$filemenu)
GUICtrlSetState(-1,$GUI_DEFBUTTON)
$helpmenu = GUICtrlCreateMenu ("Справка")
$saveitem = GUICtrlCreateMenuitem ("Сохранить",$filemenu)
GUICtrlSetState(-1,$GUI_DISABLE)
$infoitem = GUICtrlCreateMenuitem ("Помощь",$helpmenu)
$infoitem = GUICtrlCreateMenuitem ("О программе",$helpmenu)
$exititem = GUICtrlCreateMenuitem ("Выход",$filemenu)
$recentfilesmenu = GUICtrlCreateMenu ("Recent Files",$filemenu,1)


  GUICtrlCreateLabel("Тест", 20, 10)
  $hCombo =GUICtrlCreateCombo ("C:", 20,30,60) ; create first item
GUICtrlSetData($hCombo,"D:|E:|F:|G:|H:|I:|J:|K:|L:|M:|N:|O:|P:|Q:|R:|S:|T:|V:|W:|X:|Y:|Z:")
     $hInput = GUICtrlCreateInput("-a", 10, 350, 100, 20)
	$1button = GUICtrlCreateButton("Чтение", 20,60,60)
	
	GUICtrlCreateLabel("Сохранить образ на", 110,10)
	GUICtrlCreateCombo ("C:", 110,30,60) ; create first item
	GUICtrlSetData(-1,"D:|E:|F:|G:|H:|I:|J:|K:|L:|M:|N:|O:|P:|Q:|R:|S:|T:|V:|W:|X:|Y:|Z:") 
	$2button = GUICtrlCreateButton("Сохранить", 110,60,60)

GUICtrlCreateGroup ("Выберите", 190, 30, 280, 150)
$radio_1 = GUICtrlCreateRadio ("Тест Чтения", 210, 60, 245, 20)
$radio_2 = GUICtrlCreateRadio ("Сохранить образ флеш", 210, 80, 245, 20)
$radio_3 = GUICtrlCreateRadio ("Залить Образ на флеш", 210, 100, 245, 20)
$radio_4 = GUICtrlCreateRadio ("Тест чтения/записи (на ошибки)", 210, 120, 245, 20)
$radio_5 = GUICtrlCreateRadio ("Сохранить Образ флеш (игнорируя ошибки)", 210, 140, 245, 20)
GUICtrlCreateGroup ("",-99,-99,1,1)  ;close group

GUISetState(@SW_SHOW)

While 1

Switch GUIGetMsg()
      Case -3
	Exit

    Case $1button
	ShellExecute("C:\new\flashnul.exe " & GUICtrlRead($hCombo) & " " & GUICtrlRead($hInput))
    EndSwitch

WEnd
 
Верх