怎么用Delphi控制硬件设备

怎么用Delphi禁用或启用光驱、软驱、USB和打印机等硬件设备，不要修改注册表，希望可以实时控制的。