Первый и единственный запуск скрипта

[nu3dell]

Нужно при первом запуске скрипта на компьютере был MsgBox(64,'1 раз', "Привет") как бы ознакомительное сообщение, при всех остальных было обычно GUI без MsgBox(64,'1 раз', "Привет") при запуске.
Может нужно делать ini файл где MsgBox=0 что значит не разу не запускалось, а как запустилось менять на 1, но это только идея

 

[Belfigor]

$var = IniRead(@ScriptDir&"\test.ini", "section2", "key", "1stTime")
If $var = "1stTime" Then
    MsgBox(0,0,"Привет")
    IniWriteSection(@ScriptDir&"\test.ini", "section2", "key = Not1stTime")
EndIf

 

[Zaramot]

Можно так:

If Not FileExists(@TempDir & '\msg.txt') Then
	MsgBox(64,'1 раз', "Привет")
	FileWrite(@TempDir & '\msg.txt', '')
Else
	GUICreate("Form1", 306, 135)
	GUISetState()

	Do
	Until GUIGetMsg() = -3
EndIf

 

[nu3dell]

Belfigor Спасибо, ваш понравился. Zaramot тоже спасибо.

 

[Zaramot]

Можно ещё через реестр:

If RegRead('HKEY_CURRENT_USER\Software\Test', 'Test') = '' Then
	MsgBox(64, '1 раз', 'Привет')
	RegWrite('HKCU\SOFTWARE\Test', 'Test', 'REG_SZ', 1)
Else
	GUICreate("Form1", 306, 135)
	GUISetState()

	Do
	Until GUIGetMsg() = -3
EndIf

 

[Belfigor]

Через реестр кстати кошернее на мой взгляд