проблема CheckBox

← →
prestupnick (2003-07-04 23:03) [0]

Как можно отметить галочкой все элементы CheckList не исрользуя массивы. А тоя че-то парю!

← →
Ihor Osov'yak © (2003-07-04 23:14) [1]

TCheckListBox ?

for i:=1 to CheckList.Items.Count do CheckList.Checked[pred(i)] := true;

А написать примерно такое - не судьба?

← →
Владимир Белов (2003-07-04 23:37) [2]

Работа с компонентами по их индексу:
//загрузка изображений в компоненты IMAGE1-IMAGE8
var
n:byte;
begin
if (OpenPictureDialog1.Execute) and (n in [0..7]) then
begin
Inc(n);
Pic:=FindComponent("image"+IntToStr(n));
(Pic as TImage).Picture.LoadFromFile(OpenPictureDialog1.FileName);
end;

← →
default © (2003-07-04 23:40) [3]

Ihor Osov"yak © (04.07.03 23:14)
зачем Pred ? не лучше ли цикл с 0 начать ?

2 default © (04.07.03 23:40)

Если с 0 начнем - сравнивать с CheckList.Items.Count-1 придется.. Хотя тогда одну операцию в цыкле экономим.

Но пишу так, как написал - привык так. Ну и читабельнее.. Но это субьективно. Если бы вопрос быстродействия стоял-бы остро - да, начал бы с 0..

> Если бы вопрос быстродействия стоял-бы остро - да, начал бы с 0..

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

проблема CheckBox Найти похожие ветки