Seite 1 von 3

Pfad zum Quick Launch ermitteln

Verfasst: 01.02.2005 01:33
von blbltheworm
Hallo zusammen,
die Setup-Userlib hält ja allerlei nützliche Pfade zum Erstellen einer Setuproutine bereit.
Ich vermisse jedoch einen (wie ich finde) wichtigen Pfad.
Der zum Quick Lunch rechts neben dem Startbutton. Wie kann ich diesen Pfad ermitteln?? Kann mir da wer weiterhelfen??

Verfasst: 01.02.2005 01:43
von sbehrens
Quick Lunch
Gibt es bei BurgerKing, McDonalds u.ä.
Guten Appetit! :mrgreen:

mfG
Basti

Verfasst: 01.02.2005 04:36
von Hroudtwolf
Was willst du wissen ? :o
Wie er heißt?
Oder die relative Position im diversen System ?

Verfasst: 01.02.2005 05:12
von ts-soft
No Problem:

Code: Alles auswählen

#CSIDL_APPDATA   = 26

Structure EMID
  cb.b
  abID.b[1]
EndStructure

Structure ITEMIDLIST
  mkid.EMID
EndStructure

Procedure.s GetSpecialeFolder(Folder.l)
  *itemid.ITEMIDLIST = #Null
  If SHGetSpecialFolderLocation_ (0, Folder, @*itemid) = #NOERROR
    location.s = Space (#MAX_PATH)
    If SHGetPathFromIDList_ (*itemid, @location)
      If Right(location, 1) <> "\" : location + "\" : EndIf
      ProcedureReturn location
    EndIf
  EndIf
EndProcedure

Debug GetSpecialeFolder(#CSIDL_APPDATA) + "Microsoft\Internet Explorer\Quick Launch\"
[Edit]funzt ab win95 mit IE 4.0 und höher[/Edit]

Verfasst: 01.02.2005 05:13
von nicolaus
Hroudtwolf hat geschrieben:Was willst du wissen ? :o
Wie er heißt?
Oder die relative Position im diversen System ?
is nich böse gemeint aber wenn du dir das mal genau durchliest kannst du lesen das er wissen will wie er an den pfad kommt.

so und wenn du jaPBe (wegen der funktion CreateLink) benutzt is hier mal ne kleine funktion um eine eintrag ins quick lunch zu setzten

Code: Alles auswählen

      If (OSVersion() = #PB_OS_Windows_2000) Or (OSVersion() = #PB_OS_Windows_XP) 
        LoggedUser.s = Space(1024)
        Userlength.w = 1024
        GetUserName_(@LoggedUser, @Userlength)
        LoggedUser = Trim(LoggedUser)
        SysDir.s = Space(1024)
        GetSystemDirectory_(@SysDir, 1024)
        SysDrive.s = Left(SysDir, 3)
        WorkDir.s = Space(1024)
        GetCurrentDirectory_(1024, @WorkDir) 
        WorkDir = Trim(WorkDir) + ""
        CreateLink("dein pfad zur exe", SysDrive + "Dokumente und Einstellungen" + LoggedUser + "\Anwendungsdaten\Microsoft\Internet Explorer\Quick Launch\dein linkname.lnk", "", "ToolTip-Text", WorkDir, #SW_SHOWNORMAL, 0, WorkDir + "deine-exe.exe", 1) 
hoffe das hilft dir ein wenig mehr

Verfasst: 01.02.2005 08:12
von Danilo
nicolaus hat geschrieben:so und wenn du jaPBe (wegen der funktion CreateLink) benutzt
CreateShellLink.pb

Verfasst: 01.02.2005 18:49
von GPI
> CreateLink("dein pfad zur exe", SysDrive + "Dokumente und
>Einstellungen\" + LoggedUser + "\Anwendungsdaten\Microsoft\Internet
>Explorer\Quick Launch\dein linkname.lnk", "", "ToolTip-Text", WorkDir,
>#SW_SHOWNORMAL, 0, WorkDir + "deine-exe.exe", 1)

Gratulation! dich werden alle englisch-Sprachigen Benutzer verfluchen, weil du sinnlos auf der HDD rumschreibst!

Verfasst: 01.02.2005 19:10
von nicolaus
>Gratulation! dich werden alle englisch-Sprachigen Benutzer verfluchen, weil du sinnlos auf der HDD rumschreibst!

DANKE dir doch ist das nur ein beispiel und da wir hier soweit mir bekannt ist (berichtigt mich wenn das nich mehr stimmen sollte) im DEUTSCHEN forum und da habe ich mir nun mal ein BEISPIEL in deutsch rausgesucht um zu zeigen wie man es machen kann.

Aber ich werde mir langsam mal abgewöhnen hier weiter zu versuchen leuten zu helfen oder beispiele zu posten denn langsam geht mir das hier echt super auf den geist das an allem und jedem nur noch rumgenörgelt wird!!! Vieleicht fragen wir ja Rob mal ob er nich noch ne virtuelle Goldwagge ins forum intikrieren kann....

Verfasst: 01.02.2005 20:52
von Falko
@nicolaus
Zieh dir das nicht so an. Macht wohl das Wetter das hier einige "Leute"
nicht so gut zufrieden sind. :mrgreen:
Bist nicht der Einzigste der enttäuscht wurde nur weil er helfen will bzw. weil er Hilfe sucht. :D.

Verfasst: 01.02.2005 22:15
von GPI
nicolaus hat geschrieben:im DEUTSCHEN forum und da habe ich mir nun mal ein BEISPIEL in deutsch rausgesucht um zu zeigen wie man es machen kann.
Dein Fehler ist, das du den "Dokumente und Einstellungs"-Ordner fix einstellst. Das ist ein Programmierfehler. Dieser Ordner ist stark System-Abhängig. Unter win9x gibts den bsw. nicht, so das deine Lösung auch in deutschsprachigen Raum nicht überall funktioniert.

Oben gabs schon eine bessere Lösung, da wird über API der System- "Anwendungsdaten"-Ordner abgefragt, der immer den richtigen Pfad liefert. Dadurch funktioniert diese Funktion mit jeder Windows-Version, egal welche Sprache.

Außerdem lasse ich die Ausrede: Es ist nur für den deutschen Raum bestimmt, nicht gelten. Das hast du a) nicht dazugeschrieben und b) was ist, wenn man ein Programm schreiben will, das überall eingesetzt werden soll? japbe bsw. wird in Japan benutz. Keine Ahnung, wie da der Ordner heißt.
Aber ich werde mir langsam mal abgewöhnen hier weiter zu versuchen leuten zu helfen oder beispiele zu posten denn langsam geht mir das hier echt super auf den geist das an allem und jedem nur noch rumgenörgelt wird!!!
Du hast einen Lösungsweg gezeigt, der schlicht und ergreifend umbrauchbar ist. Gründe: Siehe oben.
Das trügerische: er funktioniert auf deutschen XP-System sogar. Bloß wenn es mal auf einen anderen Windows gestartet wird, gibts probleme. und die sucht man dann Ewigkeiten.