Замена const aArE: array of String; CheckListBox'ом

[Пепел Феникса]

T_I_T_A_N, а у тя -9 репа(могу еще уменьшить).
а вообще я думаю и ты задавал глупые вопросы ранее.

[grafgrial]

T_I_T_A_N

При чем тут репутация, и совсем не чушь, было бы просто решил бы проблему

Stilet, не подходит! При моем варианте он хоть последний выделенный чекбокс принимает, а при твоем коде он читает последний во всем списке checklistbox. ну а так он их прописывает в label - как нужно
Есть еще варианты

[Stilet]

а при твоем коде он читает последний во всем списке checklistbox. ну а так он их прописывает в label - как нужно

Ниче не понял... Поясни эту фразу.

[grafgrial]

Я наверное непонятно объяснил.
Начну сначала: написал приложение в котором была функция и кнопка, с мемо, в которую весь результат сходил
Выглядело так

procedure EnuРнs(
  const aDir : String;
  const aArE : array of String);
begin
.....
end;

procedure TForm1.Button2Click(Sender: TObject);
const  aArE: array[1..3] of String = ('Klo.g','Klo.f','Klo.t');
begin
EnuРнs(aArE, Memo1.Lines);
end;

А сейчас я собрался переделать чтобы было через checklistbox

Stilet, так
2.bmp
То что у меня получается это выделено зеленым, а то что с твоим красным