Ver Mensaje Individual
  #1  
Antiguo 20-04-2012
yasnielmh yasnielmh is offline
Registrado
NULL
 
Registrado: abr 2012
Posts: 1
Reputación: 0
yasnielmh Va por buen camino
Unhappy Problemas Canvas para un Paint VCL

Hola Colegas:

Estoy tratando de hacer un paint en Delphi XE2 para VCL, y estoy usando para pintar la propiedad canvas de un TImage, en el cual con las funciones LineTo, pinto una linea, el tema es el siguiente; cuando tengo el TImage limpio, o sea sin una imagen todo funciona de maravilla, pero cuando intento hacer los mismo con una imagen de fondo o sea con una imagen asinada con Image1.Picture.LoadFromFile (bmp), el tema es que me sigue pintando pero a la medida que me alejo de la posicion inicial del TImage (0,0) el trazo del dibujo se aleja de la posicion real del mouse y estoy pintando usando las cordenadas que me da el evento OnMouseMove, o sea Pinto desde el origien hasta mis cordenadas actuales X,Y. Alguien sabe porqué sucede esto?
Responder Con Cita