FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
|
Herramientas | Buscar en Tema | Desplegado |
#1
|
|||
|
|||
Pintar a mano alzada
Hola, ¿hay algún método dentro de Builder, que permita dibujar trazos a estilo libre, es decir, como si fuese un lápiz, en un TImage?¿ y algo para una goma de borrar?
Gracias, saludos. |
#2
|
||||
|
||||
Pues hace no más de una semana salió el mismo tema.
Basta con acceder al canvas del TImage y "pintar" sobre él. Si utilizas los mátodos del ratón, mouseDown, mouseMove y MouseUp puedes detartar cuando se está "pintando"; a partir de ahí basta con que accedas a Pixels[x,y] del camvas y le asignes el color de pintado. Para la goma lo mismo, pero con el color blanco. Busca el ejemplo; Puede ser que esté en Delphi, pero no te será difícil entenderlo y pasarloa Builder.
__________________
Germán Estévez => Web/Blog Guía de estilo, Guía alternativa Utiliza TAG's en tus mensajes. Contactar con el Clubdelphi P.D: Más tiempo dedicado a la pregunta=Mejores respuestas. |
#4
|
|||
|
|||
ayy, no encuentro el ejemplo ...
|
#5
|
||||
|
||||
Vamos, si hasta el link del hilo te he dejado.
PD; claro si es ése al cual se referia Neftali Saludos |
#6
|
|||
|
|||
ahh, jaja, gracias, y yo pensando que gracioso me dice Hola... jaja, que polvorón tengo!!!!
GRacias. |
#7
|
||||
|
||||
te recomiendo que como bien te dijeron arriba. Uses el metodo de onMouseOver, pero en vez del Pixel[x,y], uses el LineTo(X,y) porque con el primero te quedan los puntos separados si dibujas muy rapido.
1-En el evento mouseclick pones este procedimiento MoveTo(X,Y); para llevar el puntero a esa direccion que distes click. 2-En el evento MouseOver controlas que boton esta oprimido y en caso de ser el que quieras pues haces un LineTo(X,Y); hazlo y dime si te puedo ayudar mas. Yo ya hice eso hace muchos años en una aplicacion que lo requeria. saludos y suerte. |
#8
|
||||
|
||||
Perdona, el el mensaje anterior puse que es el evento MouseOver y en realidad es el evento MouseMove.
|
|
|
Temas Similares | ||||
Tema | Autor | Foro | Respuestas | Último mensaje |
Una Mano con QReport 4.06 y LX-300+ | El_Raso | Impresión | 2 | 21-02-2007 16:34:51 |
Delphi y Net de la mano!!! | acertij022 | Varios | 5 | 14-02-2007 17:02:38 |
Una mano :( con Insert en Zeo's | RyCk | Conexión con bases de datos | 7 | 21-01-2006 07:17:07 |
Google da una mano a OpenOffice.org | marcoszorrilla | Noticias | 1 | 01-11-2005 13:31:03 |
Una mano por favor | Manuel | SQL | 3 | 07-05-2003 09:38:44 |
|