% RGBColor

r=0;
g=0;
b=0;
rgb='[0 0 0 ]';

% fenÍtre

rgbf = figure('Position',[225 200 350 200],...	% position (100,100) et taille de la fenÍtre (300 250)
              'MenuBar','None',...				% pas de menus
			  'Number','Off',...				% pas de figure no
			  'Name','RGB Colors',...			% par contre un nom
			  'Color',[r g b]);					% par contre une couleur

sr = uicontrol(rgbf,'Position',[100 150 150 16],...
					'Style','Slider',...
					'Min',0,'Max',1,'Value',r,...
					'CallBack','r=get(sr,''Value'');set(vr,''String'',num2str(r));set(rgbf,''Color'',[r g b]),rgb=sprintf(''[%g %g %g]'',r,g,b);set(triplet,''String'',rgb)');

sg = uicontrol(rgbf,'Position',[100 100 150 16],...
					'Style','Slider',...
					'Min',0,'Max',1,'Value',r,...
					'CallBack','g=get(sg,''Value'');set(vg,''String'',num2str(g));set(rgbf,''Color'',[r g b]),rgb=sprintf(''[%g %g %g]'',r,g,b);set(triplet,''String'',rgb)');

sb = uicontrol(rgbf,'Position',[100 50 150 16],...
					'Style','Slider',...
					'Min',0,'Max',1,'Value',r,...
					'CallBack','b=get(sb,''Value'');set(vb,''String'',num2str(b));set(rgbf,''Color'',[r g b]),rgb=sprintf(''[%g %g %g]'',r,g,b);set(triplet,''String'',rgb)');

lr = uicontrol(rgbf,'Position',[30 150 50 16],...
					'Style','Text',...
					'String','Rouge');

lg = uicontrol(rgbf,'Position',[30 100 50 16],...
					'Style','Text',...
					'String','Vert');

lb = uicontrol(rgbf,'Position',[30 50 50 16],...
					'Style','Text',...
					'String','Bleu');

vr = uicontrol(rgbf,'Position',[280 150 50 16],...
					'Style','Text',...
					'String',num2str(r));

vg = uicontrol(rgbf,'Position',[280 100 50 16],...
					'Style','Text',...
					'String',num2str(g));

vb = uicontrol(rgbf,'Position',[280 50 50 16],...
					'Style','Text',...
					'String',num2str(b));

triplet = uicontrol(rgbf,'Position',[100 10 150 20],...
					'Style','Edit',...
					'String',rgb);