Hallo.
Ich suche jetzt schon seit 1½ Stunden danach bei Google, MSDN hilft mir auch nicht…
wie kann ich in einem VB-Code den Hintergrund ändern?
Habe ein paar Codes gefunden, die alle nicht funktionieren, entweder kennt der das Importete nicht, oder dort ist auf einmal irgendeine Variable, von der nie was erwähnt wird…
bitte, helft mir!

hallo griever,

in der registry kann du den pfad für das hintergrundbild einstellen.

current_user/control panel/desktop

dort findest du ein paar schlüssel

1.wallpaper für das hintergrundbild
2.tilewalpaper und wallpaperstyle für die art der darstellung

probier einfach ein bischen rum

gruss

mikeb69

mikeb69 schrieb:

hallo griever,

in der registry kann du den pfad für das hintergrundbild einstellen.

current_user/control panel/desktop

dort findest du ein paar schlüssel

1.wallpaper für das hintergrundbild
2.tilewalpaper und wallpaperstyle für die art der darstellung

probier einfach ein bischen rum

gruss

mikeb69

Danke schonmal.
Habe zwar noch keinen Code geschrieben, aber es mal selbst geändert: Das aktuelle Hintergrundbild ändert sich nicht, habe es auch mit mehreren Formaten ausprobiert.
Ertst, wenn ich manuell ein neues machen will, wird das alte abgerufen.
Wie kann ich also den Desktop aktualisieren? F5 hilft nicht!

Hai !
Gibs jede menge Beispiele wie man Desctop Hintergrund ändert mit WIN API. Aber wahrscheinlich bist nicht in der Lage die VB 6 Code in VB NET umzusetzen.


Mfg Alex

Alex2000 schrieb:

Hai !
Gibs jede menge Beispiele wie man Desctop Hintergrund ändert mit WIN API. Aber wahrscheinlich bist nicht in der Lage die VB 6 Code in VB NET umzusetzen.


Mfg Alex

Haargenau, weil ich erst vor einer nicht allzu kurzen Weile mit VB 2008 angefangen habe, meine erste Programmiersprache.

Habe jetzt einmal


versucht, aber es wird mir Folgenedes gesagt:
„Eine Unterschlüsselstruktur kann nicht gelöscht werden, da der Unterschlüssel nicht vorhanden ist.“

Aber der Schlüssel IST doch vorhanden…

PS: Mit Windows-API kenn ich mich gar nicht aus – ich weiß noch nicht einmal wirklich, was das ist

hallo griever,

vergiss die win api !!!

setz einfach den wert für wallpaper - ohne diesen vorher löschen zu wollen.

gruss

mikeb69

mikeb69 schrieb:

hallo griever,

vergiss die win api !!!

setz einfach den wert für wallpaper - ohne diesen vorher löschen zu wollen.

gruss

mikeb69

Okay, habe ich auch versucht…
aber er ändert es nicht, ess passiert einfach gar nichts!:(

hallo griever,

ich hab das schonmal gemacht und könnte schwören das es funktioniert hat.
zumindest unter xp.

im moment hab ich keinen plan wie das unter vista läuft.
sorry

gruss

mikeb69

Ok, habe es jetzt rausgefunden, wie man es verändert, habe oben ausversehen auf’s Falsche zugegriffen…



Aber:
Nachdem es geändert wurde, wird das Desktopbild nicht aktualisiert!

Wie siehts nach 'm Restart aus?

nach nem neustart kommt das, bin mir sicher.

Allerdings soll das ja direkt kommen.

das problem hatt ich mal mit der symbolgröße.

man muss entweder i-wie den explorer aktualisieren, den explorer abschießen und neustarten, oder den computer neustarten.

Wie wärs wenn du die Win-API SystemParametersInfo verwendest? Da läßt sich im letzten Parameter auch ein Wert angeben der Windows anweist den Desktop zu aktualisieren.

foxm2k schrieb:

Wie wärs wenn du die Win-API SystemParametersInfo verwendest? Da läßt sich im letzten Parameter auch ein Wert angeben der Windows anweist den Desktop zu aktualisieren.

Kannst du mir ein konkretes Beispiel geben, wie ich das benutze?
Ich kenne mich nämlich (noch) NULL mit API aus!

Zum Beispiel so:
Private Declare Function SystemParametersInfo Lib "user32" Alias "SystemParametersInfoA" (ByVal uAction As Integer, ByVal uParam As Integer, ByVal pncMetrics As String, ByVal fuWinIni As Integer) As Integer
Private Const SPI_SETDESKWALLPAPER = 20
Private Const SPIF_UPDATEINIFILE = &H1
Private Const SPIF_SENDWININICHANGE = &H2

SystemParametersInfo(SPI_SETDESKWALLPAPER, 0&, "C:\...", SPIF_UPDATEINIFILE + SPIF_SENDWININICHANGE)

foxm2k schrieb:

Zum Beispiel so:
Private Declare Function SystemParametersInfo Lib "user32" Alias "SystemParametersInfoA" (ByVal uAction As Integer, ByVal uParam As Integer, ByVal pncMetrics As String, ByVal fuWinIni As Integer) As Integer
Private Const SPI_SETDESKWALLPAPER = 20
Private Const SPIF_UPDATEINIFILE = &H1
Private Const SPIF_SENDWININICHANGE = &H2

SystemParametersInfo(SPI_SETDESKWALLPAPER, 0&, "C:\...", SPIF_UPDATEINIFILE + SPIF_SENDWININICHANGE)

Sorry, nenn mich Noob, aber ich weiß nicht, wie ich den Code benutzen soll (also dass ich bei „C:\…“ den Pfad hinschreibe, ist schon klar)…
Wenn ich ihn einbinde, wird dauernd gesagt, dass für SystemParametersInfo keine Deklaration vorhanden ist

Hai !!
Die Code funktioniert wie auf dem Butter geschmiert. Hab die Code von VB 6 in VB NET umgeändert. Plaziere auf der Form 2 Buttons und PictureBox, danach füge die Code ein:




PS: Bevor du mit komplexen Anwendungen anfängst lerne gründlich die Grundlagen der Programmierung und programmiere zuerst was einfacheres, wenn du soweit bist dann kannst was kompleziertes programmieren !

Mfg Alex

Genial, danke!
Hab’s etwas umgeändert, meinen Bedürfnissen entsprechend…
Okay, ich lerne die Grundlagen mehr oder weniger nebenbei durch’s Openbook.