<?xml version="1.0" encoding="UTF-8"?><rss version="2.0"
	xmlns:content="http://purl.org/rss/1.0/modules/content/"
	xmlns:dc="http://purl.org/dc/elements/1.1/"
	xmlns:atom="http://www.w3.org/2005/Atom"
	xmlns:sy="http://purl.org/rss/1.0/modules/syndication/"
	
	>
<channel>
	<title>
	Comments for eknori.de	</title>
	<atom:link href="https://www.eknori.de/comments/feed/" rel="self" type="application/rss+xml" />
	<link>https://www.eknori.de</link>
	<description>the weird world of eknori</description>
	<lastBuildDate>Tue, 23 Apr 2024 14:28:07 +0000</lastBuildDate>
	<sy:updatePeriod>
	hourly	</sy:updatePeriod>
	<sy:updateFrequency>
	1	</sy:updateFrequency>
	
	<item>
		<title>
		Comment on LS/API ClipBoard Code for 32/64Bit by Glen		</title>
		<link>https://www.eknori.de/2024-03-05/ls-api-clipboard-code-for-32-64bit/#comment-4712</link>

		<dc:creator><![CDATA[Glen]]></dc:creator>
		<pubDate>Tue, 23 Apr 2024 14:28:07 +0000</pubDate>
		<guid isPermaLink="false">https://www.eknori.de/?p=4674#comment-4712</guid>

					<description><![CDATA[Sorted now. Couldn&#039;t get the above to work so I&#039;m using the code below which I&#039;ve tested in 32 bit R9 and R12 and 64 bit R14.

Sub SetClipboardText(ByVal Text As Variant)
	Dim obj As Variant	
	Set obj = CreateObject(&quot;htmlfile&quot;)	
	Call obj.ParentWindow.ClipboardData.SetData(&quot;Text&quot;, Text)	
End sub

Function GetClipBoardText() As String
    On Error Resume Next
	Dim obj As Variant	
	Set obj = CreateObject(&quot;htmlfile&quot;)	    
	GetClipBoardText = obj.ParentWindow.ClipboardData.getData(&quot;Text&quot;)	
End Function

Sub ClearClipBoardText()
	Dim obj As Variant	
	Set obj = CreateObject(&quot;htmlfile&quot;)	
    Call obj.ParentWindow.ClipboardData.clearData(&quot;Text&quot;)    
End sub]]></description>
			<content:encoded><![CDATA[<p>Sorted now. Couldn&#8217;t get the above to work so I&#8217;m using the code below which I&#8217;ve tested in 32 bit R9 and R12 and 64 bit R14.</p>
<p>Sub SetClipboardText(ByVal Text As Variant)<br />
	Dim obj As Variant<br />
	Set obj = CreateObject(&#8220;htmlfile&#8221;)<br />
	Call obj.ParentWindow.ClipboardData.SetData(&#8220;Text&#8221;, Text)<br />
End sub</p>
<p>Function GetClipBoardText() As String<br />
    On Error Resume Next<br />
	Dim obj As Variant<br />
	Set obj = CreateObject(&#8220;htmlfile&#8221;)<br />
	GetClipBoardText = obj.ParentWindow.ClipboardData.getData(&#8220;Text&#8221;)<br />
End Function</p>
<p>Sub ClearClipBoardText()<br />
	Dim obj As Variant<br />
	Set obj = CreateObject(&#8220;htmlfile&#8221;)<br />
    Call obj.ParentWindow.ClipboardData.clearData(&#8220;Text&#8221;)<br />
End sub</p>
]]></content:encoded>
		
			</item>
		<item>
		<title>
		Comment on LS/API ClipBoard Code for 32/64Bit by Glen		</title>
		<link>https://www.eknori.de/2024-03-05/ls-api-clipboard-code-for-32-64bit/#comment-4711</link>

		<dc:creator><![CDATA[Glen]]></dc:creator>
		<pubDate>Tue, 23 Apr 2024 09:37:59 +0000</pubDate>
		<guid isPermaLink="false">https://www.eknori.de/?p=4674#comment-4711</guid>

					<description><![CDATA[Thanks for trying Ulrich.  I am calling SetClipBoard and it then calls SetClipBoard64() when using R14.

I&#039;ve managed to get passed the &quot;Could not unlock memory location&quot; error by updating SetClipboard64 to use the _64 calls (see below).  
Now I don&#039;t get an error at all, but nothing is added to the Windows clipboard either!

Function SetClipboard64(txt As String)
 
    Dim session As New NotesSession
    session.UseDoubleAsPointer = True
     
    Dim hGlobalMemory As Double
    Dim lpGlobalMemory As Long
    Dim hClipMemory As Long
    Dim X As Long
     
    hGlobalMemory = GlobalAlloc_64(GHND, Len(txt) + 1)
    lpGlobalMemory = GlobalLock_64(hGlobalMemory)
    lpGlobalMemory = lstrcpy(lpGlobalMemory, txt)
     
	If GlobalUnlock_64(hGlobalMemory)  0 Then
        MsgBox &quot;Could not unlock memory location. Copy aborted.&quot;
        GoTo OutOfHere2
    End If
     
    If OpenClipboard_64(0&#038;) = 0 Then
        MsgBox &quot;Could not open the Clipboard. Copy aborted.&quot;
        Exit Function
    End If
    
    X = EmptyClipboard()
    hClipMemory = SetClipboardData_64(CF_TEXT, hGlobalMemory)
     
OutOfHere2:
	If CloseClipboard_64() = 0 Then
        MsgBox &quot;Could not close Clipboard.&quot;
    End If
    session.UseDoubleAsPointer = False
End Function]]></description>
			<content:encoded><![CDATA[<p>Thanks for trying Ulrich.  I am calling SetClipBoard and it then calls SetClipBoard64() when using R14.</p>
<p>I&#8217;ve managed to get passed the &#8220;Could not unlock memory location&#8221; error by updating SetClipboard64 to use the _64 calls (see below).<br />
Now I don&#8217;t get an error at all, but nothing is added to the Windows clipboard either!</p>
<p>Function SetClipboard64(txt As String)</p>
<p>    Dim session As New NotesSession<br />
    session.UseDoubleAsPointer = True</p>
<p>    Dim hGlobalMemory As Double<br />
    Dim lpGlobalMemory As Long<br />
    Dim hClipMemory As Long<br />
    Dim X As Long</p>
<p>    hGlobalMemory = GlobalAlloc_64(GHND, Len(txt) + 1)<br />
    lpGlobalMemory = GlobalLock_64(hGlobalMemory)<br />
    lpGlobalMemory = lstrcpy(lpGlobalMemory, txt)</p>
<p>	If GlobalUnlock_64(hGlobalMemory)  0 Then<br />
        MsgBox &#8220;Could not unlock memory location. Copy aborted.&#8221;<br />
        GoTo OutOfHere2<br />
    End If</p>
<p>    If OpenClipboard_64(0&amp;) = 0 Then<br />
        MsgBox &#8220;Could not open the Clipboard. Copy aborted.&#8221;<br />
        Exit Function<br />
    End If</p>
<p>    X = EmptyClipboard()<br />
    hClipMemory = SetClipboardData_64(CF_TEXT, hGlobalMemory)</p>
<p>OutOfHere2:<br />
	If CloseClipboard_64() = 0 Then<br />
        MsgBox &#8220;Could not close Clipboard.&#8221;<br />
    End If<br />
    session.UseDoubleAsPointer = False<br />
End Function</p>
]]></content:encoded>
		
			</item>
		<item>
		<title>
		Comment on LS/API ClipBoard Code for 32/64Bit by Ulrich Krause		</title>
		<link>https://www.eknori.de/2024-03-05/ls-api-clipboard-code-for-32-64bit/#comment-4710</link>

		<dc:creator><![CDATA[Ulrich Krause]]></dc:creator>
		<pubDate>Tue, 23 Apr 2024 04:36:31 +0000</pubDate>
		<guid isPermaLink="false">https://www.eknori.de/?p=4674#comment-4710</guid>

					<description><![CDATA[I have tested in my environment (Notes 12.0.2FP3 &amp; 14.0.0FP1), and everything works as expected.
You do not have to make a call into SetClipBoard64() explicitly. 
All you have to do is to call into setClipBoard and getClipBoard on 32 and 64 Bit. The code &#039;knows&#039; where to go from there.]]></description>
			<content:encoded><![CDATA[<p>I have tested in my environment (Notes 12.0.2FP3 &#038; 14.0.0FP1), and everything works as expected.<br />
You do not have to make a call into SetClipBoard64() explicitly.<br />
All you have to do is to call into setClipBoard and getClipBoard on 32 and 64 Bit. The code &#8216;knows&#8217; where to go from there.</p>
]]></content:encoded>
		
			</item>
		<item>
		<title>
		Comment on LS/API ClipBoard Code for 32/64Bit by Glen		</title>
		<link>https://www.eknori.de/2024-03-05/ls-api-clipboard-code-for-32-64bit/#comment-4709</link>

		<dc:creator><![CDATA[Glen]]></dc:creator>
		<pubDate>Mon, 22 Apr 2024 15:45:54 +0000</pubDate>
		<guid isPermaLink="false">https://www.eknori.de/?p=4674#comment-4709</guid>

					<description><![CDATA[Hi,

SetClipboard64() fails on 14 .0 FP1

here...

If GlobalUnlock(hGlobalMemory)  0 Then
        MsgBox &quot;Could not unlock memory location. Copy aborted.&quot;

I tried switching GlobalUnlock for GlobalUnlock_64 but still failed.

Any suggestions would be gratefully received.]]></description>
			<content:encoded><![CDATA[<p>Hi,</p>
<p>SetClipboard64() fails on 14 .0 FP1</p>
<p>here&#8230;</p>
<p>If GlobalUnlock(hGlobalMemory)  0 Then<br />
        MsgBox &#8220;Could not unlock memory location. Copy aborted.&#8221;</p>
<p>I tried switching GlobalUnlock for GlobalUnlock_64 but still failed.</p>
<p>Any suggestions would be gratefully received.</p>
]]></content:encoded>
		
			</item>
		<item>
		<title>
		Comment on Issue with NotesUIWorkspace.Prompt on 12.0.2 64/32Bit by Ulrich Krause		</title>
		<link>https://www.eknori.de/2022-12-02/issue-with-notesuiworkspace-prompt-on-12-0-2-64-32bit/#comment-4705</link>

		<dc:creator><![CDATA[Ulrich Krause]]></dc:creator>
		<pubDate>Fri, 02 Dec 2022 08:38:49 +0000</pubDate>
		<guid isPermaLink="false">https://www.eknori.de/?p=4658#comment-4705</guid>

					<description><![CDATA[In reply to &lt;a href=&quot;https://www.eknori.de/2022-12-02/issue-with-notesuiworkspace-prompt-on-12-0-2-64-32bit/#comment-4704&quot;&gt;Glen&lt;/a&gt;.

Hi Glen,

sorry for that. it should have been CONFIRMED instead of resolved. My bad.]]></description>
			<content:encoded><![CDATA[<p>In reply to <a href="https://www.eknori.de/2022-12-02/issue-with-notesuiworkspace-prompt-on-12-0-2-64-32bit/#comment-4704">Glen</a>.</p>
<p>Hi Glen,</p>
<p>sorry for that. it should have been CONFIRMED instead of resolved. My bad.</p>
]]></content:encoded>
		
			</item>
		<item>
		<title>
		Comment on Issue with NotesUIWorkspace.Prompt on 12.0.2 64/32Bit by Glen		</title>
		<link>https://www.eknori.de/2022-12-02/issue-with-notesuiworkspace-prompt-on-12-0-2-64-32bit/#comment-4704</link>

		<dc:creator><![CDATA[Glen]]></dc:creator>
		<pubDate>Fri, 02 Dec 2022 08:25:28 +0000</pubDate>
		<guid isPermaLink="false">https://www.eknori.de/?p=4658#comment-4704</guid>

					<description><![CDATA[Hi, when you say &quot;The issue has been resolved by HCL Support&quot; what do you mean? Have they released a fix pack?

We have found a bug with embedded views and are hoping a fix pack will be released so we can roll out 12.0.2.]]></description>
			<content:encoded><![CDATA[<p>Hi, when you say &#8220;The issue has been resolved by HCL Support&#8221; what do you mean? Have they released a fix pack?</p>
<p>We have found a bug with embedded views and are hoping a fix pack will be released so we can roll out 12.0.2.</p>
]]></content:encoded>
		
			</item>
		<item>
		<title>
		Comment on Domino Designer 12.0.2 &#8211; Object and Agent list is empty by Lars Berntrop-Bos		</title>
		<link>https://www.eknori.de/2022-11-19/domino-designer-12-0-2-object-and-agent-list-is-empty/#comment-4703</link>

		<dc:creator><![CDATA[Lars Berntrop-Bos]]></dc:creator>
		<pubDate>Sun, 20 Nov 2022 00:12:00 +0000</pubDate>
		<guid isPermaLink="false">https://www.eknori.de/?p=4649#comment-4703</guid>

					<description><![CDATA[Saw your post about 12.0.2 not showing View actions, I cannot reproduce that.  Do you mean the design element are not visible when you right-click a db in Notes and use &quot;Open in Designer&quot;, but visible when opened directly from Designer?]]></description>
			<content:encoded><![CDATA[<p>Saw your post about 12.0.2 not showing View actions, I cannot reproduce that.  Do you mean the design element are not visible when you right-click a db in Notes and use &#8220;Open in Designer&#8221;, but visible when opened directly from Designer?</p>
]]></content:encoded>
		
			</item>
		<item>
		<title>
		Comment on NotesException: Object has been removed or recycled by Karsten Lehmann		</title>
		<link>https://www.eknori.de/2022-09-02/notesexception-object-has-been-removed-or-recycled/#comment-4702</link>

		<dc:creator><![CDATA[Karsten Lehmann]]></dc:creator>
		<pubDate>Mon, 05 Sep 2022 07:30:13 +0000</pubDate>
		<guid isPermaLink="false">https://www.eknori.de/?p=4631#comment-4702</guid>

					<description><![CDATA[That‘s not a new behavior. LSXBE is sharing/reusing C object handles internally, which is one of the worst design decisions of this API and one of the reasons I created Domino JNA. There (because I am using the C API internally and not LSXBE) you get a new document handle.]]></description>
			<content:encoded><![CDATA[<p>That‘s not a new behavior. LSXBE is sharing/reusing C object handles internally, which is one of the worst design decisions of this API and one of the reasons I created Domino JNA. There (because I am using the C API internally and not LSXBE) you get a new document handle.</p>
]]></content:encoded>
		
			</item>
		<item>
		<title>
		Comment on NotesException: Object has been removed or recycled by Jesper Kiaer		</title>
		<link>https://www.eknori.de/2022-09-02/notesexception-object-has-been-removed-or-recycled/#comment-4701</link>

		<dc:creator><![CDATA[Jesper Kiaer]]></dc:creator>
		<pubDate>Fri, 02 Sep 2022 14:53:51 +0000</pubDate>
		<guid isPermaLink="false">https://www.eknori.de/?p=4631#comment-4701</guid>

					<description><![CDATA[Hi 
I actually wrote about the same issue in 2013 on my blog. 

https://nevermind.dk/nevermind/blog.nsf/0/BEBFD4AE9B965CA0C1257B520050124F?opendocument 

brgds Jesper Kiaer]]></description>
			<content:encoded><![CDATA[<p>Hi<br />
I actually wrote about the same issue in 2013 on my blog. </p>
<p><a href="https://nevermind.dk/nevermind/blog.nsf/0/BEBFD4AE9B965CA0C1257B520050124F?opendocument" rel="nofollow ugc">https://nevermind.dk/nevermind/blog.nsf/0/BEBFD4AE9B965CA0C1257B520050124F?opendocument</a> </p>
<p>brgds Jesper Kiaer</p>
]]></content:encoded>
		
			</item>
		<item>
		<title>
		Comment on Notes Client 12.0.2 (Danube) &#8211; &#8220;Workspace_Navigator_Width&#8221; by Rainer		</title>
		<link>https://www.eknori.de/2022-08-10/notes-client-12-0-2-danube-workspace_navigator_width/#comment-4700</link>

		<dc:creator><![CDATA[Rainer]]></dc:creator>
		<pubDate>Thu, 11 Aug 2022 09:51:19 +0000</pubDate>
		<guid isPermaLink="false">https://www.eknori.de/?p=4605#comment-4700</guid>

					<description><![CDATA[Great finding !! Thanks for sharing...]]></description>
			<content:encoded><![CDATA[<p>Great finding !! Thanks for sharing&#8230;</p>
]]></content:encoded>
		
			</item>
	</channel>
</rss>
