Имя пользователя:
Пароль:  
Помощь | Регистрация | Забыли пароль?  

Показать сообщение отдельно

Аватара для K.A.V.

Ленивый кусок мяса


Contributor


Сообщения: 1986
Благодарности: 723

Профиль | Сайт | Отправить PM | Цитировать


MKN, да блин, какая разница то? Используй плагин time и делай математическую операцию
Ведь всё к одному и тому-же сходится один фиг

Держи, дружище
Копайся
Код: Выделить весь код
!include "MUI2.nsh"
!include "FileFunc.nsh"
!include "LogicLib.nsh"
!include "WinMessages.nsh"
!include "nsDialogs.nsh"

!include "FileFunc.nsh"
!insertmacro GetTime
var day 
var month 
var year 
var name_day 
var hour 
var minute 
var seconds
var S_day 
var S_month 
var S_year 
var S_name_day 
var S_hour 
var S_minute 
var S_seconds
!include "Time.nsh"

Page custom func
!insertmacro MUI_PAGE_INSTFILES 
!insertmacro MUI_LANGUAGE "Russian" 

Name "TEST.exe"
Caption "TEST.exe"
OutFile "TEST.exe" 
ShowInstDetails show 
XPStyle on

Var dlg
Var RadioButton1
Var RadioButton2
Var CheckBox
Var Label
Var button
var TimerStarted






 
Function func
 nsDialogs::Create 1018
 pop $0

 GetDlgItem $0 $HWNDPARENT 1037
 SendMessage $0 ${WM_SETTEXT} 0 "STR:Мой текст строки №1"

 GetDlgItem $0 $HWNDPARENT 1038
 SendMessage $0 ${WM_SETTEXT} 0 "STR:Мой текст строки №2"

 
 ${NSD_CreateButton} 25u 27u 150u 15u "Жми давай!"
 pop $button
 ${NSD_OnClick} $button StartTimer
 
 ${NSD_CreateLabel} 0 5u 200u 200u "Здесь будет времечко ;)" 
 pop $Label
    GetFunctionAddress $0 FuncTimer
    ThreadTimer::Start /NOUNLOAD 1000 -1 $0
  
 nsDialogs::Show 
FunctionEnd


Function StartTimer
# Добавил переменную, потому что при старте сразу идёт отображение времени
StrCpy $TimerStarted 1
${GetTime} "" "L" $S_day $S_month $S_year $S_name_day $S_hour $S_minute $S_seconds
    GetFunctionAddress $0 FuncTimer
    ThreadTimer::Start 1000 -1 $0
FunctionEnd   

Function FuncTimer
# Добавил переменную, потому что при старте сразу идёт отображение времени
StrCmp $TimerStarted "1" +2 0
abort
SendMessage $button ${WM_SETTEXT} "" "STR:Жми ещё для сброса таймера!"
${GetTime} "" "L" $day $month $year $name_day $hour $minute $seconds
${time::MathTime} "second($day.$month.$year $hour:$minute:$seconds) - second($S_day.$S_month.$S_year $S_hour:$S_minute:$S_seconds) =date" $0
StrCpy $0 $0 "" -8  ; Здесь мы отсекаем строку даты, оставляя только часы/минуты/секунды
SendMessage $Label ${WM_SETTEXT} "" "STR:Время: $hour:$minute:$seconds (с момента запуска прошло: $0)"
FunctionEnd
 


Section
;SetAutoClose true
SectionEnd

-------
[Справочник по командам Windows] -- [Справочник по NSIS] -- [SFX Creator - для создания SFX архивов]

Это сообщение посчитали полезным следующие участники:

Отправлено: 13:27, 16-02-2013 | #266