[opel431]

Можно сделал и по иному.... это расширит количество возможных комбинаций при необходимости и сократит код при повторных вызовах
........
procedure EnabledElm(mo: Boolean; lb: Boolean; cb: Boolean); // для примера три компонента

implementation
........

{процедура: EnabledElm
Входные параметры: mo: Boolean; lb: Boolean; cb: Boolean
Результат: изменение свойства Enabled, в зависимости от условия}

procedure TMain.EnabledElm(mo: Boolean; lb: Boolean; cb: Boolean);
begin
Memo1.Enabled := mo;
Label1.Enabled := lb;
ComboBox1.Enabled := cb;
end;


Применение

// все однотипно
if checkBox1.Checked then
EnabledElm(False, False, False)
else
EnabledElm(True, True, True);

// раздельно
if checkBox1.Checked then
EnabledElm(True, False, False)
else
EnabledElm(False, False, True);