求个delphi7 的控件 小led的指示灯 红绿表示状态的那种