Unit SheLink

******************************************************* * Shell Link Component for Delphi 2.0 * * * * this is end version * * * * for new versions send e-mail,s-mail,fax * * with you name and e-mail adress to > * * * * voltr.radek/4600/epr@epr1.ccmail.x400.cez.cz * * * * (c) 1996 Radek Voltr * * Kozeluzska 1523 * * Kadan 43201 CZECH Republic Europe * * fax. 42 398 2776 * * note: this version is free *

Classes

IShellLink -
TShellLink -

Functions

Register -

Types

PShellLink

Constants

CLSID_ShellLink
IID_IShellLink
SLGP_SHORTPATH
SLGP_UNCPRIORITY
SLR_ANY_MATCH
SLR_NO_UI
SLR_UPDATE

Variables


Functions


procedure Register;


Types


PShellLink = ^IShellLink

Constants

CLSID_ShellLink = (D1:$00021401; D2:$0; D3:$0; D4:($C0,$0,$0,$0,$0,$0,$0,$46))

IID_IShellLink = (D1:$000214EE; D2:$0; D3:$0; D4:($C0,$0,$0,$0,$0,$0,$0,$46))

SLGP_SHORTPATH = $0001

SLGP_UNCPRIORITY = $0002

SLR_ANY_MATCH = $0002

SLR_NO_UI = $0001

SLR_UPDATE = $0004


Variables