Orion9

|
Posted: Sat May 24, 2025 00:37 Post subject: |
|
|
Loopback wrote: | Примерно так (не тестировал) |
Норм шпарит. Проверил сначала на 1000, потом на 2000 файлов с общим размером списка в буфере в 330 Кб, но думаю, он и больше возьмет, ведь ничего нигде не обрезается.
Loopback wrote: | Какие именно? Нужна все же какая-то конкретика. |
Да, не успел просто написать, отвлекли немного. В общем, думаю, это связано с тем, что в коде после создания объектов List некоторым из них присваивается количество элементов через свойство Count:
Code: | Local aSel = List(), aCol = List(), aVal = List(), aRow = List()
...
aCol.Split(aSel[0], auTAB)
aVal.Count = aCol.Count |
Вот здесь, возможно, есть проблема, но не хочу вводить вас в заблуждение - я вносил много изменений, может и сам где-то накосячил ранее из-за того, что функция была сначала завязана только на поток, просто подумал, не лишним будет сообщить об этом. Кстати, по этой же причине сразу за последними двумя строками следует:
Code: | For j = 0 To aVal.Count - 1
aVal[j] = ""
Next |
Без такой принудительной инициализации элементов тоже были проблемы. Может, сейчас их и нету, это надо тестировать, но в ближайшие 2-3 недели буду пребывать в полном ауте. Сейчас закомментировал:
Code: |
#{
aSel.Count = 0
aCol.Count = 0
aVal.Count = 0
aRow.Count = 0
#}
|
Нет. Тотал валится. Значит проблема с установкой элементов через Count всё же есть. |
|