Arrastrar imagen

[david.rguez]

He utilizado tu código, pero me sigue sin permitir arrastrar.

Es decir, si yo pincho sobre la imagen y muevo el ratón manteniéndolo pulsado, el cursor cambia al icono de prohibición (el círculo con una barra diagonal) y no se mueve la imagen.

[Neftali [Germán.Estévez]]

En el ejemplo que te comento no se usa "Drag and Drop"; Si no debes arrastrar entre diferentes controles, sino que sólo debes mover, desactiva esa característica, no te hace falta.

[david.rguez]

He quitado eso y funciona perfectamente ahora, gracias

Ahora ya solo me falta implementar que se almacene permanentemente la nueva posición, que no es ningún problema.

Ahora, a título de curiosidad... ¿hay alguna forma de que desaparezca ese antiestético parpadeo mientras se mueve? Creo haber leído algo del doble-buffer, pero jamás logré que desapareciese (es un TImage moviéndose por encima de un TPanel (el cuál puede tener otra TImage a modo de ilustración de fondo (esto ya es a elección del cliente)).

[[seoane]]

Dependiendo de la versión de delphi con la que trabajes, puedes disponer de la propiedad DoubleBuffered que soluciona este problema:

Código Delphi [-]
procedure TForm1.FormCreate(Sender: TObject);
begin
  DoubleBuffered:= TRUE;
end;

[david.rguez]

Empezado por seoane

Dependiendo de la versión de delphi con la que trabajes, puedes disponer de la propiedad DoubleBuffered que soluciona este problema:
Código Delphi [-]procedure TForm1.FormCreate(Sender: TObject); begin DoubleBuffered:= TRUE; end;

Trabajamos en Delphi 2005. Eso lo probé hace un par de meses, (lo dejamos durante un tiempo hasta tener instrucciones más precisas del cliente y nos dedicamos a otras partes), pero no había ningún cambio perceptible :S