.: NSIS

MKN · Отправлено: **18:03, 04-06-2020** | #**2431**

Цитата inco1:

чтобы в самом начале запуска установщика была проверка учетной записи »

Так это стандартные возможности "боксового" NSIS... В доке есть и пример :

Код:

Name "UserInfo.dll test"
OutFile UserInfo.exe
RequestExecutionLevel Highest

!define REALMSG "$\nOriginal non-restricted account type: $2"

Function .onInit
	ClearErrors
	UserInfo::GetName
	IfErrors PluginFail
	Pop $0
	StrCmp $0 "" 0 +2
		StrCpy $0 "?"
	UserInfo::GetAccountType
	Pop $1
	UserInfo::GetOriginalAccountType
	Pop $2
	StrCmp $1 "Admin" 0 +3 
		MessageBox MB_OK 'User "$0" is in the Administrators group${REALMSG}'
		Goto done
	StrCmp $1 "Power" 0 +3
		MessageBox MB_OK 'User "$0" is in the Power Users group${REALMSG}'
		Goto done
	StrCmp $1 "User" 0 +3
		MessageBox MB_OK 'User "$0" is just a regular user${REALMSG}'
		Goto done
	StrCmp $1 "Guest" 0 +3
		MessageBox MB_OK 'User "$0" is a guest${REALMSG}'
		Goto done
	MessageBox MB_OK "Unknown error"
	Goto done

	PluginFail:
		MessageBox MB_OK "Error! Unable to call plug-in!"
	done:
FunctionEnd

Section
SectionEnd

Можно конечно и по всякому...

inco1 · Отправлено: **19:55, 04-06-2020** | #**2432**

MKN, Это то, что нужно. Попробую прикрутить к моему установщику. Спасибо. Этого в справке не видел.

PS. Всё красиво прикрутил, как в поставленной задаче и всё работает.
Не ясен один момент, кто такой Power?

MKN · Отправлено: **10:11, 05-06-2020** | #**2433**

Цитата inco1:

кто такой Power? »

Цитата:

Power Users group - Группа опытных пользователей
Приложения, требующие повышения прав при запуске в Windows 7, не могут выполнять стандартные учетные записи пользователей, в отличие, например, от загрузки и установки Firefox. Именно здесь приходит группа опытных пользователей, чтобы предоставить необходимые привилегии для этих унаследованных приложений.

Или здесь про Power Users :
https://docs.microsoft.com/en-us/pre...ectedfrom=MSDN

inco1 · Отправлено: **14:08, 06-06-2020** | #**2434**

Всем доброго времени суток.
Я в тупике. Существует ли способ, чтобы не дожидаясь завершения команды "newadvsplash::show 5000 100 100" сделать переход к следующей команде?
Вариант с отдельным экзешником, как то не по взрослому. Может старожилы чего смогут подсказать?

Begin2Fly · Отправлено: **14:28, 06-06-2020** | #**2435**

Цитата inco1:

Всем доброго времени суток.
Я в тупике. Существует ли способ, чтобы не дожидаясь завершения команды "newadvsplash::show 5000 100 100" сделать переход к следующей команде?
Вариант с отдельным экзешником, как то не по взрослому. Может старожилы чего смогут подсказать? »

newadvsplash::show 5000 100 100 /BANNER

inco1 · Отправлено: **14:33, 06-06-2020** | #**2436**

Begin2Fly, Я это пробовал в первую очередь. Пока эта команда не отработает следующая не начинается.

Begin2Fly · Отправлено: **14:39, 06-06-2020** | #**2437**

Цитата inco1:

Begin2Fly, Я это пробовал в первую очередь. Пока эта команда не отработает следующая не начинается. »

https://streamable.com/wj35df
Если дадите более полный код, попробую с вашим.

inco1 · Отправлено: **15:31, 06-06-2020** | #**2438**

Да, у вас это работает. Видимо много чего имеет значение. Нужно некоторое время, чтобы собрать все до кучи. Пришлю в личку.

K.A.V. · Конфигурация компьютера

inco1, как вариант, можно воспользоваться плагином NsThread и создать функцию с отдельным потоком, в которой будет показываться изображение

Будет что-то типа:

Код:

Function ThreadProc
   newadvsplash::show 5000 100 100 /BANNER "$DESKTOP\2222222222222222222222222222222222.jpg"
   MessageBox MB_OK "Сообщение из потока"
FunctionEnd
    

Function .oninit
   ${Thread_Create} ThreadProc $R0
   MessageBox MB_OK "Основной поток"
FunctionEnd

inco1 · Отправлено: **19:54, 08-06-2020** | #**2440**

K.A.V., Спасибо. Begin2Fly предложил простой вариант:

Код:

newadvsplash::show /NOUNLOAD 5000 100 100 -2 /BANNER
; После отработки всех последующих команд добавить это:
newadvsplash::stop

Можно пример добавить в справку.