Tema: ¿Cómo dibujar un punto en una imagen bmp en un timage?
Ver Mensaje Individual
  #2  
Antiguo 20-06-2015
Avatar de escafandra
[escafandra] escafandra is offline
Miembro Premium
  
Registrado: nov 2007
Posts: 2.197
Reputación: 20
escafandra Tiene un aura espectacularescafandra Tiene un aura espectacular
Esto pinta un punto de color negro:

Código Delphi [-]
procedure TForm1.Image1MouseDown(Sender: TObject; Button: TMouseButton;
  Shift: TShiftState; X, Y: Integer);
begin
  Image1.Canvas.Pixels[X,Y]:= 0;
end;

Saludos.
Responder Con Cita