
15.01.2013, 00:33
|
 |
.
|
|
Регистрация: 18.05.2011
Адрес: Омск
Сообщения: 3,970
Версия Delphi: 3,5,7,10,12,XE2
Репутация: выкл
|
|
Неверно
Код:
var
I, J : Integer;
begin
...
J := t_ini.readInteger('listbox1','count',1);
for i := 0 to J - 1 do
begin
listbox1.Items[i].Add(t_ini.readstring('listbox1', '1', ''));
...
Как то так.
__________________
Je venus de nulle part
55.026263 с.ш., 73.397636 в.д.
|