Bildschirmauflösung verändern

[Maximus]

Hallo,

Wie ich meine Bildschirmauflösung verändern kann weiß ich bereits, doch nun gibt es ein Problem.
Ich programmiere gerade ein Spiel das mit der Auflösung 320x240 Pixel laufen soll.

Wenn das Programm die Bildschirmauflösung ändert, läuft auch alles ohne Probleme, doch beim Programm Ende, wenn die Auflösung wieder, zu der die man vorher hatte, zurückgesetzt wird sind alle Symbole auf dem Desktop verschoben!

Da ich aber ein Spiel hab, bei dem man mit der Auflösung 320x240 spielt und danach nichts verschoben ist, muss es doch eine Möglichkeit geben das nachher alles so ist wie vorher

PS: Hier der Code den ich zum ändern der Bildschirmauflösung benutze:

Delphi-Quellcode:

function TForm1.change_resolution(width, height: word): boolean;
var lpDevMode: TDeviceMode;
begin
  Result := EnumDisplaySettings(nil, 0, lpDevMode);
  if Result then begin
    lpDevMode.dmFields := DM_PELSWIDTH or DM_PELSHEIGHT;
    lpDevMode.dmPelsWidth := width;
    lpDevMode.dmPelsHeight := height;
    Result := ChangeDisplaySettings(lpDevMode, CDS_UPDATEREGISTRY) = DISP_CHANGE_SUCCESSFUL;
  end;
end;

Mit freundlichen Grüßen
Maximus

[Luckie]

Zitat von Maximus:

wenn die Auflösung wieder, zu der die man vorher hatte, zurückgesetzt wird sind alle Symbole auf dem Desktop verschoben!

Das liegt nicht am Code, sondern an Windows.

[Meflin]

luckie hat doch ein tool zum abspeichern und wiederherstellen der iconpositionen. das könntest du doch einbauen (falls das os ist)

[Maximus]

Zitat:

Das liegt nicht am Code, sondern an Windows.

Und wir bring ich Windows dazu dies nicht zu machen?

[Luckie]

Gar nicht. Du musst sie dir selber merken und wieder herstellen. Ein programm dazu mit Source findest du hier: http://programme.luckie-online.de

[Meflin]

afaik garnicht. durch das verändern der bildschirmauflösung wird der platz so klein, dass die icons zwangsläufig verschoben werden müssen. aber ein lösungsvorschlag steht weiter oben.