Delphi 7 у меня несколько edit и некоторым из них я хочу задать свойство Visible:=true одним разом. поэтому я задала им всем в свойстве Tag значения 10 и написала следующий код ошибки не высвечивается но и процедура не срабатывает(нажатие кнопки)

if (Components[i] is TEdit) and (TEdit(Components[i]).Tag = 10)
then TEdit(Components[i]).Visible:=true;

Сырочег    1   14.12.2020 10:38    0