Глюк KOL.TStrList.Count

← →
Spok (2004-08-07 19:44) [0]

2Vladimir Kladov:
Не работает код:
...
ss := NewStrList;
i := ss.Count;
...
i будет, как правило, +- несколько миллиардов => пользоваться совершенно невозможно. Только что заметил, что и в TList, похоже, тоже. Вроде, связано с тем, что у TStrList нет собственного конструкторов (только от TObj). Изменение кода NewStrList на:
function NewStrList: PStrList;
begin
New( Result, Create );
Result.fCount := 0; // по аналогии с TStrList.Clear
Result.fList := nil; // по аналогии с TStrList.Clear
Result.fTextBuf := nil; // по аналогии с TStrList.Clear
Result.fTextSiz := 0; // по аналогии с TStrList.Clear
end;
как ни странно, тоже не дало результата.
Нельзя ли это как-нибудь исправить?
А то вставлять дебилизм вроде
if Trim(ss.Text)<>"" then
for i:=0 to ss.Count do ...
вместо простого цикла как-то надоело...

← →
Dimaxx (2004-08-07 22:11) [1]

А вызвать метод Clear религия не позволяет? :-)

← →
Spok (2004-08-07 23:31) [2]

Забыл: D7, KOL&MCK 1.91
2Dimaxx: читай внимательнее вопрос ;)) - Clear не очищает, очобенно если там записей оказывается < 0. И очень часто просто вылетает с каким-нибудь Access Violation

← →
SPeller © (2004-08-08 16:03) [3]

Ну вот те здрасьте, всегда работало, а тут вдруг не хочет. Всегда работает нормально, только если смотреть из-под отладчика показывает астрономические цифры.

← →
Spok (2004-08-08 20:01) [4]

И сам бы мог догадаться... :(( Что только это за отлачик, если и в View CPU всякую чепуху мелит? Контрпример не придумал: всё работает. Благодарю.

← →
Dimaxx (2004-08-08 22:16) [5]

Была уже дискуссия на тему что-то типа "отладка объектов вместо классов". Вывод - отладчик Дельфи не умеет работать с объектами. Но если посмотришь в runtime - все замечательно работает. Прежде чем задавать подобные вопросы подумай.

← →
Spok (2004-08-13 21:37) [6]

Пропустил

Глюк KOL.TStrList.Count Найти похожие ветки