Unit IShrtCut

-------------------------------------------------------------------------------------} { An "internet shortcuts" component for Delphi32. } { Copyright 1997, Patrick Brisacier and Jean-Fabien Connault. All Rights Reserved. } { This component can be freely used and distributed in commercial and private } { environments, provided this notice is not modified in any way. } { -------------------------------------------------------------------------------------} { Feel free to contact us if you have any questions, comments or suggestions at } { PBrisacier@mail.dotcom.fr (Patrick Brisacier) } { JFConnault@mail.dotcom.fr (Jean-Fabien Connault) } { You can always find the latest version of this component at: } { http://www.worldnet.net/~cycocrew/delphi/ } { -------------------------------------------------------------------------------------} { Date last modified: 07/05/97 } { -------------------------------------------------------------------------------------} { -------------------------------------------------------------------------------------} { TIShortCut v1.04 } { -------------------------------------------------------------------------------------} { Description: } { A component that allows you to manipulate Windows 95's internet shortcuts. } { Properties: } { property FileIcon: TFileIcon; } { property FileName:String; } { property HotKey: TShortCut; } { property ShellFolder: TShellFolder; } { property URL: String; } { property WindowState: TWindowState; } { property WorkingDir: String; } { Procedures and functions: } { procedure Read; } { procedure Write; } { Needs: } { FileIcon unit from Patrick Brisacier } { } { See example contained in example.zip file for more details. } { -------------------------------------------------------------------------------------} { Revision History: } { 1.00: + Initial release } { 1.01: + Added ShellFolder property and removed Options property } { 1.02: + Removed RegFiles package uses } { 1.03: + The ShellOBJ unit has been replaced by the MyShlobj unit build by } { Brad Stowers (bstowers@pobox.com) } { 1.04: + Modified to work with Delphi 3 } { -------------------------------------------------------------------------------------

Classes

TIShortCut -

Functions

Register -

Types

TShellFolder

Constants

ShellFolderKeys

Variables


Functions


procedure Register;


Types


TShellFolder = (sfNone, sfDesktop, sfFavorites, sfFonts, sfPersonal, sfPrograms,
                  sfRecent, sfSendTo, sfStartMenu, sfStartup, sfTemplates);
Version 3 fixes all of 2.01's bugs!

Constants

ShellFolderKeys = ('', 'Desktop', 'Favorites', 'Fonts', 'Personal', 'Programs', 'Recent', 'SendTo', 'Start Menu', 'Startup', 'Templates')


Variables