Mein Programm funktioniert nicht über eine Verknupfung richtig !

[taveuni]

Zitat von thomas2009:

Du Hast dann Glück gehabt
Und die Lösung jetzt ! Kann ich das Problem bei dem Toll "Inno" korrigieren oder was ?

Ich verwende Inno Setup v5.3.10

Bist Du Dir sicher dass Du nicht 5.3.11 verwendest.
Da hat nämlich was geändert.

Ansonsten im InnoSetupForum nachfragen.

[Caps]

Vielleicht übersehe ich was, aber wäre es nicht einfacher, einfach die Verknüpfung (die .lnk-Datei) per Hand zu ändern? Da gibt es ja eine Möglichkeit, das Arbeitsverzeichnis festzulegen. Das geht doch immer und unabhängig vom Programm das gestartet werden soll.

Caps

[ChrisE]

Hallo thomas2009,

wenn ich Dich richtig verstehe, geht es Dir darum, dass beim Start Deiner Software immer der Applikationspfad der "aktive" Pfad sein soll. In dem Fall wäre die Lösung relativ einfach, da du das Programm ja selber schreibst

Einfach in der DPR als eine der ersten Anweisungen ein ChDir(ExtractFilePath(Application.Exename)); Ich denke, das würde schon viel Helfen

Gruß, Chris

[himitsu]

Zitat von ChrisE:

Ich denke, das würde schon viel Helfen

Falsch.

Hat man jetzt oder zukünftig mal einen Befehl/Code drin, dessen Auswirkung es ist, daß sich das Arbeitsverzeichnis verändert, dann knallt es wieder.

Ergo bleibt als einzige Lösung das Programm so zu schreiben, daß ihm das Arbeitsverzeichnis "egal" ist.

[ChrisE]

Zitat von himitsu:

Falsch.

Harte Worte großer Meister
Es funktioniert Zunächst einmal schon so, allerdings unter der Prämisse, dass es für den Start der Software gedacht ist (so hatte ich es auch geschrieben).

Es ist absolut richtig, dass es nichts bringt für die gesamte Laufzeit des Programms.

Hier gilt Deiner Aussage ganz klar:

Zitat von himitsu:

Ergo bleibt als einzige Lösung das Programm so zu schreiben, daß ihm das Arbeitsverzeichnis "egal" ist.

Gruß, Chris

[wicht]

Was mich aber an dieser Stelle wundert ist, dass die Daten ja wie vom TE gesagt wurde, so geladen werden:

Delphi-Quellcode:

Temp :=GetEnvironmentVariable('Temp');
MediaPlayer.FileName :=Temp +'\video1.avi';

Dann müsste das Arbeitsverzeichnis aber egal sein, oder? Hier geht es dann wohl nicht darum, dass die Dateien nicht geöffnet werden können, sondern seine Videos aus Resourcen nicht extrahiert werden können, wohl weil die eigene Exe nicht geöffnet werden kann, dank des Arbeitsverzeichnisses.
Sprich, thomas2009 sollte mal überprüfen, ob die Dateien überhaupt da liegen, wo er sie vermutet.. Oder hat das schon jemand gesagt?

[DeddyH]

Das sehe ich auch so, es scheint, dass sie woanders hin extrahiert werden. Dies wiederum ließe auf einen Verstoß gegen das DRY-Prinzip schließen. Aber das sind alles natürlich nur Vermutungen.

[thomas2009]

Also mit "WorkingDir" hat nicht das Problem gelöst, obwohl in Inno-Hilfe als Lösung steht !
[Icons]
Name: "{group}\myprogramm"; Filename: "{app}\myprogramm.exe"; WorkingDir: "{app}"

Was ist nun die beste Lösung bei Inno?

[mkinzler]

Am Besten keine relativen Pfade in dieser Form verwenden!

[thomas2009]

Das Problem liegt vermutlich nicht nur an Inno. Ich habe gerade ein andres Setup-Programm "Setup2go" getestet. Es ist das selbe Problem

Also ich muß dann die Änderung in mein Delphi-Programm tun