yozhik

|
Posted: Sun Oct 05, 2025 02:27 Post subject: |
|
|
Loopback
Quote: | Runtime error 216 at 06CC22E7 |
Это у меня стабильно происходит с 32-битным TC когда RegExpReplace вызывается 51 раз подряд.  Вот кусок кода: Code: | # WinMerge Light
FC = FileRead(COMMANDER_PATH & '\Profile\tools\WINMERGE\WinMerge.ini', 0, 'ANSI')
FC = RegExpReplace(FC, '(?m-s)^(DefaultSyntaxColors/Bold07)=.+$', '$1=1', 1)
FC = RegExpReplace(FC, '(?m-s)^(DefaultSyntaxColors/Color01)=.+$', '$1=16777215', 1)
FC = RegExpReplace(FC, '(?m-s)^(DefaultSyntaxColors/Color02)=.+$', '$1=16777215', 1)
FC = RegExpReplace(FC, '(?m-s)^(DefaultSyntaxColors/Color03)=.+$', '$1=0', 1)
FC = RegExpReplace(FC, '(?m-s)^(DefaultSyntaxColors/Color04)=.+$', '$1=15790320', 1)
FC = RegExpReplace(FC, '(?m-s)^(DefaultSyntaxColors/Color05)=.+$', '$1=14120960', 1)
FC = RegExpReplace(FC, '(?m-s)^(DefaultSyntaxColors/Color06)=.+$', '$1=16777215', 1)
FC = RegExpReplace(FC, '(?m-s)^(DefaultSyntaxColors/Color07)=.+$', '$1=16711680', 1)
FC = RegExpReplace(FC, '(?m-s)^(DefaultSyntaxColors/Color08)=.+$', '$1=8388736', 1)
FC = RegExpReplace(FC, '(?m-s)^(DefaultSyntaxColors/Color09)=.+$', '$1=32768', 1)
FC = RegExpReplace(FC, '(?m-s)^(DefaultSyntaxColors/Color10)=.+$', '$1=255', 1)
FC = RegExpReplace(FC, '(?m-s)^(DefaultSyntaxColors/Color11)=.+$', '$1=6316128', 1)
FC = RegExpReplace(FC, '(?m-s)^(DefaultSyntaxColors/Color12)=.+$', '$1=128', 1)
FC = RegExpReplace(FC, '(?m-s)^(DefaultSyntaxColors/Color13)=.+$', '$1=12615680', 1)
FC = RegExpReplace(FC, '(?m-s)^(DefaultSyntaxColors/Color20)=.+$', '$1=8388608', 1)
FC = RegExpReplace(FC, '(?m-s)^(DefaultSyntaxColors/Color21)=.+$', '$1=12615680', 1)
FC = RegExpReplace(FC, '(?m-s)^(DefaultSyntaxColors/Color22)=.+$', '$1=8388607', 1)
FC = RegExpReplace(FC, '(?m-s)^(DefaultSyntaxColors/Color23)=.+$', '$1=8388479', 1)
FC = RegExpReplace(FC, '(?m-s)^(DefaultSyntaxColors/Color24)=.+$', '$1=8355839', 1)
FC = RegExpReplace(FC, '(?m-s)^(DefaultSyntaxColors/Color25)=.+$', '$1=16744319', 1)
FC = RegExpReplace(FC, '(?m-s)^(Settings/DefaultTextColoring)=.+$', '$1=1', 1)
FC = RegExpReplace(FC, '(?m-s)^(Settings/DifferenceColor)=.+$', '$1=14548957', 1)
FC = RegExpReplace(FC, '(?m-s)^(Settings/DifferenceDeletedColor)=.+$', '$1=16769248', 1)
FC = RegExpReplace(FC, '(?m-s)^(Settings/DirItemDiffColor)=.+$', '$1=14548957', 1)
FC = RegExpReplace(FC, '(?m-s)^(Settings/DirItemDiffTextColor)=.+$', '$1=0', 1)
FC = RegExpReplace(FC, '(?m-s)^(Settings/DirItemEqualColor)=.+$', '$1=16777215', 1)
FC = RegExpReplace(FC, '(?m-s)^(Settings/DirItemEqualTextColor)=.+$', '$1=0', 1)
FC = RegExpReplace(FC, '(?m-s)^(Settings/DirItemFilteredColor)=.+$', '$1=14153210', 1)
FC = RegExpReplace(FC, '(?m-s)^(Settings/DirItemFilteredTextColor)=.+$', '$1=0', 1)
FC = RegExpReplace(FC, '(?m-s)^(Settings/DirItemNotExistAllColor)=.+$', '$1=16769248', 1)
FC = RegExpReplace(FC, '(?m-s)^(Settings/DirItemNotExistAllTextColor)=.+$', '$1=0', 1)
FC = RegExpReplace(FC, '(?m-s)^(Settings/DirMarginColor)=.+$', '$1=16777215', 1)
FC = RegExpReplace(FC, '(?m-s)^(Settings/MovedBlockColor)=.+$', '$1=12638448', 1)
FC = RegExpReplace(FC, '(?m-s)^(Settings/MovedBlockDeletedColor)=.+$', '$1=12632256', 1)
FC = RegExpReplace(FC, '(?m-s)^(Settings/SNPColor)=.+$', '$1=14678779', 1)
FC = RegExpReplace(FC, '(?m-s)^(Settings/SNPDeletedColor)=.+$', '$1=15329769', 1)
FC = RegExpReplace(FC, '(?m-s)^(Settings/SelectedDifferenceColor)=.+$', '$1=14540287', 1)
FC = RegExpReplace(FC, '(?m-s)^(Settings/SelectedDifferenceDeletedColor)=.+$', '$1=12632304', 1)
FC = RegExpReplace(FC, '(?m-s)^(Settings/SelectedMovedBlockColor)=.+$', '$1=5140728', 1)
FC = RegExpReplace(FC, '(?m-s)^(Settings/SelectedMovedBlockDeletedColor)=.+$', '$1=10728956', 1)
FC = RegExpReplace(FC, '(?m-s)^(Settings/SelectedSNPColor)=.+$', '$1=11843567', 1)
FC = RegExpReplace(FC, '(?m-s)^(Settings/SelectedSNPDeletedColor)=.+$', '$1=14737648', 1)
FC = RegExpReplace(FC, '(?m-s)^(Settings/SelectedWordDifferenceColor)=.+$', '$1=11184895', 1)
FC = RegExpReplace(FC, '(?m-s)^(Settings/SelectedWordDifferenceDeletedColor)=.+$', '$1=9213670', 1)
FC = RegExpReplace(FC, '(?m-s)^(Settings/TrivialDifferenceColor)=.+$', '$1=12579579', 1)
FC = RegExpReplace(FC, '(?m-s)^(Settings/TrivialDifferenceDeletedColor)=.+$', '$1=15329769', 1)
FC = RegExpReplace(FC, '(?m-s)^(Settings/WordDifferenceColor)=.+$', '$1=11206570', 1)
FC = RegExpReplace(FC, '(?m-s)^(Settings/WordDifferenceDeletedColor)=.+$', '$1=10544800', 1)
FC = RegExpReplace(FC, '(?m-s)^(Settings/SysColorHookEnabled)=.+$', '$1=0', 1)
FC = RegExpReplace(FC, '(?m-s)^(Settings/ColorScheme)=.+$', '$1=Modern', 1)
FC = RegExpReplace(FC, '(?m-s)^(Settings/SysColorHookColors)=.+$', '$1=2:0x00d1b499,3:0x00dbcdbf,5:0x00ffffff,8:0x00000000,9:0x00000000,12:0x00ababab,13:0x00d77800,14:0x00ffffff,15:0x00f0f0f0,16:0x00a0a0a0,17:0x006d6d6d,18:0x00000000,19:0x00000000,20:0x00ffffff,21:0x00696969,27:0x00ead1b9,28:0x00f2e4d7', 1)
FileWrite(COMMANDER_PATH & '\Profile\tools\WINMERGE\WinMerge.ini', FC, 'ANSI') |
Закомментирую этот кусок — нет Runtime error. Раскомментирую — получите, распишитесь. На 64-битном TC этого нет. Только на х32. После перезагрузки компьютера запускаю TC — сбой не происходит, затем пара перезапусков проходят гладко. Но стоит TC постоять открытым некоторое время и тогда при перезапусках начинает появляться Runtime error. _________________ Amo ergo sum |
|