Форум: "Основная";
Текущий архив: 2002.12.23;
Скачать: [xml.tar.bz2];
ВнизЦикл для назначения свойств множеству компанент. Найти похожие ветки
← →
Supreme (2002-12-13 12:54) [0]У меня есть 6 компанент TICQClient с такими названиями:
ICQClient1, ICQClient2, ICQClient3, ICQClient4, ICQClient5, ICQClient6
А в ListBox"e ini-файле имеются такие строки:
1111111=aa
2222222=bb
3333333=cc
4444444=dd
5555555=ee
6666666=ff
Как сделать цикл, чтобы, например, строка "1111111" из ини-файла становилась
значением "UIN" для ICQClient1, а "aa" - значением "Password". Потом, "2222222" -
для ICQClient2 и т.д. И так нужно проделать для каждой компоненты ICQClient(x).
Я просто первый раз сталкиваюсь с такой проблемой, поэтому не знаю, что делать.
← →
Юрий Зотов (2002-12-14 08:34) [1]Пронумеруйте все Ваши ICQ в свойстве Tag, начиная с нуля. Далее вот что:
for i := 0 to ComponentCount - 1 do
if Components[i] is TICQClient then
with TICQClient(Components[i]), ListBox1.Items do
begin
UIN := Names[Tag];
Password := Values[UIN]
end;
← →
Supreme (2002-12-14 22:03) [2]На этой строчке: UIN := Names[Tag]; пишет:
"Incompatible types: "Cardinal" and "String"
Пробовал так:
UIN := StrToInt(Names[Tag]);
Выскакивает ошибка "" is not valid integer value
← →
Юрий Зотов (2002-12-14 23:46) [3]Должно проходить
UIN := StrToInt(Names[Tag]);
А раз не проходит, значит в строке есть не только цифры. Проверьте формат записи (пробелы в начале строки и пр.).
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2002.12.23;
Скачать: [xml.tar.bz2];
Память: 0.44 MB
Время: 0.014 c