Change the target of a shortcut file

Using Delphi 2010 or compatible version, write a function: Function ShortcutEdit(const ShortcutFilename, NewTarget, NewWorkingDir : String) : Boolean; Which edits the given ShortcutFile and changes its target (i.e. to what file the shortcut is pointing to) and its working directory. If the function succeeds, it must return True. The function needs to work with only regular shortcuts pointing to a file, not with special shortcuts that point to Windows properties such as My Computer or Control Panel. The function must work all versions of Windows from Windows XP to Windows 10. The final delivery must consists of the source code as well as a simple demo program that can be used to test the function works.