Opret genvej i Startmenuen

Jeg poster det lige her

uses ShlObj, ActiveX;

function GetSystemPath(Folder: Integer): string;
var
  PIDL: PItemIDList;
  Path: LPSTR;
  AMalloc: IMalloc;
begin
  Path := StrAlloc(MAX_PATH);
  SHGetSpecialFolderLocation(Application.Handle, Folder, PIDL);
  if SHGetPathFromIDList(PIDL, Path) then
    Result := Path;
  SHGetMalloc(AMalloc);
  AMalloc.Free(PIDL);
  StrDispose(Path);
end;

Now you can call this function with different parameters. For example:
CSIDL_DESKTOP for WINDOWS\\Desktop
CSIDL_DESKTOPDIRECTORY for WINDOWS\\Desktop
CSIDL_FONTS for WINDOWS\\FONTS
CSIDL_NETHOOD for WINDOWS\\NetHood
CSIDL_PERSONAL for X:\\My Documents
CSIDL_PROGRAMS for WINDOWS\\StartMenu\\Programs
CSIDL_RECENT for WINDOWS\\Recent
CSIDL_SENDTO for WINDOWS\\SendTo
CSIDL_STARTMENU for WINDOWS\\Start Menu
CSIDL_STARTUP for WINDOWS\\Start Menu\\Programs\\StartUp
CSIDL_TEMPLATES for WINDOWS\\ShellNew

GetSystemPath(CSIDL_STARTUP);

-----BEGIN GEEK CODE BLOCK-----
Version: 3.12
GED d- s: a--- C++ U? P L+ E? W++ N? o? K- w
O? M? V? PS PE? Y? PGP++ t 5? X+ R tv+ b+ DI? D+
G e-- h! !r y--
------END GEEK CODE BLOCK------

Du kan også få programmet til at starte ved opstart ved at tilføje noget i registreringsdatabasen. Så er du hvertfald 100% sikker på det virker i alle windows.
Men hvis du vil bruge start-mappen kan du se noget om det her

http://www.scalabium.com/faq/dct0106.htm


-----BEGIN GEEK CODE BLOCK-----
Version: 3.12
GED d- s: a--- C++ U? P L+ E? W++ N? o? K- w
O? M? V? PS PE? Y? PGP++ t 5? X+ R tv+ b+ DI? D+
G e-- h! !r y--
------END GEEK CODE BLOCK------

[Redigeret d. 31/07-05 12:40:54 af Jonas (Decko)]

Du kan også få programmet til at starte ved opstart ved at tilføje noget i registreringsdatabasen. Så er du hvertfald 100% sikker på det virker i alle windows.
Men hvis du vil bruge start-mappen kan du se noget om det her

http://www.scalabium.com/faq/dct0106.htm


-----BEGIN GEEK CODE BLOCK-----
Version: 3.12
GED d- s: a--- C++ U? P L+ E? W++ N? o? K- w
O? M? V? PS PE? Y? PGP++ t 5? X+ R tv+ b+ DI? D+
G e-- h! !r y--
------END GEEK CODE BLOCK------

[Redigeret d. 31/07-05 12:40:54 af Jonas (Decko)]

jeg har prøvet at tilføje mit program i registrerings databasen men mit program starter godtnok, men det starter på en forkert måde. Den kan nemlig ikke læse min config fil hvis den starter på den måde, så derfor skal jeg have den til at starte via start menuen... men hvordan opretter jeg så en genvej til mit program?

Tjek linket jeg postede.


-----BEGIN GEEK CODE BLOCK-----
Version: 3.12
GED d- s: a--- C++ U? P L+ E? W++ N? o? K- w
O? M? V? PS PE? Y? PGP++ t 5? X+ R tv+ b+ DI? D+
G e-- h! !r y--
------END GEEK CODE BLOCK------

ja har jeg set og brugt, men jeg mangler koden til at oprette en genvej! ikke til at finde det path, for den har du jo lige sendt i et link.. det er koden til hvordan man opretter en genvej jeg mangler nu

Sorry. Det står her:

http://delphi.about.com/od/kbwinshell/l/aa091499.htm

-----BEGIN GEEK CODE BLOCK-----
Version: 3.12
GED d- s: a--- C++ U? P L+ E? W++ N? o? K- w
O? M? V? PS PE? Y? PGP++ t 5? X+ R tv+ b+ DI? D+
G e-- h! !r y--
------END GEEK CODE BLOCK------