Guten Morgen,
nach einigem Herumprobieren und Suchen bin ich auf
http://stackoverflow.com/questions/1...785337#2785337
gestoßen und kann nun endlich auch unter Win7 mit folgendem Code
mein Programm aus der Startroutine heraus so starten, daß die Dateizugriffe keine
Fehler mehr ergeben:
Delphi-Quellcode:
tmpS := IncludeTrailingPathDelimiter(GetEnvironmentVariable('WINDIR')) + 'explorer.exe';
tmpS1 := '"' + Trim(ProgDateiPfad) + Trim(' ' + Trim(ProgParameter)) + '"';
tmpExitCode :=
ShellExecute(
GetDesktopWindow,
'open',
PChar(tmpS),
PChar(tmpS1),
nil,
SW_SHOWNORMAL);
tmpLastOSError := GetLastError;
result := tmpLastOSError <> 0;
Nun habe ich (natürlich) ein neues Problem:
bei jedem Aufruf kommt die Sicherheitswarnung
Dateidownload - Sicherheitswarnung
Möchten Sie diese Datei speichern oder ausführen?
Und nach Klick auf <Ausführen> natürlich noch
Windows Explorer - Sicherheitswarnung
Der Herausgeber konnte nicht verifiziert werden.
Möchten Sie diese Software ausführen.
Hat jemand eine Idee, wie ich ohne Verstellen der Sicherheitsstufe
an jeder Workstation diese Meldungen loswerde?
Danke.