<div dir="ltr"><div class="gmail_default" style="font-family:tahoma,sans-serif">Me alegro!</div><div class="gmail_default" style="font-family:tahoma,sans-serif">Al menos tenes el código fuente para ver como lograr el efecto deseado.</div>
</div><div class="gmail_extra"><br><br><div class="gmail_quote">2013/8/27 Maxi <span dir="ltr"><<a href="mailto:maximiliano.duarte@gmail.com" target="_blank">maximiliano.duarte@gmail.com</a>></span><br><blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex">
El día 25 de agosto de 2013 15:21, Maxi <<a href="mailto:maximiliano.duarte@gmail.com">maximiliano.duarte@gmail.com</a>> escribió:<br>
<div class="im">> Gracias Martín ahora no tengo la pc pero apenas llegue lo veo<br>
><br>
> El 25/08/2013 12:24, "Martin Gomez" <<a href="mailto:mmgomez@gmail.com">mmgomez@gmail.com</a>> escribió:<br>
>><br>
>> Más aún:<br>
>> Este componente francés ya hace lo que necesitas :)<br>
>><br>
>> <a href="http://www.tcoq.org/DrawObjectsExtended/DrawObjectsExtendedDesign.html" target="_blank">http://www.tcoq.org/DrawObjectsExtended/DrawObjectsExtendedDesign.html</a><br>
>><br>
>> aquí las descargas: <a href="http://www.tcoq.org/composants" target="_blank">http://www.tcoq.org/composants</a><br>
>><br>
>><br>
>><br>
>><br>
>> 2013/8/25 Martin Gomez <<a href="mailto:mmgomez@gmail.com">mmgomez@gmail.com</a>><br>
>>><br>
>>><br>
>>> 2013/8/25 Martin Gomez <<a href="mailto:mmgomez@gmail.com">mmgomez@gmail.com</a>><br>
>>>><br>
>>>> Yo siempre lo hice poniendo una variable boolean en True en el<br>
>>>> OnMouseDown, en False en el OnMouseUp y "actuando" en el OnMouseMove<br>
>>>> solamente si estaba la bandera en True.<br>
>>><br>
>>><br>
>>> por cierto, esto sólo funciona si los objetos que mueves NO reaccionan<br>
>>> ante el mouse... yo lo hice sobre un TImage y los "objetos" los dibujaba a<br>
>>> mano en el Image.OnPaint, emitiendo un Image.Invalidate() cada vez que<br>
>>> necesitaba forzar un cambio (al mover un objeto por ejemplo)<br>
>>><br>
>>> Si estás trabajando con objetos visuales (ej, TButton), te convendría<br>
>>> echar un vistazo al diseñador de formularios de Lazarus, o a diseñadores de<br>
>>> formularios disponibles como componentes.<br>
>>><br>
>>> Ej: <a href="http://forum.lazarus.freepascal.org/index.php?topic=17515.0" target="_blank">http://forum.lazarus.freepascal.org/index.php?topic=17515.0</a><br>
>>><br>
>>> CodeTyphon incluye un componente "exDesign" que podría servirte:<br>
>>> <a href="http://www.pilotlogic.com/sitejoom/index.php/forums/scripting-development/2553-form-designer-component-pl-exdesign" target="_blank">http://www.pilotlogic.com/sitejoom/index.php/forums/scripting-development/2553-form-designer-component-pl-exdesign</a><br>

>>><br>
</div><div class="im">>>> --<br>
>>> Try not to become a man of success but rather to become a man of value.<br>
>>> Albert Einstein<br>
>><br>
>><br>
>><br>
>><br>
>> --<br>
>> Try not to become a man of success but rather to become a man of value.<br>
>> Albert Einstein<br>
>><br>
>> _______________________________________________<br>
>> Lazarus-es mailing list<br>
>> <a href="mailto:Lazarus-es@lists.lazarus.freepascal.org">Lazarus-es@lists.lazarus.freepascal.org</a><br>
>> <a href="http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus-es" target="_blank">http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus-es</a><br>
>><br>
><br>
<br>
</div>Gracias Martin justo esos dos objetos tenia en mente, ahora hice unas<br>
pruebas y no sob los ideales pero me sirve para empezar<br>
<div class="HOEnZb"><div class="h5">--<br>
El que pregunta aprende, y el que contesta aprende a responder.<br>
<br>
No a la obsolecencia programada:<br>
<a href="http://www.rtve.es/noticias/20110104/productos-consumo-duran-cada-vez-menos/392498.shtml" target="_blank">http://www.rtve.es/noticias/20110104/productos-consumo-duran-cada-vez-menos/392498.shtml</a><br>
<br>
Linux User #495070<br>
<a href="http://domonetic.com/blog" target="_blank">http://domonetic.com/blog</a><br>
<br>
_______________________________________________<br>
Lazarus-es mailing list<br>
<a href="mailto:Lazarus-es@lists.lazarus.freepascal.org">Lazarus-es@lists.lazarus.freepascal.org</a><br>
<a href="http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus-es" target="_blank">http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus-es</a><br>
</div></div></blockquote></div><br><br clear="all"><div><br></div>-- <br><div><span style="font-family:tahoma,sans-serif">Try not to become a man of success but rather to become a man of value. <i>Albert Einstein</i></span></div>

</div>