3 Monitore verwalten

[himitsu]

Ich würde das Beispiel aus Post #7 erstmal so übersetzt.

Delphi-Quellcode:

uses ComObj;

const POS_ALL = $07;
var sys, mon: Variant{IDispatch};
begin
  sys := CreateOleObject('UltraMon.System');
  mon := sys.Monitors('2');
  if mon.Enabled then begin
    sys.SavePositions(POS_ALL);
    mon.Enabled := False;
    sys.ApplyMonitorChanges;
  end else begin
    mon.Enabled := True;
    sys.ApplyMonitorChanges;
    sys.RestorePositions(POS_ALL);
  end;
end;

Dieses scheint wohl den 2. Monitor umzuschalten (an/aus),
aber k.A. ob dieses so funktioniert.