[sawe]

Все что угодно.. Пример использования таймера - системный цикл »

Нет, я имел виду продвижение полосы бара, но только справа на лева (задом на перёд)

[kotkovets]

Нет, я имел виду продвижение полосы бара, но только справа на лева (задом на перёд) »

читать дальше »

Код:

!include LogicLib.nsh
!include nsDialogs.nsh

Name "nsDialogs Timer Example"
OutFile "nsDialogs Timer Example.exe"
XPStyle on

Var DIALOG
Var TEXT
Var PROGBAR
Var Button

Page custom nsDialogsPage

Function CreateFile
       Pop $Button
       SendMessage $PROGBAR ${PBM_SETPOS} 0 0
       SendMessage $PROGBAR ${PBM_GETPOS} 0 0 $1
       ${NSD_SetText} $Text $1%
       
       ${ForEach} $1 0 100 + 10
	    Sleep 300 ;пауза для наглядности
	    SendMessage $PROGBAR ${PBM_DELTAPOS} 10 0
	    SendMessage $PROGBAR ${PBM_GETPOS} 0 0 $1
	    ${NSD_SetText} $Text $1%
       ${Next}
       
       ${ForEach} $1 100 0 - 10
	    Sleep 300 ;пауза для наглядности
	    SendMessage $PROGBAR ${PBM_DELTAPOS} -10 0
	    SendMessage $PROGBAR ${PBM_GETPOS} 0 0 $1
	    ${NSD_SetText} $Text $1%
       ${Next}
FunctionEnd

Function nsDialogsPage
	nsDialogs::Create 1018
	Pop $DIALOG
	${NSD_CreateLabel} 0u 0u 100% 9u ""
	Pop $TEXT
	${NSD_CreateProgressBar} 0u 10u 100% 12u "99"
	Pop $PROGBAR
	${NSD_CreateButton} 90u 70u 70u 12u "Запуск"
	Pop $Button
	${NSD_OnClick} $Button CreateFile
	nsDialogs::Show
FunctionEnd

Section
SectionEnd

MKN специально для тебя

читать дальше »

Код:

!include MUI2.nsh

Name "nsDialogs Timer Example"
OutFile "nsDialogs Timer Example.exe"
XPStyle on

Var DIALOG
Var TEXT
Var PROGBAR
Var Label
Var CheckBox
Var Check


Page custom nsDialogsPage nsDialogsPageDestroy
Page custom nsInstall
!insertmacro MUI_PAGE_FINISH
!insertmacro MUI_LANGUAGE "Russian"

Function nsDialogsPage
    nsDialogs::Create 1018
    ${NSD_CreateLabel} 50u 0u 270u 25u \
                       "$\tДобро Пожаловать!$\nотметьте чекбокс для продолжения!"
    Pop $Label
    CreateFont $1 "Times New Roman" "13" "700"
    SendMessage $Label ${WM_SETFONT} $1 1
    Pop $Label
    ${NSD_CreateCheckBox} 50u 30u 80u 13u "создать файл"
    Pop $CheckBox
    nsDialogs::Show
FunctionEnd

Function nsDialogsPageDestroy
 ${NSD_GetState} $CheckBox $Check
FunctionEnd

Function nsInstall
      ${IfThen} $Check != 1 ${|} Return ${|}
      nsDialogs::Create 1018
      Pop $DIALOG
      ${NSD_CreateLabel} 0u 0u 100% 9u ""
      Pop $TEXT
      ${NSD_CreateProgressBar} 0u 10u 100% 12u "99"
      Pop $PROGBAR
      ${NSD_CreateTimer} CreateFile 1
      nsDialogs::Show
FunctionEnd

Function CreateFile
       ${NSD_KillTimer} CreateFile
        FileOpen $4 text.txt a

  	SendMessage $PROGBAR ${PBM_GETPOS} 0 0 $1
	SendMessage $PROGBAR ${PBM_SETPOS} 0 0
	${NSD_SetText} $Text $1%
	FileWrite $4 "${__FUNCTION__} $1$\r$\n"

	Sleep 500 ;пауза для наглядности
	SendMessage $PROGBAR ${PBM_DELTAPOS} 10 0
	SendMessage $PROGBAR ${PBM_GETPOS} 0 0 $1
	${NSD_SetText} $Text $1%
	FileWrite $4 "${__FUNCTION__} $1$\r$\n"

	Sleep 500 ;пауза для наглядности
	SendMessage $PROGBAR ${PBM_DELTAPOS} 10 0
	SendMessage $PROGBAR ${PBM_GETPOS} 0 0 $1
	${NSD_SetText} $Text $1%
	FileWrite $4 "${__FUNCTION__} $1$\r$\n"

	Sleep 500 ;пауза для наглядности
	SendMessage $PROGBAR ${PBM_DELTAPOS} 10 0
	SendMessage $PROGBAR ${PBM_GETPOS} 0 0 $1
	${NSD_SetText} $Text $1%
	FileWrite $4 "${__FUNCTION__} $1$\r$\n"

	Sleep 500 ;пауза для наглядности
	SendMessage $PROGBAR ${PBM_DELTAPOS} 10 0
	SendMessage $PROGBAR ${PBM_GETPOS} 0 0 $1
	${NSD_SetText} $Text $1%
	FileWrite $4 "${__FUNCTION__} $1$\r$\n"

	Sleep 500 ;пауза для наглядности
	SendMessage $PROGBAR ${PBM_DELTAPOS} 10 0
	SendMessage $PROGBAR ${PBM_GETPOS} 0 0 $1
	${NSD_SetText} $Text $1%
	FileWrite $4 "${__FUNCTION__} $1$\r$\n"

	Sleep 500 ;пауза для наглядности
	SendMessage $PROGBAR ${PBM_DELTAPOS} 10 0
	SendMessage $PROGBAR ${PBM_GETPOS} 0 0 $1
	${NSD_SetText} $Text $1%
	FileWrite $4 "${__FUNCTION__} $1$\r$\n"

	Sleep 500 ;пауза для наглядности
	SendMessage $PROGBAR ${PBM_DELTAPOS} 10 0
	SendMessage $PROGBAR ${PBM_GETPOS} 0 0 $1
	${NSD_SetText} $Text $1%
	FileWrite $4 "${__FUNCTION__} $1$\r$\n"

	Sleep 500 ;пауза для наглядности
	SendMessage $PROGBAR ${PBM_DELTAPOS} 10 0
	${NSD_SetText} $Text $1%
	FileWrite $4 "${__FUNCTION__} $1$\r$\n"

	Sleep 500 ;пауза для наглядности
	SendMessage $PROGBAR ${PBM_DELTAPOS} 10 0
	SendMessage $PROGBAR ${PBM_GETPOS} 0 0 $1
	${NSD_SetText} $Text $1%
	FileWrite $4 "${__FUNCTION__} $1$\r$\n"

	Sleep 500 ;пауза для наглядности
	SendMessage $PROGBAR ${PBM_DELTAPOS} 10 0
	SendMessage $PROGBAR ${PBM_GETPOS} 0 0 $1
	${NSD_SetText} $Text $1%
	FileWrite $4 "${__FUNCTION__} $1$\r$\n"
	FileClose $4
	
FunctionEnd

Section
SectionEnd

[yyv]

Добрый день
нужен совет в таком деле.
используем кастомные странички и кастомный UI.exe
хочется на кастомных страничках, рядом со стандартными кнопками.
Я "ресхаком" растянул диалог 1018 на все окно и теперь соответственно стандартных кнопок не видно.
точнее он становятся видимыми, когда в тех местах, где они должны быть, поводить мышкой.
пробовал кнопки "опустить ниже" не знаю как объяснить. Что бы он были как бы на переднем плане.
не помогает.
пробовал в скрипте прописывать, что он видимые
что то типа
ShowWindow .... ${SW_HIDE}
результат тот же
подскажите, можно ли диалог 1018 растянуть на все окно и что-бы стандартные кнопки при этом были видимыми?

[sawe]

1018 и 1044 имеют похожий размер но используются по разному.
1044 для окна Приветствия и Финального
1018 для всех остальных.
Можете создать свой любой другой контрол, к примеру 1304 и растягивать его как вам угодно,
но учтите, что один контрол может перекрывать другой, здесь последовательность очень важна.
Мало того, вы можете добавить графику
CONTROL "", 1304, STATIC, SS_BITMAP | WS_CHILD | WS_VISIBLE, 0, 0, 332, 222

Чтобы рисунок заполнял всё окно, без просветов, мона даже нуна так
CONTROL "", 1304, STATIC, SS_BITMAP | WS_CHILD | WS_VISIBLE, 65534, 65534, 334, 224

Но всё это можно сделать и по другому не трогая форму а вставить соответствующий макрос в скрипт

--

[yyv]

Можете создать свой любой другой контрол, к примеру 1304 и растягивать его как вам угодно, но учтите, что один контрол может перекрывать другой, здесь последовательность очень важна. »

так какая разница?
я могу растянуть 1018 использовать его так?
но когда растягиваю то получаю не то что надо.
те кнопки есть но они появляются когда там мышкой проведешь....
при этом, как и писал ранее я кнопки переместил в ресхаке
сначала 1018, потом кнопки
и в ресхаке их видно
вроде все логично
скорее всего я что-то не так делаю...хз...

[kotkovets]

yyv, А вот чем не устраивает 1044....

читать дальше »

Код:

!include "MUI2.nsh"
Page custom nsDialogsPage
!insertmacro MUI_PAGE_INSTFILES
!insertmacro MUI_LANGUAGE "Russian"
Name "nsDialogs Timer Example"
OutFile "nsDialogs Example.exe"
Var DIALOG

Function HideControls
    LockWindow on
    GetDlgItem $0 $HWNDPARENT 1028
    ShowWindow $0 ${SW_HIDE}
    GetDlgItem $0 $HWNDPARENT 1256
    ShowWindow $0 ${SW_HIDE}
    GetDlgItem $0 $HWNDPARENT 1035
    ShowWindow $0 ${SW_HIDE}
    GetDlgItem $0 $HWNDPARENT 1037
    ShowWindow $0 ${SW_HIDE}
    GetDlgItem $0 $HWNDPARENT 1038
    ShowWindow $0 ${SW_HIDE}
    GetDlgItem $0 $HWNDPARENT 1039
    ShowWindow $0 ${SW_HIDE}
    GetDlgItem $0 $HWNDPARENT 1045
    ShowWindow $0 ${SW_HIDE}
    LockWindow off
FunctionEnd

Function ShowControls
    LockWindow on
    GetDlgItem $0 $HWNDPARENT 1028
    ShowWindow $0 ${SW_NORMAL}
    GetDlgItem $0 $HWNDPARENT 1256
    ShowWindow $0 ${SW_NORMAL}
    GetDlgItem $0 $HWNDPARENT 1035
    ShowWindow $0 ${SW_NORMAL}
    GetDlgItem $0 $HWNDPARENT 1037
    ShowWindow $0 ${SW_NORMAL}
    GetDlgItem $0 $HWNDPARENT 1038
    ShowWindow $0 ${SW_NORMAL}
    GetDlgItem $0 $HWNDPARENT 1039
    ShowWindow $0 ${SW_NORMAL}
    GetDlgItem $0 $HWNDPARENT 1045
    ShowWindow $0 ${SW_NORMAL}
    LockWindow off
FunctionEnd

Function nsDialogsPage
	nsDialogs::Create 1044
	Pop $DIALOG
	
	Call HideControls
	nsDialogs::Show
	Call ShowControls
FunctionEnd

Section
SectionEnd

[sawe]

так какая разница? я могу растянуть 1018 использовать его так? »

Вы бы лучше объяснили, что вы хотите в конце получить!
Я немного догадываюсь, что вы хотите сделать, вы можете поступить немного иначе.....

Может вам проще будет использовать SpiderBanner плагин, он примерно в стиле MSI.
Он автоматом скрывает окно NSIS на время выполнения, после окно NSIS восстанавливается.

[yyv]

Я наверное действительно плохо объясняю. попробую еще раз
вот код 105 диалога из ресхака

читать дальше »

Код:

105 DIALOGEX 0, 0, 440, 285
STYLE DS_FIXEDSYS | DS_CENTER | WS_POPUP | WS_CAPTION | WS_SYSMENU
CAPTION ""
LANGUAGE LANG_ENGLISH, SUBLANG_ENGLISH_US
FONT 8, "MS SHELL DLG"
{
   CONTROL "", 1018, STATIC, SS_LEFT | WS_CHILD, 0, 0, 440, 265 
   CONTROL "", 1044, STATIC, SS_LEFT | WS_CHILD, 0, 0, 440, 266 
   CONTROL "", 1256, STATIC, SS_LEFT | WS_CHILD | WS_VISIBLE | WS_GROUP, 8, 260, 96, 15 
   CONTROL "", 1028, STATIC, SS_LEFT | WS_CHILD | WS_VISIBLE | WS_GROUP, 8, 260, 97, 15 
   CONTROL "", 3, BUTTON, BS_PUSHBUTTON | WS_CHILD | WS_VISIBLE | WS_GROUP | WS_TABSTOP, 281, 258, 67, 18 
   CONTROL "", 1, BUTTON, BS_PUSHBUTTON | WS_CHILD | WS_VISIBLE | WS_TABSTOP, 362, 258, 67, 18 
   CONTROL "", 2, BUTTON, BS_PUSHBUTTON | WS_CHILD | WS_VISIBLE | WS_GROUP | WS_TABSTOP, 116, 258, 67, 18 
}

не суть важно, буду я рисовать в 1018 или в 1044 контроле. результат везде один и тот же.
сейчас, к примеру, я использовал контрол 1044
я его растянул не на весь диалог, а на середину кнопок, чтобы было более наглядно.
вот скрины
на этом

видно. что кнопки на половину закрыты (если бы контрол 1044 был растянут на весь диалог, то кнопок не было бы видно совсем)
вот второй скрин

это состояние кнопки после того как на ней поводить мышкой, она появляться.
мне нужно, что бы контрол был растянут на весь диалог. И что бы стандартные кнопки при этом был видны сразу.

пробовал разные сочетания этих конструкций

Код:

 
GetDlgItem $R2 $HWNDPARENT 1   
 EnableWindow $R2 1  
ShowWindow $R2 ${SW_SHOW} 
 ShowWindow $R2 ${SW_NORMAL}

результат такой же
если что-то еще не понятно, спрашиваете, попытаюсь объяснить.

[kotkovets]

yyv, Я все прекрасно понял, что вы хотите! поэтому предложил 1044 в своем примере
Вы не добьетесь желаемого результата стандартными средствами NSIS, для этого есть плагины
или написать свой плагин, коль разбираетесь в языках программирования, хотя не факт,
каким то образом можно сделать плагином system -
входящий в комплект стандартной поставки NSIS - вызовами WinAPI.
Я имею ввиду, 1044 растянуть до кнопок, а на поверх кнопок, наложить фоновую картинку
под цвет основного фона, примерно как это сделано в ExperienceUI
и за одно можно наложить текстуру кнопок под цвет фона - есть такой плагин на офф.сайте

[yyv]

kotkovets, дело в том, что мне нужно не просто растянуть контрлол на весь диалог, а мне нужна возможность рисовать необходимые мне элементы в нижней части.
например добавить чекбокс между кнопками
или возле кнопки добавить лейбл и картинку
и я уже завис совсем и ни чего не понимаю...


вот к примеру
я создаю страницу

читать дальше »

Код:

; dialog create function
Function fnc_CustomLicensePage_Create
  
  ; === CustomLicensePage (type: Dialog) ===
  nsDialogs::Create  1044
  Pop $hCtl_CustomLicensePage
  ${If} $hCtl_CustomLicensePage == error
    Abort
  ${EndIf}
  .....
  ......
  .....
  FunctionEnd
  
; dialog show function
Function fnc_CustomLicensePage_Show
  Call fnc_CustomLicensePage_Create
  nsDialogs::Show $hCtl_CustomLicensePage

FunctionEnd

и в диалоге у меня к примеру контрол Static например 1149
если я добавлю
после Show
nsDialogs::Create 1149 то это же я так понимаю не правильно....

как мне на этом контроле на одной страничке также с помощью nsDialogs (ну или с любой другой помощью) нарисовать нужные мне элементы?
или я все таки не понимаю самой сути процесса?

появилась идея.. попробую вечером...
но вопрос открыт