Screen Objekt
Zuletzt geändert: 10.02.2026 12:00

Screen-Objekt (iScript) #

Das Screen-Objekt liefert Informationen zum Bildschirm, Desktop und den aktiven UI-Elementen der EULANDA-Anwendung.

Set screen = Client.CreateObject("SCREEN")

Desktop-Eigenschaften #

Die Desktop-Eigenschaften liefern die Gesamtauflösung des Bildschirms bzw. bei Multi-Monitor-Setups die Abmessungen des virtuellen Desktops.

DesktopLeft # 

property DesktopLeft: Integer (nur lesen)

X-Position der linken Kante des Desktops in Pixeln. Bei einem einzelnen Monitor ist dies 0.

DesktopTop # 

property DesktopTop: Integer (nur lesen)

Y-Position der oberen Kante des Desktops in Pixeln. Bei einem einzelnen Monitor ist dies 0.

DesktopWidth # 

property DesktopWidth: Integer (nur lesen)

Breite des gesamten Desktops in Pixeln.

DesktopHeight # 

property DesktopHeight: Integer (nur lesen)

Höhe des gesamten Desktops in Pixeln.

WorkArea-Eigenschaften #

Die WorkArea-Eigenschaften liefern den nutzbaren Bereich des Desktops, also ohne die Windows-Taskleiste und andere angedockte Symbolleisten.

WorkAreaLeft # 

property WorkAreaLeft: Integer (nur lesen)

X-Position der linken Kante des Arbeitsbereichs in Pixeln.

WorkAreaTop # 

property WorkAreaTop: Integer (nur lesen)

Y-Position der oberen Kante des Arbeitsbereichs in Pixeln.

WorkAreaWidth # 

property WorkAreaWidth: Integer (nur lesen)

Breite des Arbeitsbereichs in Pixeln.

WorkAreaHeight # 

property WorkAreaHeight: Integer (nur lesen)

Höhe des Arbeitsbereichs in Pixeln.

ActiveControl-Eigenschaften #

Diese Eigenschaften liefern Informationen über das aktuell aktive Steuerelement in der EULANDA-Oberfläche.

ActiveControlFieldname # 

property ActiveControlFieldname: string (nur lesen)

Feldname des aktiven Steuerelements.

ActiveControlDataobject # 

property ActiveControlDataobject: string (nur lesen)

Name des Datenobjekts, an das das aktive Steuerelement gebunden ist.

ActiveControlLeft # 

property ActiveControlLeft: Integer (nur lesen)

X-Position des aktiven Steuerelements in Pixeln (relativ zum Bildschirm).

ActiveControlTop # 

property ActiveControlTop: Integer (nur lesen)

Y-Position des aktiven Steuerelements in Pixeln (relativ zum Bildschirm).

ActiveControlWidth # 

property ActiveControlWidth: Integer (nur lesen)

Breite des aktiven Steuerelements in Pixeln.

ActiveControlHeight # 

property ActiveControlHeight: Integer (nur lesen)

Höhe des aktiven Steuerelements in Pixeln.

Beispiele #

A. Desktop-Auflösung anzeigen # 

Option Explicit

Dim screen
Set screen = Client.CreateObject("SCREEN")

ellib.ShowMessage "Desktop: " & screen.DesktopWidth & " x " & screen.DesktopHeight & " Pixel" & vbCrLf & _
  "Arbeitsbereich: " & screen.WorkAreaWidth & " x " & screen.WorkAreaHeight & " Pixel"

Set screen = Nothing

B. Position des aktiven Steuerelements ermitteln # 

Option Explicit

Dim screen
Set screen = Client.CreateObject("SCREEN")

Dim msg
msg = "Aktives Feld: " & screen.ActiveControlFieldname & vbCrLf & _
  "Datenobjekt: " & screen.ActiveControlDataobject & vbCrLf & _
  "Position: " & screen.ActiveControlLeft & ", " & screen.ActiveControlTop & vbCrLf & _
  "Größe: " & screen.ActiveControlWidth & " x " & screen.ActiveControlHeight

ellib.ShowMessage msg
Set screen = Nothing

C. WebBrowser-Dialog zentriert im Arbeitsbereich positionieren # 

Option Explicit

Dim screen, wb, dlgBreite, dlgHoehe
Set screen = Client.CreateObject("SCREEN")

dlgBreite = 800
dlgHoehe = 600

Set wb = Client.CreateDialog("WebBrowser")
wb.Left = screen.WorkAreaLeft + (screen.WorkAreaWidth - dlgBreite) \ 2
wb.Top = screen.WorkAreaTop + (screen.WorkAreaHeight - dlgHoehe) \ 2
wb.Width = dlgBreite
wb.Height = dlgHoehe
wb.HTMLSource  = "<html style='font-family:arial'>" &_
  "<img width='300px' src='eulanda://./images/logo200tr.png'>" &_
  "<h1>Zentrierter Dialog</h1>"
wb.ShowModal

Set wb = Nothing
Set screen = Nothing

Siehe auch #