在nsis中增加「Writeinistr」的緩衝區大小

Question

我是nsis的新手 創建包含「文本」類型的ini頁面，使用此類型，我在標籤中顯示了一些動態數據。文件的大小是2 kb，所以我需要在「文本」類型中增加「狀態」選項的大小。那麼如何使用writeinistr來增加狀態的大小呢？

Answer 1

要繞過NSIS字符串長度的限制，你必須調用Windows API直接：

Page Custom MyPage 
Page InstFiles 

!macro IniWriteAsciiStringPtr ini sec name strptr 
!if "${NSIS_CHAR_SIZE}" > 1 
Push $0 
Push $1 
Push $2 
Push "${ini}" 
Push "${name}" 
Push "${sec}" 
StrCpy $0 ${strptr} 
System::Call 'kernel32::MultiByteToWideChar(i0, i0, i$0, i-1, i0, i0)i.r2' 
System::Call '*(&w$2)i.r1' 
System::Call 'kernel32::MultiByteToWideChar(i0, i0, i$0, i-1, ir1, ir2)' 
System::Call 'kernel32::WritePrivateProfileString(t s, t s, ir1, t s)' 
System::Free $1 
Pop $2 
Pop $1 
Pop $0 
!else 
System::Call 'kernel32::WritePrivateProfileString(t "${sec}", t "${name}", i ${strptr}, t "${ini}")' 
!endif 
!macroend 

!include InstallOptions.nsh 
Function MyPage 
InitPluginsDir 
; Building the entire .ini at run-time in this example 
WriteIniStr "$PluginsDir\io.ini" Settings NumFields 1 
WriteIniStr "$PluginsDir\io.ini" "Field 1" Type Text 
WriteIniStr "$PluginsDir\io.ini" "Field 1" Left 1 
WriteIniStr "$PluginsDir\io.ini" "Field 1" Right -2 
WriteIniStr "$PluginsDir\io.ini" "Field 1" Top 5 
WriteIniStr "$PluginsDir\io.ini" "Field 1" Bottom -10 
WriteIniStr "$PluginsDir\io.ini" "Field 1" Flags MULTILINE 
FileOpen $0 "$PluginsDir\test.txt" r 
FileSeek $0 0 END $1 
FileSeek $0 0 SET 
System::Call '*(&i$1,i0)i.r2' 
System::Call 'kernel32::ReadFile(ir0,ir2,ir1,*i,i0)' 
!insertmacro IniWriteAsciiStringPtr "$PluginsDir\io.ini" "Field 1" "State" $2 
System::Free $2 
FileClose $0 

!insertmacro INSTALLOPTIONS_DISPLAY "io.ini" 
FunctionEnd 

Function .onInit 
InitPluginsDir 
; Create a big file for this example 
FileOpen $0 "$PluginsDir\test.txt" w 
StrCpy $2 0 
loop: 
    StrCmp $2 2048 done 
    IntOp $1 $2 % 10 
    StrCmp $2 2047 0 +2 
    StrCpy $1 "!" 
    FileWrite $0 $1 
    IntOp $2 $2 + 1 
    Goto loop 
done: 
FileClose $0 
FunctionEnd 

您還可以繞過的.ini，直接在對話框中設置：

Page Custom MyPage 
Page InstFiles 

!include InstallOptions.nsh 
!include WinMessages.nsh 
Function MyPage 
InitPluginsDir 
; Building the entire .ini at run-time in this example 
WriteIniStr "$PluginsDir\io.ini" Settings NumFields 1 
WriteIniStr "$PluginsDir\io.ini" "Field 1" Type Text 
WriteIniStr "$PluginsDir\io.ini" "Field 1" Left 1 
WriteIniStr "$PluginsDir\io.ini" "Field 1" Right -2 
WriteIniStr "$PluginsDir\io.ini" "Field 1" Top 5 
WriteIniStr "$PluginsDir\io.ini" "Field 1" Bottom -10 
WriteIniStr "$PluginsDir\io.ini" "Field 1" Flags MULTILINE 
FileOpen $0 "$PluginsDir\test.txt" r 
FileSeek $0 0 END $1 
FileSeek $0 0 SET 
System::Call '*(&i$1,i0)i.r2' 
System::Call 'kernel32::ReadFile(ir0,ir2,ir1,*i,i0)' 
FileClose $0 
!insertmacro INSTALLOPTIONS_INITDIALOG "io.ini" 
Pop $0 
!insertmacro INSTALLOPTIONS_READ $0 "io.ini" "Field 1" "HWND" 
!if "${NSIS_CHAR_SIZE}" > 1 
!error TODO 
!else 
SendMessage $0 ${WM_SETTEXT} 0 $2 
!endif 
System::Free $2 
!insertmacro INSTALLOPTIONS_SHOW 
FunctionEnd 

Function .onInit 
InitPluginsDir 
; Create a big file for this example 
FileOpen $0 "$PluginsDir\test.txt" w 
StrCpy $2 0 
loop: 
    StrCmp $2 2048 done 
    IntOp $1 $2 % 10 
    StrCmp $2 2047 0 +2 
    StrCpy $1 "!" 
    FileWrite $0 $1 
    IntOp $2 $2 + 1 
    Goto loop 
done: 
FileClose $0 
FunctionEnd