| # | Line 664 | Line 664 | begin | |
|---|---|---|
| 664 | BoolToStr(RawLinks[i].LocSep) + ', 0);'; | |
| 665 | Query.ExecSQL; | |
| 666 | end; | |
| 667 | + | if ((i mod 100) = 0) and (FileID > 0) then |
| 668 | + | begin |
| 669 | + | Database.Commit(False); |
| 670 | + | Database.StartTransaction; |
| 671 | + | end; |
| 672 | end; | |
| 673 | end; | |
| 674 | ||
| – | Removed lines |
| + | Added lines |
| < | Changed lines (old) |
| > | Changed lines (new) |