Hallo Gemeinde,
in einem mini-Projekt versuche ich zu ermitteln wie der aktuell benutzte Dateiname zum Desktop Hintergrund-Bild lautet.
Also Ergebnis sollte ein vollständiger Pfad + Dateiname sein.
Was ich hier in
DP gefunden war ist folgender Beitrag von
turboPASCAL:
Delphi-Quellcode:
function GetWallpaperBitmap: String;
const
SPI_GETDESKWALLPAPER = $0073;
var
wpFName: array [0..MAX_PATH] of Char;
begin
if SystemParametersInfo(SPI_GETDESKWALLPAPER, MAX_PATH, @wpFName, 0)
then Result := String(wpFName)
else Result := '';
end;
Das funktioniert mit meinem eigenen Windows 10 (noch ist alles so wie nach
OS-Installation) wunderbar.
Ich fand eine Seite die einen völlig anderen Weg beschreitet und da frage ich mich ob die oben genannte Methode noch aktuell ist.
PowerShell Scripte wie man es heute wohl machen sollte.
Von daher meine Frage an alle die Windows 8 oder höher nutzen und eigene Hintergrundbilder verwenden,
erhaltet ihr mit obiger Funktion tatsächlich den Dateinamen oder klappt da was nicht?
Grüße