AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren

Windows Desktop Hintergrund ändern?

Ein Thema von Honigdachs · begonnen am 19. Jan 2008 · letzter Beitrag vom 22. Jan 2008
Antwort Antwort
Seite 1 von 3  1 23   
Honigdachs
(Gast)

n/a Beiträge
 
#1

Windows Desktop Hintergrund ändern?

  Alt 19. Jan 2008, 18:27
Hallo Gemeinde,

gibt es eine Möglichkeit, mit Delphi den Windows-XP-Desktop-Hintergrund zu ändern?

Also irgendeine Routine, die dann aufgerufen werden kann und dann das ändert?

Vielen Dank!
  Mit Zitat antworten Zitat
Benutzerbild von STS301
STS301

Registriert seit: 6. Nov 2007
668 Beiträge
 
Delphi 7 Personal
 
#2

Re: Windows Desktop Hintergrund ändern?

  Alt 19. Jan 2008, 18:37
hier
Sebastian

ölpölp

Linux will rule the universe!!
  Mit Zitat antworten Zitat
Honigdachs
(Gast)

n/a Beiträge
 
#3

Re: Windows Desktop Hintergrund ändern?

  Alt 19. Jan 2008, 18:46
Zitat von STS301:
Danke!

Aber wie ich sehe geht das nicht mit Delphi 5...
  Mit Zitat antworten Zitat
Benutzerbild von Die Muhkuh
Die Muhkuh

Registriert seit: 21. Aug 2003
7.332 Beiträge
 
Delphi 2009 Professional
 
#4

Re: Windows Desktop Hintergrund ändern?

  Alt 19. Jan 2008, 18:47
Natürlich geht das mit Delphi5. Musst halt nur RaiseLastWin32Error verwenden, anstatt RaiseLastOSError...
  Mit Zitat antworten Zitat
Benutzerbild von DeddyH
DeddyH

Registriert seit: 17. Sep 2006
Ort: Barchfeld
26.858 Beiträge
 
Delphi 10.3 Rio
 
#5

Re: Windows Desktop Hintergrund ändern?

  Alt 19. Jan 2008, 18:48
Steht doch da (nee nee, Leute).
Detlef
"Ich habe Angst vor dem Tag, an dem die Technologie unsere menschlichen Interaktionen übertrumpft. Die Welt wird eine Generation von Idioten bekommen." (Albert Einstein)
Dieser Tag ist längst gekommen
  Mit Zitat antworten Zitat
Benutzerbild von bitsetter
bitsetter

Registriert seit: 17. Jan 2007
1.169 Beiträge
 
Turbo Delphi für Win32
 
#6

Re: Windows Desktop Hintergrund ändern?

  Alt 19. Jan 2008, 18:58
Hi,

hier gibt es noch eine andere Variante mit Jpegs oder Gif Bildformaten ab Delphi Version 4.
Nur falls du das mit RaiseLastWin32Error nicht hin bekommst.
Gruß bitsetter
"Viele Wege führen nach Rom"
Wolfgang Mocker (geb. 1954), dt. Satiriker und Aphoristiker
  Mit Zitat antworten Zitat
Honigdachs
(Gast)

n/a Beiträge
 
#7

Re: Windows Desktop Hintergrund ändern?

  Alt 19. Jan 2008, 19:39
Erstmal danke für die Antworten.

Ich habs jetzt nach dem ersten Link versucht - klappt nicht...

Win32-API-Funktion ist fehlgeschlagen. Was hat das zu bedeuten?
  Mit Zitat antworten Zitat
Benutzerbild von DeddyH
DeddyH

Registriert seit: 17. Sep 2006
Ort: Barchfeld
26.858 Beiträge
 
Delphi 10.3 Rio
 
#8

Re: Windows Desktop Hintergrund ändern?

  Alt 19. Jan 2008, 19:42
Delphi-Quellcode:
procedure SetBackground(const AFilename: String);
begin
 if not SystemParametersInfo(SPI_SETDESKWALLPAPER,
                             0,
                             PChar(AFilename),
                             SPIF_SENDCHANGE OR SPIF_UPDATEINIFILE) then
   RaiseLastWin32Error;
End;
So versucht?
Detlef
"Ich habe Angst vor dem Tag, an dem die Technologie unsere menschlichen Interaktionen übertrumpft. Die Welt wird eine Generation von Idioten bekommen." (Albert Einstein)
Dieser Tag ist längst gekommen
  Mit Zitat antworten Zitat
Honigdachs
(Gast)

n/a Beiträge
 
#9

Re: Windows Desktop Hintergrund ändern?

  Alt 19. Jan 2008, 19:47
Delphi-Quellcode:
procedure SetBackground(const Dateiname: String);
begin
  if not SystemParametersInfo(SPI_SETDESKWALLPAPER,
                             0,
                             PChar(Dateiname),
                             SPIF_SENDCHANGE OR SPIF_UPDATEINIFILE) then
   RaiseLastwin32Error;
End;
Im großen und ganzen ja, ich hab nur AFilename durch Dateiname ersetzt.

Der Fehler tritt alle 10sec auf...

Der Dateiname wird mit SetBackground(Dateiname); übergeben, und zwar aus einem Button raus.
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
begin
  Dateiname:= edit3.text;
  SetBackground(Dateiname);
end;
  Mit Zitat antworten Zitat
Benutzerbild von DeddyH
DeddyH

Registriert seit: 17. Sep 2006
Ort: Barchfeld
26.858 Beiträge
 
Delphi 10.3 Rio
 
#10

Re: Windows Desktop Hintergrund ändern?

  Alt 19. Jan 2008, 19:51
Und was steht in dem Edit?
Detlef
"Ich habe Angst vor dem Tag, an dem die Technologie unsere menschlichen Interaktionen übertrumpft. Die Welt wird eine Generation von Idioten bekommen." (Albert Einstein)
Dieser Tag ist längst gekommen
  Mit Zitat antworten Zitat
Antwort Antwort
Seite 1 von 3  1 23   

Themen-Optionen Thema durchsuchen
Thema durchsuchen:

Erweiterte Suche
Ansicht

Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 03:40 Uhr.
Powered by vBulletin® Copyright ©2000 - 2019, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2019 by Daniel R. Wolf