Create Shortcut Using IPersistStream?

Does anyone know how to create a shell link using IPersistStream
rather than IPersistFile? (Delphi example code greatly appreciated).

Why not just use IPersistFile? We don't want the shortcut to
automatically resolve its target on creation and the Win32 Programmers'
Ref says "if an application creates a shell link and stores it in a
stream, the system does not automatically attempt to resolve the
link." Anyone know if this is true?

Thanks.