Fensterposition zurücksetzen

[haentschman]

Zitat:

Und die Reihenfolge in der Liste ist einfach entsprechend dem, wie MSDN-Library durchsuchenEnumDisplayMonitors das liefert.

...das erklärt nicht die verschobene Reihenfolge und Größen.

Das sind die Werte die im Tool zu sehen sind.

Delphi-Quellcode:

procedure TfoMonitor.FormShow(Sender: TObject);
begin
  grpMonitor.Caption := 'Monitornummer ' + IntToStr(Monitor.MonitorNum + 1);
  lbl5.Caption := IntToStr(Monitor.Left);
  lbl6.Caption := IntToStr(Monitor.Top);
  lbl7.Caption := IntToStr(Monitor.Height);
  lbl8.Caption := IntToStr(Monitor.Width);
end;

[himitsu]

PS: Hatte meine Antwort oben nochmal revidiert.
Delphi übernimmt einfach die Reihenfolge von der WinAPI und GetMonitorInfo(Monitor.Handle, ...) liefert auch keine zusätzlichen Infos. (nur Primary und die Rects)
Wenn Windows das schon falsch rausgibt, dann kannst da über die TScreen-Klasse nichts weiter machen.

Falls du die Reihenfolge zur Laufzeit geändert hast, dann "sollte" Delphi eigenlich drauf reagieren und die Daten neu einlesen.

[haentschman]

Daß heist, daß man sich auf die Monitoranordnung, was aus dem System kommt, nicht verlassen kann. Darauf baut aber die Logik.

[himitsu]

Zumindestens nicht komplett.
Primary = 1, not Primary = >1 und die Positionen sollten ja stimmen.

bist nicht der Einzige:
https://www.vb-paradise.de/index.php...dentifizieren/
https://living-sun.com/c/132927-a-re...tors-edid.html
...

> Wie Sie vielleicht wissen, listet Windows dieAnzeigegeräte in der Reihenfolge, in der Sie sie verbinden (oder in der Tat überhaupt nicht auf einer Regel basieren?).

https://docs.microsoft.com/de-de/win...nelement-value
> Beachten Sie, dass sich einige Teile dieser Muster abhängig von der Installations Reihenfolge ändern können.

vielleicht noch
https://www.delphipraxis.net/184581-...-auslesen.html

[haentschman]

Zitat:

bis nicht der Einzige:

...da bin ich aber froh.

Ich werde meine Logik anpassen. Ich werde mir die Monitore separat auslesen und die linke Seite passend setzen.

[himitsu]

Ich hab die Lösung:

Du löst das Monitor identifizieren vom OS aus und via OCR liest du dann die Numern vom Screenshot ab.

[KodeZwerg]

Zitat von haentschman:

Ich werde mir die Monitore separat auslesen und die linke Seite passend setzen.

Da habe ich immer noch das problem gehabt das sich Delphi selbst nicht aktualisiert, wenn man 'nen Monitor ausstöpselt wird der immer noch gelistet, Screen Resolution zwar 0x0 aber index noch da... des war allerdings noch mit Delphi 2009/2010 kompilate, vielleicht ist's ja mit Rio besser, leider noch nicht getestet.

[CodeX]

Da ich mich selber gerade ziemlich mit Unregelmäßigkeiten bei der Fensterpositionierung herumgeärgert habe, möchte ich an dieser Stelle noch anmerken, dass MakeFullyVisible nicht die Eigenheiten von Windows 10 berücksichtigt.
Windows 10 hat nämlich noch einen unsichtbaren Rand von normalerweise 7px. Siehe im Detail hier:
https://stackoverflow.com/questions/...isible-borders

Hat der Anwender also beispielsweise das Fenster links angedockt und man speichert diese Position beim Beenden der Anwendung mit (x=0,y=0), möchte man nach dem Programmstart die Anwendung ja auch an die gleiche Position wieder setzen, was eigentlich ja auch geht, aber führt man dann MakeFullyVisible aus, weil man sichergehen möchte, dass die Anwendung nicht irgendwo versteckt ist, weil sich die angeschlossenen Monitore geändert haben, dann wird das Fenster auf x=7,y=0 verschoben.

Die einzige Option, die ich das sehe, wäre den Code von MakeFullyVisible zu kopieren und mit entsprechenden Toleranzen an den Rändern anzupassen.