Вверх ↑
Этот топик читают: Гость
Ответов: 952
Рейтинг: 4
#1: 2010-04-27 12:33:32 ЛС | профиль | цитата
Вот задался таким вопросом.
Возможно ли в выпадающий список вывести значения ключей определенной секции INI-файла?
Как-то у меня не получается такое сделать ....
карма: 0

0
Ответов: 2267
Рейтинг: 676
#2: 2010-04-27 12:39:38 ЛС | профиль | цитата
Есть же у выпадающего списка doAdd, в чем проблема? Где схема с твоим "не получается"?
карма: 11

0
Ответов: 952
Рейтинг: 4
#3: 2010-04-27 12:43:50 ЛС | профиль | цитата
Ну добавлю я 1 значение ключа.
Как 2 добавить?
Как 3-е?
карма: 0

0
Ответов: 2267
Рейтинг: 676
#4: 2010-04-27 12:45:38 ЛС | профиль | цитата
1. добавляешь 1 значение ключа
2. добавляешь 2 значение ключа
3. добавлякшь 3 значение ключа
sla8a писал(а):
Где схема с твоим "не получается"?

карма: 11

0
Ответов: 952
Рейтинг: 4
#5: 2010-04-27 12:46:30 ЛС | профиль | цитата
Потрясающе.
Каким элементом передавать значения нескольких ключей в 1 точку doAdd?


Add(MainForm,4092557,105,91)
{
Left=21
Top=105
Width=279
Height=210
Font=[Arial,8,0,0,1]
link(onCreate,2944832:doEvent1,[(159,111)(159,132)])
}
Add(Ini,407270,329,126)
{
FileName="test.ini"
Section="params"
Key="p1"
Type=1
}
Add(Hub,2944832,182,126)
{
link(onEvent1,407270:doRead,[])
link(onEvent2,4952295:doRead,[(238,139)(238,181)])
}
Add(Ini,4952295,329,175)
{
FileName="test.ini"
Section="params"
Key="p2"
Type=1
}
Add(ComboBox,5536846,455,147)
{
Left=20
Top=10
Height=21
}

карма: 0

0
Ответов: 2267
Рейтинг: 676
#6: 2010-04-27 12:49:24 ЛС | профиль | цитата
Так можно: code_17984.txt
карма: 11

0
файлы: 1code_17984.txt [632B] [276]
Главный модератор
Ответов: 2999
Рейтинг: 396
#7: 2010-04-27 12:57:34 ЛС | профиль | цитата
Это из реальной рабочей схемы.
карма: 6
Дорогу осилит идущий. Install/Update HiAsm.NET
1
файлы: 1comboboxfromini.rar [1KB] [152]
Голосовали:sla8a
Ответов: 952
Рейтинг: 4
#8: 2010-04-27 13:15:26 ЛС | профиль | цитата
Спасибо за помощь.
Вот еще свой вариант набросал

code_17987.txt

Правда у себя сделал проще, внес все в 1 ключ, разделил знаком ";" и передал через разбиение строки. Для моих целей этого в принципе достаточно.
карма: 0

0
файлы: 1code_17987.txt [500B] [199]
Ответов: 2267
Рейтинг: 676
#9: 2010-04-27 13:21:52 ЛС | профиль | цитата
А у Str_Enum doStop после onEndEnum зачем? Это контрольный?
карма: 11

0
Ответов: 952
Рейтинг: 4
#10: 2010-04-27 13:25:20 ЛС | профиль | цитата
Я не увидел какое количество циклов в переборе и решил для уверенности остановить по окончании перебора
Там 1 цикл?
карма: 0

0
Ответов: 16884
Рейтинг: 1239
#11: 2010-04-27 13:37:45 ЛС | профиль | цитата
и так можно
code_17988.txt
применил два компонента Ini для наглядности - вполне можно обойтись и одним.

Add(MainForm,4092557,56,63)
{
Left=21
Top=105
Width=355
Height=85
Font=[Arial,8,0,0,1]
Caption="INI и выпадающий список"
BorderStyle=1
Position=1
}
Add(Ini,4952295,224,105)
{
Type=1
Point(doSectionNames)
Point(onSectionNames)
Point(doSectionData)
Point(onSectionData)
link(FileName,2450107:Value,[])
link(onSectionNames,5536846:doAdd,[(270,118)(270,90)])
link(onSectionData,7096850:doSplit,[(264,125)(264,181)])
}
Add(ComboBox,5536846,294,84)
{
Left=80
Top=10
Width=105
Height=21
Text="Список секций"
DataType=1
link(onClick,1091438:doEvent1,[])
}
Add(Button,10270089,49,105)
{
Left=15
Top=10
link(onClick,9860172:doExecute,[])
}
Add(ODialog,9860172,105,105)
{
Filter="INI-файлы|*.ini"
StartDir="elementsDelphiconf"
link(onExecute,2241067:doEvent1,[])
}
Add(Hub,2241067,161,105)
{
OutCount=3
link(onEvent1,5536846:doClear,[(190,111)(190,97)])
link(onEvent2,2450107:doValue,[(181,118)(181,55)])
link(onEvent3,4952295:doSectionNames,[])
}
Add(Memory,2450107,224,49)
{
}
Add(ComboBox,4037425,392,182)
{
Left=205
Top=10
Width=130
Height=21
}
Add(Hub,1091438,343,91)
{
link(onEvent1,4037425:doClear,[(382,97)(382,195)])
link(onEvent2,4952295:doSectionData,[(371,104)(371,147)(212,147)(212,132)])
}
Add(StrPart,7096850,280,175)
{
Char="="
link(onPart,4037425:doAdd,[])
}


карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
файлы: 1code_17988.txt [1.4KB] [165]
11
Сообщение
...
Прикрепленные файлы
(файлы не залиты)