Wyciągam bitmapę z pliku *.res...
interface
{$R pulpit.res}
var
Bitmap : TBitmap;
begin
Bitmap := TBitmap.Create;
//pierwszy sposób!!!
try
Bitmap.LoadFromResourceName(hInstance, 'pulpit'); // ładuję bitmapę z
zasobów
//zmieniam pulpit ale niestety...
SystemParametersInfo(SPI_SETDESKWALLPAPER,0,PChar(tu_nie_wiem_co_wstawić),SP
IF_UPDATEINIFILE Or SPIF_SENDWININICHANGE);
finally
Bitmap.Free; // zwolnienie pamięci
end;
//drugi sposób!!!
try
//za jednym razem wyciągam bitmapę i zamieniam pulpit...
SystemParametersInfo(SPI_SETDESKWALLPAPER,0,PChar(bitmap.LoadFromResourceNam
e(hInstance,'pulpit')),SPIF_UPDATEINIFILE
Or SPIF_SENDWININICHANGE);
//...ale niestety wyskakuje mi komunikat "Invalid typecast".
Co może to znaczyć, i który sposób zastosować?
_______________
Pozdrawiam i dzięki za pomoc
Hubert