Drag Drop TImage

[ecfisa]

Hola de nuevo.

Míl gracias por la pronta respuesta, y la ayuda. Verás, incialmente intenté hacerlo, pero definitivamente el compilador genera un error, ya que falta declarar qué es "NewPedalMouseDown;

Ahora te entiendo...

Dentro del form, declará el procedimiento como private:

Código Delphi [-]
type
  TForm1 = class(TForm)
  private
    procedure NewPedalMouseDown(Sender: TObject; Button: TMouseButton;  
              Shift: TShiftState; X, Y: Integer); 
  public
end;

Podés declararlo como public, pero no creo que convenga en este caso.

Saludos.