[lmikle]

Что-то типа:

Код:

procedure Form1Create(...);
begin
  Combo1.Items.Assign(List1.Items);
  Combo2.Items.Assign(List1.Items);
end;

procedure Combo1Change(...); // ну или что там на изменение вызывается.
var
  Idx : Integer;
begin
  Combo2.Items.Assign(List1.Items);
  Idx := Combo2.Items.IndexOf(Combo1.Text);
  Combo2.Items.Delete(Idx);
end;

ЗЫ. Это главная идея. Может я не совсем понял задачу.
Смысл:
- при старте заполняем оба комба одинаково из листа.
- При смене значения в первом комбе заного заполняем второй, а потом из него удаляем выбранное значение.