delphi给参数赋值的问题，期待高手

  if ListView.Items.Count>0 then
        pmOpen.Enabled:=pmSaveNear.Enabled=pmCopy.Enabled=pmRenname.Enabled=pmDel.Enabled=True
  else  pmOpen.Enabled:=pmSaveNear.Enabled=pmCopy.Enabled=pmRenname.Enabled=pmDel.Enabled=False;我想同时给几个控件属性赋相同值，有什么办法吗，要求一行代码能写完的方式，就像上面的形式，但上面的只能赋值到第一个……，期待高手！