На форме у меня лежат Edit1 и ComboBox1
У меня в ComboBox1 В Items написано:
Код1
Код2
Код3
Как сделать чтобы при нажатии на Код1 в Edit1 написалось ОтветКод1
а при нажатии на Код2 написалось ОтветКод2?
Вот КОД:
Код:
procedure TForm1.ComboBox1Change(Sender: TObject);
begin
if Form1.ComboBox1.Items.NewInstance='Код1' then
edt1.Text='ОтветКод1';
end;
end.
В чем ошибка?
Пишет вот что:
[Ошибка] Unit1.pas(29): Incompatible types: 'TStrings' and 'String'
[Фатальная Ошибка] Project1.dpr(5): Could not compile used unit 'Unit1.pas'