[Lazarus-es] Mover objetos en tiempo de ejecucion

Martin Gomez mmgomez en gmail.com
Dom Ago 25 17:24:46 CEST 2013


Más aún:
Este componente francés ya hace lo que necesitas :)

http://www.tcoq.org/DrawObjectsExtended/DrawObjectsExtendedDesign.html

aquí las descargas: http://www.tcoq.org/composants




2013/8/25 Martin Gomez <mmgomez en gmail.com>

>
> 2013/8/25 Martin Gomez <mmgomez en gmail.com>
>
>> Yo siempre lo hice poniendo una variable boolean en True en el
>> OnMouseDown, en False en el OnMouseUp y "actuando" en el OnMouseMove
>> solamente si estaba la bandera en True.
>
>
> ​por cierto, esto sólo funciona si los objetos que mueves NO reaccionan
> ante el mouse... yo lo hice sobre un TImage y los "objetos" los dibujaba a
> mano en el Image.OnPaint, emitiendo un Image.Invalidate() cada vez que
> necesitaba forzar un cambio (al mover un objeto por ejemplo)​
>
> ​Si estás trabajando con objetos visuales (ej, TButton), te convendría
> echar un vistazo al diseñador de formularios de Lazarus, o a diseñadores de
> formularios disponibles como componentes.
>
> Ej: http://forum.lazarus.freepascal.org/index.php?topic=17515.0
>
> CodeTyphon incluye un componente "exDesign" que podría servirte:
> http://www.pilotlogic.com/sitejoom/index.php/forums/scripting-development/2553-form-designer-component-pl-exdesign
>
> --
> Try not to become a man of success but rather to become a man of value. *Albert
> Einstein*
>



-- 
Try not to become a man of success but rather to become a man of value. *Albert
Einstein*
------------ próxima parte ------------
Se ha borrado un adjunto en formato HTML...
URL: <http://lists.lazarus-ide.org/pipermail/lazarus-es/attachments/20130825/44a057c9/attachment-0002.html>


More information about the Lazarus-es mailing list