TButtonedEdit

就是edit+button的控件

设置ButtonedEdit的Images属性，可实现三态按钮效果，不过button不支持文字，只支持图片

    ButtonedEdit1->LeftButton;
    ButtonedEdit1->RightButton;
按钮可以在左边，也可以在右边

ButtonedEdit1->LeftButton->Visible=true;//默认是不显示的

　ButtonedEdit1.Alignment := taCenter; {居中显示文本}
　ButtonedEdit1.Images := ImageList1;　{对应的图像列表}
　ButtonedEdit1.LeftButton.Visible := True;　　　　　{允许显示 LeftButton}
　ButtonedEdit1.LeftButton.HotImageIndex　　　:= 0;　{左: 鼠标悬停时的图标}
　ButtonedEdit1.LeftButton.ImageIndex　　　　 := 1;　{左: 正常显示时的图标}
　ButtonedEdit1.LeftButton.PressedImageIndex　:= 2;　{左: 鼠标点下时的图标}
　ButtonedEdit1.LeftButton.DisabledImageIndex := 6;　{LeftButton 不可用时的图标}
　ButtonedEdit1.RightButton.Visible := True;　　　　 {允许显示 RightButton}
　ButtonedEdit1.RightButton.HotImageIndex　　　:= 3; {右: 鼠标悬停时的图标}
　ButtonedEdit1.RightButton.ImageIndex　　　　 := 4; {右: 正常显示时的图标}
　ButtonedEdit1.RightButton.PressedImageIndex　:= 5; {右: 鼠标点下时的图标}
　ButtonedEdit1.RightButton.DisabledImageIndex := 6; {RightButton 不可用时的图标}