Добрый день!

в список с галками выводится что-то из базы
помечаются галки юзером и нужно разбирать, что он пометил и положить в базу

что-то типа

tempint:=0
if checked[0] then tempint:=tempint or $1
if checked then tempint:=tempint or $2
if checked then tempint:=tempint or $4
if checked then tempint:=tempint or $8
ParamByName().Value:=tempint

как это сделать автоматически, не разбирая руками список по одному?

устроило бы, если к каждой строке в TStrings можно было добавить не TObject с которым тоже можно, но много ручной работы, а строку, по которой можно получить эти самые $1..$8

PS это в некотором роде работа с константами

Я забыл написать, что это нужно в общем виде, т.е. $1..$8 могут идти вразнобой и ограничены только int32. Поскольку в самом TCheckListBox нет никакой дополнительной информации кроме текста, то можно ссылаться на них только по порядковому номеру, а дальше по нему уже как-то руками вычислять реальные требуемы числа. А этого как раз и не хочется.

Нужна визуальная структура с данными

checked1,Constant1, text1
checked2,Constant2, text2
checked3,Constant3, text3

но где видимы только checked,text
желательно из стандартных контролов

Видимо, я опять неправильно сформулировал...

Нужна визуальная структура с данными

boolean string string
--------------------------
checked1 Constant1 text1
checked2 Constant2 text2
checked3 Constant3 text3

но где видимы только checked,text
желательно из стандартных контролов

дело в том, что эти константы $1..$n имеют имена в базе и хотелось бы к ним обращаться по ним, т.к. их значения в процессе разработки могут изменииться

можно из TObject ссылаться на эту строку, но ее надо create, а потом destroy руками

или слишком много хочу?

на текущий момент использую TListView, но он визуально гораздо хуже TCheckListBox