Skrivebords baggrunds billede ?

Du kan gøre det med et API-kald:

Indsæt følgende i et modul:
Private Declare Function SystemParametersInfo Lib \"user32\" Alias \"SystemParametersInfoA\" (ByVal uAction As Long, ByVal uParam As Long, ByVal lpvParam As Any, ByVal fuWinIni As Long) As Long
Const SPI_SETDESKWALLPAPER = 20
Const SPIF_UPDATEINIFILE = &H1
Const SPI_SETDESKPATTERN = 21

Indsæt følgende hvorsomhelst (f.eks. i en knap):
dim a as long
a=SystemParametersInfo(SPI_SETDESKWALLPAPER, 0, \"placering|af|det|bitmap|du|vil|bruge\", SPIF_UPDATEINIFILE)

Dette vil indsætte et nyt baggrundsbillede, samt skrive det til win.ini-filen (så det bliver der).

Du kan så bruge SPI_SETDESKPATTERN til at sætte de andre parametre, men jeg kender desværre ikke den nøjagtige syntaks til dette.

MVH tjacob

lukker