Yeelight LED智能灯泡（彩光版）代码控制

简介：

Yeelight 结合全色温全色域LED照明

在提供基本的照明功能的基础上更提供了通过智能手机远程开关灯，调节色彩，亮度的功能。

Yeelight还可以让用户自己定义延时开灯和延时关灯等功能。
Yeelight实现了即联即用的功能，无需额外的网关和配件，将灯泡拧到灯口里面，打开开关，即可使用Yeelight。

通过手机上的蓝牙功能连接到灯泡既可以实现对灯泡的颜色亮度等的控制。
除了基本的调光调色外，Yeelight还提供了音乐彩虹，流动时光，以及情景模式等功能。

参数：

产品名称:Yeelight LED灯泡（彩光版）
产品型号:YLDP06YL
产品接口:E26 / E27
光通量:800 流明
产品色温:1700K-6500K
使用寿命:约 25000 小时
无线连接:Wi-Fi IEEE 802.11 b/g/n 2.4GHz
额定输入:100V-240V~50/60Hz
额定功率:10W

代码：

获得智能灯的ip地址：

 CMDString:= 'M-SEARCH * HTTP/1.1'+' '+'HOST: 239.255.255.250:1982'+' '+ 'MAN: ' +
    '"ssdp:discover"'  +' '+ 'ST: wifi_bulb' ;
IdUDPClient1.Broadcast(CMDString,43210);
ListBox1.Items.Add(IdUDPClient1.ReceiveString());

开关灯：

if CheckBox1.Checked then
   Self.ClientSocket1.Socket.SendText('{"id":0x00000000035ddcdf,' +
   '"method":"set_power","params":["on"]}'+#13#10)
else
   Self.ClientSocket1.Socket.SendText('{"id":0x00000000035ddcdf,' +
 '"method":"set_power","params":["off"]}'+#13#10) ;

设置灯颜色：

var
  Color: TColor;
  R, G, B: integer;
  rgbcolor:Integer;

begin
  Color := Self.ColorBox1.Selected;
  R := Color and $FF;
  G := (Color and $FF00) shr 8;
  B := (Color and $FF0000) shr 16;
  rgbcolor:=R*65536+G*256+B;
  Self.ClientSocket1.Socket.SendText(' {"id":0x00000000035ddcdf,"method":"set_rgb","params":['+IntToStr(rgbcolor)+', "smooth", 500]}'+#13#10)
end;

设置灯亮度：

Self.ClientSocket1.Socket.SendText('{"id":0x00000000035ddcdf,"method":"set_bright","params":['+IntToStr(Self.TrackBar1.Position)+', "smooth", 500]}'+#13#10)

参考资料:

http://www.yeelight.com/download/Yeelight_Inter-Operation_Spec.pdf