{"id":465,"date":"2014-07-28T12:11:36","date_gmt":"2014-07-28T10:11:36","guid":{"rendered":"http:\/\/www.cc2u.de\/?p=465"},"modified":"2014-07-28T12:11:36","modified_gmt":"2014-07-28T10:11:36","slug":"ausgabe-der-bildschirmaufloesung-in-ein-feld-ueber-api","status":"publish","type":"post","link":"https:\/\/www.cc2u.de\/?p=465","title":{"rendered":"Ausgabe der Bildschirmaufl\u00f6sung in ein Feld \u00fcber API"},"content":{"rendered":"<p><span style=\"color: #0000ff;\">Type RECTANGLE<\/span><br \/>\n<span style=\"color: #0000ff;\">x1 As Long<\/span><br \/>\n<span style=\"color: #0000ff;\">y1 As Long<\/span><br \/>\n<span style=\"color: #0000ff;\">x2 As Long<\/span><br \/>\n<span style=\"color: #0000ff;\">y2 As Long<\/span><br \/>\n<span style=\"color: #0000ff;\">End Type<\/span><\/p>\n<p>[Declarations]<\/p>\n<p><span style=\"color: #0000ff;\">Declare Function GetDesktopWindow Lib \u201cUser32\u2033 () As Long<\/span><br \/>\n<span style=\"color: #0000ff;\">Declare Function GetWindowRect Lib \u201cUser32\u2033 (Byval hWindow As Long, r As RECTANGLE) As Long<\/span><\/p>\n<p>[Click]<\/p>\n<p><span style=\"color: #0000ff;\">Dim s As New NotesSession<\/span><br \/>\n<span style=\"color: #0000ff;\">Dim R As RECTANGLE<\/span><br \/>\n<span style=\"color: #0000ff;\">Dim hWindow As Long<\/span><br \/>\n<span style=\"color: #0000ff;\">Dim RC As Long<\/span><br \/>\n<span style=\"color: #0000ff;\">Dim WindowResolution As String<\/span><br \/>\n<span style=\"color: #0000ff;\">hWindow = GetDesktopWindow ()<\/span><br \/>\n<span style=\"color: #0000ff;\">RC = GetWindowRect(hWindow, R)<\/span><br \/>\n<span style=\"color: #0000ff;\">WindowResolution = (R.x2 \u2013 R.x1) &amp; \u201cx\u201d &amp; (R.y2 \u2013 R.y1)<\/span><\/p>\n<p><span style=\"color: #0000ff;\">Call Source.FieldSetText(\u201cAUSGABEFELD\u201d,WindowResolution)<\/span><\/p>\n","protected":false},"excerpt":{"rendered":"<p>Type RECTANGLE x1 As Long y1 As Long x2 As Long y2 As Long End Type [Declarations] Declare Function GetDesktopWindow Lib \u201cUser32\u2033 () As Long Declare Function GetWindowRect Lib \u201cUser32\u2033 (Byval hWindow As Long, r As RECTANGLE) As Long [Click] Dim s As New NotesSession Dim R As RECTANGLE Dim hWindow As Long Dim RC [&hellip;]<\/p>\n","protected":false},"author":1,"featured_media":0,"comment_status":"closed","ping_status":"closed","sticky":false,"template":"","format":"standard","meta":{"footnotes":""},"categories":[5],"tags":[],"_links":{"self":[{"href":"https:\/\/www.cc2u.de\/index.php?rest_route=\/wp\/v2\/posts\/465"}],"collection":[{"href":"https:\/\/www.cc2u.de\/index.php?rest_route=\/wp\/v2\/posts"}],"about":[{"href":"https:\/\/www.cc2u.de\/index.php?rest_route=\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"https:\/\/www.cc2u.de\/index.php?rest_route=\/wp\/v2\/users\/1"}],"replies":[{"embeddable":true,"href":"https:\/\/www.cc2u.de\/index.php?rest_route=%2Fwp%2Fv2%2Fcomments&post=465"}],"version-history":[{"count":1,"href":"https:\/\/www.cc2u.de\/index.php?rest_route=\/wp\/v2\/posts\/465\/revisions"}],"predecessor-version":[{"id":466,"href":"https:\/\/www.cc2u.de\/index.php?rest_route=\/wp\/v2\/posts\/465\/revisions\/466"}],"wp:attachment":[{"href":"https:\/\/www.cc2u.de\/index.php?rest_route=%2Fwp%2Fv2%2Fmedia&parent=465"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/www.cc2u.de\/index.php?rest_route=%2Fwp%2Fv2%2Fcategories&post=465"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/www.cc2u.de\/index.php?rest_route=%2Fwp%2Fv2%2Ftags&post=465"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}