[Vit]

Доброго времени...
Прошу Вашего совета.
Нужно из CheckListBox перенести выбранные записи в ListBox, причем
не должен нарушиться порядок записей. У меня получилось перенести только все записи полностью.
Помогите пожалуйста, кто знает.

[Aristarh Dark]

Код:

var
  i:integer;
begin
  MyListBox.Items.Clear;
  for i:=0 to MyCheckListBox.Items.Count-1 do
    if MyCheckListBox.Checked[i] then
      MyListBox.Append(MyCheckListBox.Items[i]);
end;

[Vit]

Спасибо огромное, все работает.
Только опечатка небольшая: нужно MyListBox.Items.Append(MyCheckListBox.Items[i]);