Присваивание

[BastAngel]

Доброе утро.
Я хочу чтобы при выборе в combobox определенного items другому combobox-у присваивалось значение Edit-a и заносило его в Items.

вот код

procedure TAdminForm.ComboBox1DrawItem(Control: TWinControl;
  Index: Integer; Rect: TRect; State: TOwnerDrawState);
begin
 if ComboBox1.Items = 'Экскурсовод' then ComboBox5.Items:=edit1.text;
end;

ошибку выдает:
incompatible types: 'String' and 'TString'

[IvaD]

begin
if ComboBox1.text = 'Экскурсовод' then \\ сверяем ТЕКСТ.
ComboBox2.Items.Add(Edit1.Text); \\ Добовляем запись
ComboBox2.ItemIndex:= 0; \\Отображаем первую строку 
end;

А ВООБЩЕ ПРЕЖДЕ ЧЕМ ЗАДАВАТЬ ТАКИЕ ВОПРОСЫ СОВЕТУЮ СКАЧАТЬ И ПРОСМОТРЕТЬ (ХОТЯ БЫ!) "СТО КОМПОНЕНТОВ ОБЩЕГО НАЗНАЧЕНИЯ БИБЛИОТЕКИ DELPHI 5 - А. Я. АРХАНГЕЛЬСКИЙ". А УЖЕ ПОТОМ ЕСЛИ ЧТО ТО НЕ ПОНЯТНО ЗАДАВАТЬ НА ФОРУМЕ

[referent]

Или так:
...
if ComboBox1.Items = 'Экскурсовод' then
ComboBox5.Items.Strings[..]:=Edit1.Text //В скобках нужный номер Items
...