| 
 
  Elite Veteran
 
 Beiträge: 922
 
      Ort: Wien
 | Hallo, Dirk! 
 
 hochlenert - 15.03.15  
 ... die Fläche des Access-Fensters, aber nicht die Position des Access-Fensters auf dem Bildschirm. Oder ich hab's nicht kapiert?
 
 
 Wie gesagt, Code reduzieren und ein bissel anpassen. z.B.
 
 Private Declare Function apiGetWindowRect Lib "user32" Alias "GetWindowRect" (ByVal hwnd As Long, lpRect As typRect) As Long
 
 Private Type typRect
 Left As Long
 Top As Long
 Right As Long
 Bottom As Long
 End Type
 
 Public Sub procAccessPos()
 
 Dim varAccess As typRect
 
 Call apiGetWindowRect(hWndAccessApp, varAccess)
 
 Debug.Print varAccess.Left, varAccess.Right, varAccess.Top, varAccess.Bottom
 
 End Sub
 
 Gibt bei mir (in A2010) die Position des Access-Hauptfensters am Bildschirm in Pixel.
 
 -----
 Servus
 Karl
 *********
 Access-Entwickler-Konferenz: https://www.donkarl.com/?aek
 Access DevCon Vienna: https://www.donkarl.com/devcon
 Access Forever: https://www.accessforever.org
 Access News: https://www.youtube.com/playlist?list=PLVCeBbJIMDvdJ8ghMbEakJ6_EQyvy...
 |