Ольга Манахова
Ольга Манахова

Что в коде не правильно? (Delphi)

begin
if sComboBox1.Text='' then begin
sButton1.Enabled:=False;
end else sComboBox1.Text='Значение 1' then begin
sButton1.Enabled:=True;
end else sComboBox1.Text:='Значение 2' then begin
sButton1.Enabled:=True;
end;
end;

Какая в нём ошибка?

Большое спасибо! Допустил такую глупую ошибку)))

K@
K@tenok

после else if пропущен. дважды

Nobody
Nobody

1. После else нужен if.
2. sComboBox1.Text:='Значение 2' - здесь двоеточие не нужно!
3. end'ов, возможно, многовато.. . Если всё равно не запустится - попробуйте убрать один внизу 😉
4. Можно проще (по крайней мере, в данном случае)
if ComboBox1.Text = '' then begin
Button1.Enabled := False;
end else if (ComboBox1.Text = 'Значение 1') or (Combobox1.Text = 'Значение 2') then begin
Button1.Enabled := True;
end;

P.S. Ещё мне нравится вариант с case, он поудобнее.. . Но здесь case не в тему 😉

Похожие вопросы
Ошибка в коде delphi
Где ошибка в коде delphi?
Ошибка в коде (Delphi 7).
Delphi. Проверьте код пожалуйста!
Delphi, помогите с кодом
Перевод кода из delphi в C#
Помогите с кодом Delphi
Помогите мне с кодом по Delphi.
Delphi - как правильно?
Delphi Код вычисление как???