[Kmef]

Hola a todos!!!

como el titulo lo dice: Necesito controlar el numero de clicks del mouse, tengo una funcion que MouseDown y ya recibo el click derecho del mouse, pero lo que necesito es controlar los tres primeros clicks del usuario, dados en una imagen para obtener su rgb. Para despues manipular estos colores en un shape.

Esto es lo que llevo:

Código Delphi [-]
procedure TForm6.Image3MouseDown(Sender: TObject; Button: TMouseButton;
  Shift: TShiftState; X, Y: Integer);
var
  pix,click : integer;
  cr,cg,cb : byte;
begin
 
   pix := Image3.Canvas.Pixels[X,Y];

   cr := pix and $FF;
   cg := (pix shr 8) and $FF;
   cb := (pix shr 16) and $FF;
 
 if button = mbleft then begin
    Shape1.Brush.Color:= RGB(cr,cg,cb);
 click:=1; // segun yo asi funcionaba, pero NO
  end;
  if click = 1 then begin
    Shape2.Brush.Color:= RGB(cr,cg,cb);
    click:=2;
  end;
  if click = 2 then begin
    Shape3.Brush.Color:= RGB(cr,cg,cb);
  end;
end;

Espero su respuesta!!! Gracias!!!