[MaGoth]

Есть у программистов такая негласная защита от дурака: в опубликованных исходниках делать несколько ошибок. Опытные сразу поймут что-к-чему (по сообщениям компилятора) и исправят. А начинающие, или неопытные будут говорить, что у них ничего не получается.»

Ух ты как интересно..

Может вы прокомментируете эту защиту от дурака ?!

Скрытый текст

Код:

1>------ Построение начато: проект: Nsis7z, Конфигурация: Debug Win32 ------ 
1>  StdAfx.cpp 
1>  UserInputUtils.cpp 
1>c:\users\александр\desktop\7zip\ui\nsis\userinpututils.cpp(5): fatal error C1083: Не удается открыть файл включение: Common/StdInStream.h: No such file or directory 
1>  OpenCallbackConsole.cpp 
1>c:\users\александр\desktop\7zip\ui\nsis\opencallbackconsole.h(devil): fatal error C1083: Не удается открыть файл включение: Common/StdOutStream.h: No such file or directory 
1>  NSISBreak.cpp 
1>  MainAr.cpp 
1>c:\users\александр\desktop\7zip\ui\nsis\mainar.cpp(7): fatal error C1083: Не удается открыть файл включение: Windows/Error.h: No such file or directory 
1>  Main.cpp 
1>c:\users\александр\desktop\7zip\ui\nsis\main.cpp(5): fatal error C1083: Не удается открыть файл включение: Common/MyInitGuid.h: No such file or directory 
1>  ExtractCallbackConsole.cpp 
1>c:\users\александр\desktop\7zip\ui\nsis\extractcallbackconsole.h(devil): fatal error C1083: Не удается открыть файл включение: Common/MyString.h: No such file or directory 
1>  WorkDir.cpp 
1>c1xx : fatal error C1083: Не удается открыть файл источник: ..\..\UI\Common\WorkDir.cpp: No such file or directory 
1>  UpdateProduce.cpp 
1>c1xx : fatal error C1083: Не удается открыть файл источник: ..\..\UI\Common\UpdateProduce.cpp: No such file or directory 
1>  UpdatePair.cpp 
1>c1xx : fatal error C1083: Не удается открыть файл источник: ..\..\UI\Common\UpdatePair.cpp: No such file or directory 
1>  UpdateCallback.cpp 
1>c1xx : fatal error C1083: Не удается открыть файл источник: ..\..\UI\Common\UpdateCallback.cpp: No such file or directory 
1>  UpdateAction.cpp 
1>c1xx : fatal error C1083: Не удается открыть файл источник: ..\..\UI\Common\UpdateAction.cpp: No such file or directory 
1>  Update.cpp 
1>c1xx : fatal error C1083: Не удается открыть файл источник: ..\..\UI\Common\Update.cpp: No such file or directory 
1>  TempFiles.cpp 
1>c1xx : fatal error C1083: Не удается открыть файл источник: ..\..\UI\Common\TempFiles.cpp: No such file or directory 
...

Мы на-пару с одним человечком перелопатили все исходники плагинов для этой версии 7з, до которых смогли дотянуться, и везде болт. Эти идиоты, выложили сырцы, а на пол проекта компиляции файлов не положили...
Вообще не понимаю, какой дебил так делает ?! Или выкладывай полностью, или не выкладывай вообще. И всё всем понятно будет..

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

Да вот было желание поправить кое-чего, но видать теперь с этим мимо кассы..


K.A.V.
Пост ради поста ?!
Ибо ни грамму не понял из того что ты написал..

[K.A.V.]

Может вы прокомментируете эту защиту от дурака ?! »

Эти идиоты, выложили сырцы, а на пол проекта компиляции файлов не положили... Вообще не понимаю, какой дебил так делает ?! Или выкладывай полностью, или не выкладывай вообще. И всё всем понятно будет.. »

"дебил" в наше время тот, кто не читает инструкцию. Не буду переходить на личности, думаю намёк все поймут.
Вот вы взяли тут и оскорбили людей (я, конечно, понимаю, что этого они не узнают, но смотрится то со стороны как минимум не красиво и низко с вашей стороны), которые сделали плагин и выложили его для вас и, оскорбили вы их просто потому, что не умеете читать.
Мягко говоря странно вы себя ведёте, вам не кажется?

Пост ради поста ?! »

Я постоянно тут пишу просто так, ради количества сообщений, люблю это дело, видите, какое у меня несоответствие "полезняшек" с общим числом сообщений?
И смотрите, это моё очередное сообщение, которое вроде бы и с одной стороны указывает на причину вашей проблемы, но и с другой...

Пост ради поста ?! »

[Flix]

Может вы прокомментируете эту защиту от дурака ?! »

А что здесь может быть непонятно? Компилятор вам на русском языке пишет:

Не удается открыть файл источник

и далее указывает конкретный файл, который ему не удалось найти. Ну и... дальше что?
Если вы выполните все рекомендации автора плагина, которые он старательно изложил в сопровождающем документе (nsis7z.txt), то файл компилируется без проблем.

[MKN]

K.A.V.,
Подскажи пожалуйста, как в твоём примере, вывести строки в ListBox - с 1ой по 4ую включительно ? (как вывести только 4ую- понятно, как вывести с 4 ой и далее- понятно. с выводом с 1ой по 4 ую - что то не заладилось...)

Код:

OutFile ListBoxHSCROLL_ExecDosTOWINDOW.exe
!include nsDialogs.nsh
Var Dialog
Var hcli
Var ListBox
Page custom MyPage  leave

Function MyPage
nsDialogs::Create 1018
Pop $Dialog
nsDialogs::CreateControl /NOUNLOAD ${__NSD_ListBox_CLASS} ${__NSD_ListBox_STYLE}|${WS_HSCROLL} ${__NSD_ListBox_EXSTYLE} 0 20 100% 100u "" 
Pop $ListBox 
SendMessage $ListBox ${LB_SETHORIZONTALEXTENT} 2000  0  ; 2000 - количество пикселей, на которое список может прокручиваться.

GetFunctionAddress $0 MyFunction
    ExecDos::exec /NOUNLOAD /ASYNC /TOFUNC  `cmd /?` "" $0
Pop $hcli
nsDialogs::Show
FunctionEnd

Function leave
    ExecDos::wait $hcli
FunctionEnd

Function MyFunction
  Pop $2
 ; вывести только 4ую строку
;IntOp $R0 $R0 + 1
;StrCmp $R0 4 0 noAddString  

; вывести всё , начиная с 4ой строки
IntOp $R0 $R0 + 1
StrCmp $R0 4 0 noAddString
StrCpy $R0 3

System::Call "user32::OemToChar(tr2, t.r2)"
SendMessage $ListBox ${LB_ADDSTRING} 0 "STR:$2"
noAddString:
FunctionEnd

Section
SectionEnd

ps HSCROLL можно сделать гораздо проще, не заморачиваясь с учётом размера шрифта, как в вышеприводимой громозде из кода...

[K.A.V.]

вывести строки в ListBox - с 1ой по 4ую включительно ? »

Ну диапазон же...IntCmp...

Код:

OutFile ListBoxHSCROLL_ExecDosTOWINDOW.exe
!include nsDialogs.nsh
Var Dialog
Var hcli
Var ListBox
Page custom MyPage  leave

Function MyPage
nsDialogs::Create 1018
Pop $Dialog
nsDialogs::CreateControl /NOUNLOAD ${__NSD_ListBox_CLASS} ${__NSD_ListBox_STYLE}|${WS_HSCROLL} ${__NSD_ListBox_EXSTYLE} 0 20 100% 100u "" 
Pop $ListBox 
SendMessage $ListBox ${LB_SETHORIZONTALEXTENT} 2000  0  ; 2000 - количество пикселей, на которое список может прокручиваться.

GetFunctionAddress $0 MyFunction
    ExecDos::exec /NOUNLOAD /ASYNC /TOFUNC  `cmd /?` "" $0
Pop $hcli
nsDialogs::Show
FunctionEnd

Function leave
    ExecDos::wait $hcli
FunctionEnd

Function MyFunction
  Pop $2     

IntOp $R0 $R0 + 1
IntCmp $R0 4 0 0 noAddString

System::Call "user32::OemToChar(tr2, t.r2)"
SendMessage $ListBox ${LB_ADDSTRING} 0 "STR:$2"
noAddString:
FunctionEnd

Section
SectionEnd

[MKN]

IntCmp »

Напрочь из головы вылетело...

[MKN]

Когда то kotkovets, предлагал код, как убрать заголовок окна :

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

Код:

 !include MUI2.nsh
 !define MUI_CUSTOMFUNCTION_GUIINIT GUIInit
 !insertmacro MUI_PAGE_WELCOME
 !insertmacro MUI_PAGE_COMPONENTS
 !insertmacro MUI_PAGE_INSTFILES
 !insertmacro MUI_LANGUAGE "Russian"
 OutFile "Example.exe"

 !define WS_CAPTION 0x00C00000
 !define NSD_RemoveStyle "!insertmacro _NSD_RemoveStyle_Call"
 !macro _NSD_RemoveStyle_Call CONTROL EXSTYLE
   Push `${CONTROL}`
   Push `${EXSTYLE}`
   System::Store SR1R0
   IntOp $R1 $R1 ~
   System::Call `user32::GetWindowLong(iR0,i${GWL_STYLE})i.R2`
   IntOp $R2 $R1 & $R2
   System::Call `user32::SetWindowLong(iR0,i${GWL_STYLE},iR2)`
   System::Store L
 !macroend

 Function GUIInit
  ${NSD_RemoveStyle} $HWNDPARENT ${WS_CAPTION}
 FunctionEnd

 Section
 SectionEnd

А каким образом добавить к получившемуся "лысому" окну - рамку ? (пробовал добавлять "рамочные" стили WS_BORDER , WS_THICKFRAME , посылал окну сообщение ${CM_BORDERCHANGED} - без эффекта )

[K.A.V.]

пробовал добавлять "рамочные" стили WS_BORDER »

без эффекта »

А как пробовал то?

Если делать так, то всё прекрасно работает:

Стиль WS_DLGFRAME

Код:

 Function GUIInit
 ${NSD_RemoveStyle} $HWNDPARENT ${WS_CAPTION}
 System::Call "user32::GetWindowLong(i$HWNDPARENT,i${GWL_STYLE})i.s"
 System::Int64Op "0x00400000L" |
 System::Call "user32::SetWindowLong(i$HWNDPARENT,i${GWL_STYLE},is)"  
 FunctionEnd

Стиль WS_BORDER

Код:

 Function GUIInit
 ${NSD_RemoveStyle} $HWNDPARENT ${WS_CAPTION}
 System::Call "user32::GetWindowLong(i$HWNDPARENT,i${GWL_STYLE})i.s"
 System::Int64Op "0x00800000L" |
 System::Call "user32::SetWindowLong(i$HWNDPARENT,i${GWL_STYLE},is)"  
 FunctionEnd

"рамочные" стили »

WS_THICKFRAME »

WS_THICKFRAME - не рамочный стиль, да, он создаёт рамку окна при удаленном WS_CAPTION, но при этом ещё и добавляет возможность изменять границы окна, это не то, что тебе нужно

[MKN]

Если делать так, то всё прекрасно работает: »

Не работает. Заголовок окна - остаётся (но таскать за себя не позволяет). Задача ведь сделать обрамление рамкой обезглавленного окна .

Да и исходный код странно работает... Компилишь-запускаешь - нет заголовка. Вроде то , что надо... Пооткрывал окна других приложений (я открываю-сворачиваю окно тотала) - вдруг у обезглавленного окна, появляется заголовок (хотя таскать за себя не позволяет)... Ерунда какая то... Проверяю на W7x32

[K.A.V.]

Так тоже не работает?

WS_DLGFRAME

Код:

 Function GUIInit
 ${NSD_RemoveStyle} $HWNDPARENT ${WS_CAPTION} 
 System::Call "user32::GetWindowLong(i$HWNDPARENT,i${GWL_STYLE})i.r0"
 System::Call "user32::SetWindowLong(i$HWNDPARENT,i${GWL_STYLE},i$0|0x00400000)" 
 FunctionEnd

WS_BORDER

Код:

 Function GUIInit
 ${NSD_RemoveStyle} $HWNDPARENT ${WS_CAPTION} 
 System::Call "user32::GetWindowLong(i$HWNDPARENT,i${GWL_STYLE})i.r0"
 System::Call "user32::SetWindowLong(i$HWNDPARENT,i${GWL_STYLE},i$0|0x00800000)" 
 FunctionEnd

На W7x64 и W8x32 работает, а вот на WinXP нет