Forum: Win32/Win64 API (native code)
Delphi
by Alexander,
16. Jul 2004
Ja, das ist schon klar, ich meinte jetzt auch eher auf der Festplatte...
Aber das ist ja bei den heutigen Festplatte nicht mehr so das Problem...
Forum: Win32/Win64 API (native code)
Delphi
by Alexander,
16. Jul 2004
Ist mir noch nicht passiert ;-)
Forum: Win32/Win64 API (native code)
Delphi
by Alexander,
16. Jul 2004
Ich weiß jetzt nicht in wie fern, das mit JPEG's klappt, aber ich meine nicht:
function ChangeWallpaper(aFile: String): Boolean;
begin
SystemParametersInfo(SPI_SETDESKWALLPAPER, 0, Pointer(afile),
SPIF_SENDWININICHANGE);
end;
Aber was hast du gegen den Active Desktop, ich habe ihn bei XP einfach angelassen... Sonst muss du wirklich das Bild als platzverschwendenes BMP...
Forum: Win32/Win64 API (native code)
Delphi
by Alexander,
16. Jul 2004
Ich meine das funktioniert so:
function ChangeWallpaper_AD(aFile: String): Boolean;
const
CLSID_ActiveDesktop: TGUID = '{75048700-EF1F-11D0-9888-006097DEACF9}';
var
hObj: IUnknown;
ADesktop: IActiveDesktop;
str: string;
wstr: PWideChar;
begin