Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.07.17;
Скачать: CL | DM;

Вниз

проблема 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 начать ?


 
Ihor Osov'yak ©   (2003-07-04 23:50) [4]

2 default © (04.07.03 23:40)

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

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


 
Ihor Osov'yak ©   (2003-07-04 23:52) [5]

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

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





Страницы: 1 вся ветка

Текущий архив: 2003.07.17;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.019 c
7-55881
iZEN
2003-05-06 15:35
2003.07.17
Узнать путь к файлу сервиса.


1-55520
Makhanev A.S.
2003-07-03 23:06
2003.07.17
GroupBox.Visible - AV?


14-55738
Фикус
2003-07-01 14:07
2003.07.17
Как победить в себе агрессию?


14-55768
wef
2003-07-03 13:57
2003.07.17
Подскажите есть какой нибудь приличный форум по Oracle


1-55552
DrDrew
2003-07-05 17:41
2003.07.17
Как пропатчить процесс в памяти ?