TStringList + много данных

← →
Ярослав © (2011-01-18 19:33) [0]

Есть данные, они беруться из ресурса.
Потом эти данные я загружаю в TStringList.

stream := TResourceStream.Create(HInstance, "TEXT", RT_RCDATA); sl := TStringList.Create; sl.LoadFromStream(stream); ShowMessage(sl.Text);

Данные типа:
test1="100 килобайт текста"
test2="110 килобайт текста"
test2="90 килобайт текста"

2 тестовые машини:
win xp rus - Работает отлично
win xp en - 20 % из 100 работает. Остальное просто показывает пустой диалог.
Как тестил:
Скомпилил ехе.
Запустил. Работает
Перезагрузил машину, запустил неработает.
Перезагрузил мушину, запустил опять работает.

Куда копать в данном случаи?
Есть идеи почему такое происходит?
Спасибо.

PS. D2010

← →
Игорь Шевченко © (2011-01-18 19:44) [1]

> Куда копать в данном случаи?

в отладчик

← →
Servy © (2011-01-19 04:13) [2]

> win xp rus - Работает отлично
> win xp en - 20 % из 100 работает. Остальное просто показывает
> пустой диалог.

Дык может у вас там буквы русские (ну или там китайские) в ресурсах тех, раз на английских виндовсах не едет?

← →
Германн © (2011-01-19 04:18) [3]

> Servy © (19.01.11 04:13) [2]

Не стыкуется с

> Запустил. Работает
> Перезагрузил машину, запустил неработает.
> Перезагрузил машину, запустил опять работает.

← →
han_malign (2011-01-19 10:11) [4]

> Работает, неработает, опять работает.

- темнишь брат, что-то, где-то у тебя не инициализировано...

Зря в Delphi нет, как в MSVC, флажка Warning As Error...

TStringList + много данных Найти похожие ветки