long custom[ ]
integer li_color
custom[1]=rgb(255, 200, 1345678)
custom[2]=8344736
long ll_select_color = 255    //选择的颜色
if  li_color = ChooseColor( ll_select_color, custom [ ] ) = 1 then
 ...
end if