Probleme auf neuem Rechner

[jsp]

Le roi est mort, vive le roi

Sorry, es ist einfach zu heiss

[Rawsche]

Danke erstmal für eure Rückmeldung. Ich verstehe, dass ihr nicht zufrieden seid mit meiner Art den Neustart herbeizuführen. Ich werde mich da sicherlich auch nochmal intensiver mit beschäftigen. Mein Problem bleibt aber auch so bestehen:

Ich habe mal versucht ein anderes Programm per ShellExecute einfach aufzurufen ohne mein Programm zu schließen. Das sah so aus:

Code:

ShellExecute(Handle, 'open', PChar('C:\Datei.exe'), Nil, Nil, 1);

Die ausgewählte Datei funktionierte einwandfrei und lag auch am richtigen Ort mit dem richtigen Namen. Trotzdem passierte wieder nichts Sichtbares...

Vielleicht mache ich irgendetwas grundlegend falsch?!

[DieDolly]

Zitat:

Danke erstmal für eure Rückmeldung. Ich verstehe, dass ihr nicht zufrieden seid mit meiner Art den Neustart herbeizuführen. Ich werde mich da sicherlich auch nochmal intensiver mit beschäftigen

Setz das Shellexecute ins FormDestroy und dann sollte alles funktionieren.

[Rawsche]

Zitat von DieDolly:

Zitat:

Danke erstmal für eure Rückmeldung. Ich verstehe, dass ihr nicht zufrieden seid mit meiner Art den Neustart herbeizuführen. Ich werde mich da sicherlich auch nochmal intensiver mit beschäftigen

Setz das Shellexecute ins FormDestroy und dann sollte alles funktionieren.

Habe es gerade versucht. Hat leider keinen Effekt. Das Programm startet trotzdem nicht.

Ich glaube aber, dass ich mittlerweile einen Grund gefunden haben könnte. Ich habe mir (wie von euch empfohlen) von ShellExecute den Rückgabewert anzeigen lassen...
Ergebnis: "The specified file was not found."

Da ich aber das File korrekt angegeben habe, war ich verwirrt.
Ich hab deshalb mal die .exe Datei in verschiedene Ordner gerückt und getestet.
Dabei hab ich folgendes herausgefunden. Wenn die .exe im Ordner oder Unterordner meines Benutzernamens liegt, dann kann sie nicht gefunden werden. Wenn ich sie tatsächlich einfach nur nach C:/ lege, dann kann sie gefunden werden.

Es hat also meiner Meinung nach etwas mit meinem Benutzernamen zu tun. Dieser hat leider ein Leerzeichen und ein Sonderzeichen in sich. Zwar nicht mein echter Name, aber in etwas sieht er so aus: "Max Müller".

Mit dem Problem habe ich schon einmal auf dem neuen Rechner gekämpft. Dort wurde nämlich die EnvironmentVariable APPDATA, nicht in "C:\Users\Max Müller\AppData\Roaming" sondern in "C:\Users\Max MǬller\AppData\Roaming" oder in "C:\Users\Max Müller\AppData\Roaming" aufgelöst. Diese Orte konnten natürlich dann nicht gefunden werden.
Gelöst habe ich das Problem damals, in dem ich die Zeichen "ü" und "Ǭ" manuell ersetzt habe.

Ich habe deshalb jetzt mal mein Programm mit dem Neustart nach C:/ geschoben. Der Neustart funktioniert nun wieder. Das kann aber ja keine echt Lösung sein, da das Programm ja von jedem Speicherort aus laufen können sollte...

Vielleicht helfen die Infos, damit mein Problem besser deutlich wird.
Was kann ich tun, um dieses Problem zu beheben?

[DieDolly]

Ich kann dir bei dem Problem mit den Umlauten nicht helfen.
Aber lass das shellExecute unbedingt im FormDestroy. Andernfalls machst du nur das, was Luckie schreibt.

[Luckie]

Welche Delphi Version verwendest du? Solltest du noch kein Unicode Delphi benutzen, ruf mal explizit ShellExecuteW mit PWideChar auf.

[juergen]

Hallo,

Zitat von Rawsche:

...Dieser hat leider ein Leerzeichen und ein Sonderzeichen in sich. Zwar nicht mein echter Name, aber in etwas sieht er so aus: "Max Müller"

Ich vermute es liegt am Leerzeichen...

ShellExecute(Handle, 'OPEN', PChar('"' + 'C:\Datei 2.txt' + '"'), nil, nil, 1);

Edit: Dateien sollte man im Root nicht speichern...

[Fritzew]

Hallo zusammen,

ich denke das der einzige der das Problem hier richtig erkannt hat Jürgen ist:

Zitat von juergen:

Hallo,
Ich vermute es liegt am Leerzeichen...

ShellExecute(Handle, 'OPEN', PChar('"' + 'C:\Datei 2.txt' + '"'), nil, nil, 1);

Wieso nach
form1.close; die Application weg sein soll muss mir mal jemand erklären.
Das ist nämlich definitiv nicht so.
Die Application endet nicht einfach in einer Methode!!!!!!

Die Application wird beendet nach einer PostQuitMessage. Damit wird dann die Messageloop beendet.

Das hier fällt auf die Nase wenn Leerzeichen im Pfad sind.

ShellExecute(Handle, 'open',PChar(Application.ExeName), nil, nil, 0); deshalb in DoubleQuotes:

ShellExecute(Handle, 'open',PChar(AnsiQuotedStr(Application.ExeName, '"')), nil, nil, 0);
und natürlich ist es hilfreich auf Fehler zu prüfen...

[Rawsche]

Zitat von Luckie:

Welche Delphi Version verwendest du? Solltest du noch kein Unicode Delphi benutzen, ruf mal explizit ShellExecuteW mit PWideChar auf.

Ich benutze kein Delphi sondern Lazarus...

[Ydobon]

Und wenn du dir die richtige Version des Pfades zuerst holst. SHGetKnownFolderPath müsste doch auch Lazarus kennen.