Announcement
Collapse
No announcement yet.
Wie kann man das Standardhintergrund von Windows setzen ?(oT)
Collapse
X
-
<p>Hallo,<br>
folgendermaßen:<br>
<pre>
procedure TForm1.Button1Click(Sender: TObject);
var s:String;
begin
s:='';
// Hintergrundbild entfernen
SystemParametersInfo(SPI_SETDESKWALLPAPER, 0, PChar(s), SPIF_UPDATEINIFILE);
// Muster entfernen
SystemParametersInfo(SPI_SETDESKPATTERN, 0, PChar(s), SPIF_UPDATEINIFILE);
end;
</pre>
Gruß Thomas</p>
Comment