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:
65aaece
)
コミットのミス それからメンテナンス表示をチェック
author
yamat0jp
<terukohietori@gmail.com>
Mon, 20 Jan 2020 08:39:38 +0000
(17:39 +0900)
committer
yamat0jp
<terukohietori@gmail.com>
Mon, 20 Jan 2020 08:39:38 +0000
(17:39 +0900)
WebModuleUnit1.pas
patch
|
blob
|
history
diff --git
a/WebModuleUnit1.pas
b/WebModuleUnit1.pas
index
5e9c27e
..
fcc58a5
100644
(file)
--- a/
WebModuleUnit1.pas
+++ b/
WebModuleUnit1.pas
@@
-1143,7
+1143,7
@@
begin
s := Request.ContentFields.Values['delete'];
with FDTable4 do
if s = 'all' then
- while not
(Bof = true) and (Eof = true
) do
+ while not
((Bof = true) and (Eof = true)
) do
Delete
else
begin
@@
-1164,6
+1164,7
@@
begin
end;
end;
end;
+ FDTable4.First;
Response.ContentType := 'text/html;charset=utf-8';
Response.Content := master.Content;
end;