Desktop auf den Kopf stellen?

[chris]

hi,

Zitat:

lpszDeviceName
[in] Pointer to a null-terminated string that specifies the display device whose graphics mode will change. Only display device names as returned by EnumDisplayDevices are valid. See EnumDisplayDevices for further information on the names associated with these display devices.

dann sollte es ja so klappen:

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
var DisplayDevice: TDisplayDevice;
begin
  DisplayDevice.cb := sizeof(DisplayDevice);
  EnumDisplayDevices(nil, 0, DisplayDevice, 0);

  [..]
  ChangeDisplaySettingsEx(DisplayDevice.DeviceString, aDevMode, Handle, 0, nil); //.DeviceName
  [..]
end;

Klappt aber nicht

[edit]
kann ja auch nicht, bzw. tut es nicht das was wir wollen

Zitat:

dmOrientation
For printer devices only, selects the orientation of the paper. This member can be either DMORIENT_PORTRAIT (1) or DMORIENT_LANDSCAPE (2).

und:

Zitat:

dmDisplayOrientation
Windows XP: For display devices only, the orientation at which images should be presented. If DM_DISPLAYORIENTATION is not set, this member must be zero. If DM_DISPLAYORIENTATION is set, this member must be one of the following values Value Meaning
DMDO_DEFAULT The display orientation is the natural orientation of the display device; it should be used as the default.
DMDO_90 The display orientation is rotated 90 degrees (measured clockwise) from DMDO_DEFAULT.
DMDO_180 The display orientation is rotated 180 degrees (measured clockwise) from DMDO_DEFAULT.
DMDO_270 The display orientation is rotated 270 degrees (measured clockwise) from DMDO_DEFAULT.

[/edit]