Delphi ошибка E2015, как исправить?

Question

[Владимир]

Здравствуйте, помогите решить проблему, не могу понять в чем ошибка. Заранее спасибо!

procedure TForm1.bStartClick(Sender: TObject);
var cost: double;
begin
  cost := StrToFloat(eStart.Text);

  if cTax.Items = 1 then       //Выдает тут ошибку E2015 Operator not applicable to this operand type
  begin
    eResult.Text := FloatToStr(1.13 * cost);
    Com.Name := 'Налог составляет 13%';
  end;
end;

end.

Answer 1

[Hemul GM]

Items - это список, а ты сравниваешь его с числом.

Полагаю, тебе нужно свойство ItemIndex

Comments

[Владимир]

Даа, точно, спасибо большое! Не внимательно просмотрел код