Many hyperlinks are disabled.
Use anonymous login
to enable hyperlinks.
Overview
| SHA1 Hash: | 01f69714ef65163ef0ac52a0379145c9b5757ca6 |
|---|---|
| Date: | 2011-04-10 06:40:35 |
| User: | JohnFound |
| Comment: | Fixed the title bar filename update - now it does not blink. Fixed "modified status" in AsmEdit. |
Tags And Properties
- branch=trunk inherited from [f0cccafed5]
- sym-trunk inherited from [f0cccafed5]
Changes
Changes to MainForm.frm
1 1 ;<ff 2 -Window Form1, 3, 0, 'TForm', 'Wiki editor:', $16CF0000, $10000, 0, 516, 476, 550, 409, Form1WinProc; 2 +Window Form1, 3, 0, 'TForm', 'Wiki editor:', $16CF0000, $10000, 0, 200, 93, 550, 409, Form1WinProc; 3 3 Window NONE, 0, 1, 'LISTBOX', 'Listbox', $508105C3, $200, 200, 0, 0, 120, 382, 0; 4 4 Window NONE, 2, 5, 'ASMEDIT', '', $50300124, $200, 100, 120, 0, 422, 382, EditWinProc; 5 5 ;ff> 6 6 idEdit = 100 7 7 idShortcuts = 200 8 8 9 9 cEditorFontFace text 'FreshBold'
Changes to WikiPad.exe
cannot compute difference between binary files
Changes to actions.asm
1 1 ImageChecked = 8 2 2 3 3 uglobal 4 4 hLoadedFilename dd ? 5 + 6 + fLastModified dd ? 5 7 endg 6 8 7 9 8 10 9 11 iglobal 10 12 11 13 ActionList MainActionList, MainAccels, \ ................................................................................ 67 69 bfSeparator, NONE 68 70 endg 69 71 70 72 71 73 72 74 proc OnIdle 73 75 begin 74 - stdcall UpdateTitle 76 + invoke SendMessage, [hEditor], AEM_GETMODIFIED, 0, 0 77 + xchg eax, [fLastModified] 78 + cmp eax, [fLastModified] 79 + je .finish 80 + 81 + call UpdateTitle 82 +.finish: 75 83 return 76 84 endp 77 85 78 86 79 87 80 88 81 89 proc OnExit, .wparam, .lparam ................................................................................ 83 91 stdcall StrDup, [hAppPath] 84 92 push eax 85 93 stdcall StrCat, eax, cDefaultShortcuts 86 94 stdcall SaveShortcuts, eax 87 95 stdcall StrDel ; from the stack 88 96 89 97 .check: 90 - invoke SendMessage, [hEditor], EM_GETMODIFY, 0, 0 98 + invoke SendMessage, [hEditor], AEM_GETMODIFIED, 0, 0 91 99 test eax, eax 92 100 jnz .noexit 93 101 94 102 .exit: 95 103 invoke PostQuitMessage, 0 96 104 return 97 105 ................................................................................ 113 121 cErrorNotSaved text 'The current file is not saved. Do you want to save it?',0 114 122 cTitleNotSaved text 'Do you want to save?' 115 123 116 124 117 125 proc OnNew, .wparam, .lparam 118 126 begin 119 127 .check: 120 - invoke SendMessage, [hEditor], EM_GETMODIFY, 0, 0 128 + invoke SendMessage, [hEditor], AEM_GETMODIFIED, 0, 0 121 129 test eax, eax 122 130 jnz .nonew 123 131 124 132 .new: 125 133 invoke SendMessage, [hEditor], WM_SETTEXT, 0, 0 126 134 stdcall StrDel, [hLoadedFilename] 127 135 mov [hLoadedFilename], 0 136 + call UpdateTitle 128 137 return 129 138 130 139 .nonew: 131 140 invoke MessageBox, [hMainForm], cErrorNotSaved, cTitleNotSaved, MB_YESNOCANCEL or MB_ICONQUESTION 132 141 cmp eax, MR_NO 133 142 je .new 134 143 ................................................................................ 157 166 158 167 cmp [hLoadedFilename], 0 159 168 je @f 160 169 161 170 stdcall StrCat, ebx, [hLoadedFilename] 162 171 163 172 @@: 164 - invoke SendMessage, [hEditor], EM_GETMODIFY, 0, 0 173 + invoke SendMessage, [hEditor], AEM_GETMODIFIED, 0, 0 165 174 test eax, eax 166 175 jz @f 167 176 stdcall StrCat, ebx, cModified 168 177 @@: 169 178 stdcall StrPtr, ebx 170 179 invoke SendMessage, [hMainForm], WM_SETTEXT, 0, eax 171 180 stdcall StrDel, ebx ................................................................................ 185 194 ; TODO: Check for 256 chars boundaries and split the lines in this case. 186 195 ; 187 196 188 197 proc _openFileCallback, .name, .lparam 189 198 .src dd ? 190 199 begin 191 200 stdcall SetString, hLoadedFilename, [.name] 201 + call UpdateTitle 192 202 193 203 stdcall StrNew 194 204 mov [.src], eax 195 205 196 206 stdcall LoadBinaryFile, [.name] 197 207 mov esi, eax 198 208 push eax ................................................................................ 256 266 stdcall StrPtr, eax 257 267 mov ecx, eax 258 268 stdcall StrPtr, [hLoadedFilename] 259 269 stdcall SaveBinaryFile, eax, ecx, [ecx+string.len] 260 270 261 271 stdcall StrDel ; from the stack. 262 272 263 - invoke SendMessage, [hEditor], EM_SETMODIFY, 0, 0 273 + invoke SendMessage, [hEditor], AEM_SETMODIFIED, 0, 0 264 274 265 275 .nosave: 266 276 return 267 277 endp 268 278 269 279 270 280 ................................................................................ 272 282 begin 273 283 stdcall SaveFileDialog, cSaveFileTitle, WikiFilter, [hLoadedFilename] 274 284 test eax, eax 275 285 jz .exit 276 286 277 287 stdcall SetString, hLoadedFilename, eax 278 288 stdcall StrDel, eax 289 + call UpdateTitle 279 290 280 291 cmp [.wparam], 1 281 292 je .exit 282 293 stdcall OnSave, 0, 0 283 294 .exit: 284 295 return 285 296 endp
Changes to wikipad.cfg
cannot compute difference between binary files