|
Last change
on this file was 96694, checked in by vboxsync, 20 months ago |
|
Add/Nt/Installer: Reduce the number of warnings to almost none.
|
-
Property svn:eol-style
set to
native
-
Property svn:keywords
set to
Author Date Id Revision
|
|
File size:
1.1 KB
|
| Line | |
|---|
| 1 | !ifndef LVM_GETITEMCOUNT
|
|---|
| 2 | !define LVM_GETITEMCOUNT 0x1004
|
|---|
| 3 | !endif
|
|---|
| 4 | !ifndef LVM_GETITEMTEXT
|
|---|
| 5 | !define LVM_GETITEMTEXT 0x102D
|
|---|
| 6 | !endif
|
|---|
| 7 |
|
|---|
| 8 | !macro DumpLog un
|
|---|
| 9 | Function ${un}DumpLog
|
|---|
| 10 | Exch $5
|
|---|
| 11 | Push $0
|
|---|
| 12 | Push $1
|
|---|
| 13 | Push $2
|
|---|
| 14 | Push $3
|
|---|
| 15 | Push $4
|
|---|
| 16 | Push $6
|
|---|
| 17 |
|
|---|
| 18 | FindWindow $0 "#32770" "" $HWNDPARENT
|
|---|
| 19 | GetDlgItem $0 $0 1016
|
|---|
| 20 | StrCmp $0 0 error
|
|---|
| 21 | FileOpen $5 $5 "w"
|
|---|
| 22 | StrCmp $5 0 error
|
|---|
| 23 | SendMessage $0 ${LVM_GETITEMCOUNT} 0 0 $6
|
|---|
| 24 | System::Alloc ${NSIS_MAX_STRLEN}
|
|---|
| 25 | Pop $3
|
|---|
| 26 | StrCpy $2 0
|
|---|
| 27 | System::Call "*(i, i, i, i, i, i, i, i, i) i \
|
|---|
| 28 | (0, 0, 0, 0, 0, r3, ${NSIS_MAX_STRLEN}) .r1"
|
|---|
| 29 | loop: StrCmp $2 $6 done
|
|---|
| 30 | System::Call "User32::SendMessageA(i, i, i, i) i \
|
|---|
| 31 | ($0, ${LVM_GETITEMTEXT}, $2, r1)"
|
|---|
| 32 | System::Call "*$3(&t${NSIS_MAX_STRLEN} .r4)"
|
|---|
| 33 | FileWrite $5 "$4$\r$\n"
|
|---|
| 34 | IntOp $2 $2 + 1
|
|---|
| 35 | Goto loop
|
|---|
| 36 | done:
|
|---|
| 37 | FileClose $5
|
|---|
| 38 | System::Free $1
|
|---|
| 39 | System::Free $3
|
|---|
| 40 | Goto exit
|
|---|
| 41 | error:
|
|---|
| 42 | MessageBox MB_OK "Could not create Log-File!" /SD IDOK
|
|---|
| 43 | exit:
|
|---|
| 44 | Pop $6
|
|---|
| 45 | Pop $4
|
|---|
| 46 | Pop $3
|
|---|
| 47 | Pop $2
|
|---|
| 48 | Pop $1
|
|---|
| 49 | Pop $0
|
|---|
| 50 | Exch $5
|
|---|
| 51 | FunctionEnd
|
|---|
| 52 | !macroend
|
|---|
| 53 | !insertmacro DumpLog ""
|
|---|
| 54 | ;!insertmacro DumpLog "un." - not used
|
|---|
Note:
See
TracBrowser
for help on using the repository browser.
