Líneas Guías sobre el Puntero del Mouse

[Robert01]

Pienso que podrías usar algo parecido a esto:

Código Delphi [-]
procedure TForm1.Image1MouseMove(Sender: TObject; Shift: TShiftState; X,
Y: Integer);
begin image1.Canvas.MoveTo(startx,starty); image1.Canvas.LineTo(x,y); end;

end;

Ya que tienes los puntos donde está el cursor en cada momento podrías usarlos en el código este.