Можно ли сделать так, чтобы программа в PureBasic сама добавляла себя в список программ, которые запускаются вместе в Windows?
Программа, запускающаяся вместе с Windows.
Страница: 1
Сообщений 1 страница 3 из 3
Поделиться217.06.2013 16:00:33
Можно:
Код:
Procedure ProgramAtStartup(State, ProgName.s) ; Управление автозагрузкой программы
valueName$=ProgramFilename()
GetHandle = RegOpenKeyEx_(#HKEY_CURRENT_USER, "Software\Microsoft\Windows\CurrentVersion\Run", 0, #KEY_ALL_ACCESS, @hKey)
If GetHandle = #ERROR_SUCCESS
If State=1
RegSetValueEx_(hKey, @ProgName, 0, #REG_SZ, @valueName$, StringByteLength(valueName$))
Else
RegDeleteValue_(hKey, @ProgName)
EndIf
RegCloseKey_(hKey)
EndIf
EndProcedure
ProgramAtStartup(1, "здесь имя твоей проги");Добавить в автозагрузку
ProgramAtStartup(0, "здесь имя твоей проги");Удалить из автозагрузкиПоделиться317.06.2013 16:09:49
Вау, круть, спасибо!
Страница: 1