OSDN Git Service
(root)
/
newbbs
/
newbbs.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
358f971
)
前回のコミット Component.Tag の扱いに問題。Disposeの個所をエラーに対し安全策。
author
yamat0jp
<terukohietori@gmail.com>
Sat, 6 Jul 2019 23:46:10 +0000
(08:46 +0900)
committer
yamat0jp
<terukohietori@gmail.com>
Sat, 6 Jul 2019 23:46:10 +0000
(08:46 +0900)
今回、iとjのまちがい
WebModuleUnit1.pas
patch
|
blob
|
history
diff --git
a/WebModuleUnit1.pas
b/WebModuleUnit1.pas
index
576b25b
..
8a920e3
100644
(file)
--- a/
WebModuleUnit1.pas
+++ b/
WebModuleUnit1.pas
@@
-681,7
+681,7
@@
var
coll := reg.Matches(Text);
for j := coll.count - 1 downto 0 do
begin
- Delete(Text, coll[
i].index, coll[i
].Length);
+ Delete(Text, coll[
j].index, coll[j
].Length);
t := Copy(coll[j].Value, Length(s) + 1, coll[j].Length);
result := Format
('<a class=minpreview data-preview-url=/link?num=%s href=/jump?num=%s>>>%s</a>',