[BCB6] Tapeta pulpitu

0

W jaki sposób umieścić w zmiennej typu String ścieżkę dostępu do pliku ustawionego jako bieżąca tapeta pulpitu?
Czy istnieje rozwiązanie uniwersalne (działające pod każdą wersją systemu Windows)? Na stronie Microsoftu w dokumentacji znalazłem funkcję działającą bodajże tylko pod Win2000.

0

interface IActiveDesktop metoda GetWallpaper

po naszemu wygląda to tak:

CoInitialize(NULL)
COMREF pAD
ISTRING path[600], stary[600]
//MultiByteToWideChar(0, 0, "D:\\IBpro\\texture1.bmp", -1, path, 599)


hres = CoCreateInstance(_CLSID_ActiveDesktop, NULL, CLSCTX_INPROC_SERVER, _IID_IActiveDesktop, pAD)
if hres=0
	SET_INTERFACE pAD, IActiveDesktop
	pAD->GetWallpaper(stary, 599,0)
//	pAD->SetWallpaper(path, 0)
//	pAD->ApplyChanges(AD_APPLY_ALL)
	printf("%S", stary)
	getch()
endif
CoUninitialize()

1 użytkowników online, w tym zalogowanych: 0, gości: 1