crossed
Goto Top

Zwei Internetexplorer 7, auf zwei Displays ( jeweils einen) zur Stundenplananzeige autostarten lassen - wie?!

Zur Stundenplananzeige wurden in einer Schule Kästen mit jeweils zwei Displays und einem hp Thinclient angebracht, die Displays sind dabei so montiert worden, dass der linke um 90° nach links gedreht wurde und der rechte um 90° nach rechts.
Mithilfe von "iRotate" wurde das Betriebssystem gedreht, so dass nun zwei 19° Displays hochkant nebeneinander lesbar sind.
Der Thinclient (winXPembedded) bindet ein Netzlaufwerk ein auf welchem zwei .html-Dateien aus einer Stundenplansoftware abgelegt werden.

Nun das eigentliche Problem: Wie lasse ich das System beim Start beide Dateien öffnen, so dass links die eine Datei in Fullscreen ohne Leisten erscheint und rechts die andere?

Mein Versuch via zwei Batchdateien jeweils einmal den iexplorer mit jeweils einer Datei zu starten ist nicht geglückt, beide starten in einem Explorer als Tabs nur auf dem Display, auf dem der iExplorer zuletzt verwendet worden ist und auch nicht ohne Leisten im Fullscreen.


Wenn jemand Ideen hat wäre ich euch echt dankbar Kollegen ;)

Content-ID: 120027

Url: https://administrator.de/contentid/120027

Ausgedruckt am: 22.11.2024 um 14:11 Uhr

J0j0
J0j0 08.07.2009 um 16:11:06 Uhr
Goto Top
Schau dir das mal an:

#NoEnv
#Persistent
CoordMode, Mouse, Screen
SetBatchLines, 0
SetWinDelay, 0

If (A_OSVersion = "WIN_95" Or A_OSVersion = "WIN_NT4") {
MsgBox, 262160
, Fensterschieber
, % "Dieses Skript funktioniert nicht mit`n`n"
. "Win95 oder WinNT!`n`n"
. "Das Skript wird beendet!"
ExitApp
}
; Anzahl der Monitore bestimmen
SysGet, MC, MonitorCount
If (MC <> 2) {
MsgBox, 262160
, Fensterschieber
, % "Dieses Skript funktioniert nur mit`n`n"
. "zwei Bildschirmen!`n`n"
. "Das Skript wird beendet!"
ExitApp
}
; Koordinaten der Monitore holen
Loop, %MC%
{
SysGet, M, Monitor, %A_Index%
L%A_Index% := MLeft
R%A_Index% := MRight
T%A_Index% := MTop
B%A_Index% := MBottom
}
; Liste der bekannten Fenster aufbauen
AlteListe := "|"
WinGet, ID, List,,, Program Manager
Loop, %ID%
{
AlteListe .= ID%A_Index% . "|"
}
; Und los gehts!
SetTimer, SchiebMichZumMausschirmWennNötig, On
Return

SchiebMichZumMausschirmWennNötig:
; Mausposition holen
MouseGetPos, MX, MY
; Monitor der Maus bestimmen
MS := (MX < L2 ? 1 : 2)
; Liste der aktuellen Fenster aufbauen
NeueListe := "|"
WinGet, ID, List,,, Program Manager
Loop, %ID%
{
WID := ID%A_Index%
; Fenster nicht in der Liste der bekannten Fenster?
If (!InStr(AlteListe, "|" . WID . "|"))
{
; LastFoundWindow setzen
WinExist("ahk_id " . WID)
; Fensterposition holen
WinGetPos, WX, WY
; Monitor des Fensters bestimmen
WS := (WX < L2 ? 1 : 2)
; Monitor von Maus und Fenster ungleich?
If (MS <> WS) {
; X-Position des Fensters neu bestimmen
WX := L%MS% + Abs(WX - L%WS%)
; Fenster verschieben
WinMove, WX, WY
}
}
NeueListe .= WID . "|"
}
; Bekannte Fenster = aktuelle Fenster
AlteListe := NeueListe
Return

Src: http://de.autohotkey.com/forum/topic2660.html