https://www.bishopphillips.com/riskwiki/index.php?action=history&feed=atom&title=BpcHTMLEditHost
BpcHTMLEditHost - Revision history
2026-10-03T13:31:49Z
Revision history for this page on the wiki
MediaWiki 1.45.3
https://www.bishopphillips.com/riskwiki/index.php?title=BpcHTMLEditHost&diff=145&oldid=prev
Bishopj: 1 revision imported
2026-04-12T06:37:07Z
<p>1 revision imported</p>
<table style="background-color: #fff; color: #202122;" data-mw="interface">
<tr class="diff-title" lang="en">
<td colspan="1" style="background-color: #fff; color: #202122; text-align: center;">← Older revision</td>
<td colspan="1" style="background-color: #fff; color: #202122; text-align: center;">Revision as of 06:37, 12 April 2026</td>
</tr><tr><td colspan="2" class="diff-notice" lang="en"><div class="mw-diff-empty">(No difference)</div>
</td></tr></table>
Bishopj
https://www.bishopphillips.com/riskwiki/index.php?title=BpcHTMLEditHost&diff=144&oldid=prev
Bishopj: Created page with "==HTML Edit Host== Language: Delphi 7 - 2007 <pre> //*********************************************************** // TEdithost ver 1.00 (Jan. 14, 2000)..."
2019-09-11T23:00:12Z
<p>Created page with "==HTML Edit Host== Language: Delphi 7 - 2007 <pre> //*********************************************************** // TEdithost ver 1.00 (Jan. 14, 2000)..."</p>
<p><b>New page</b></p><div>==HTML Edit Host==<br />
<br />
Language: Delphi 7 - 2007<br />
<br />
<br />
<pre><br />
//***********************************************************<br />
// TEdithost ver 1.00 (Jan. 14, 2000) *<br />
// *<br />
// by *<br />
// Per Lindsø Larsen *<br />
// per.lindsoe@larsen.dk *<br />
// *<br />
// Documentation and updated versions: *<br />
// *<br />
// http://www.euromind.com/iedelphi *<br />
//***********************************************************<br />
<br />
unit bpcHTMLEditHost;<br />
<br />
interface<br />
<br />
uses<br />
{mshtml_tlb} Mshtml_Ewb, Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs;<br />
<br />
<br />
<br />
const<br />
<br />
SID_SHTMLEditHost: TGUID = (D1: $3050F6A0; D2: $98B5; D3: $11CF; D4: ($BB, $82, $00, $AA, $00, $BD, $CE, $0B));<br />
<br />
<br />
type<br />
<br />
<br />
TbpcHTMLSnapRect = function (const pIElement: IHTMLElement; var prcNew: tagRECT; eHandle: _ELEMENT_CORNER): HResult of object;<br />
<br />
TbpcHTMLEditHost = class(TComponent, IUnknown, IHTMLEditHost)<br />
private<br />
{ Private declarations }<br />
FSnapRect : TbpcHTMLSnapRect;<br />
FEnabled : Boolean;<br />
protected<br />
{ Protected declarations }<br />
function SnapRect(const pIElement: IHTMLElement; var prcNew: tagRECT; eHandle: _ELEMENT_CORNER): HResult; stdcall;<br />
public<br />
{ Public declarations }<br />
published<br />
{ Published declarations }<br />
property OnSnapRect : TbpcHTMLSnapRect read FSnapRect write FSnapRect;<br />
property Enabled : Boolean read FEnabled write FEnabled;<br />
end;<br />
<br />
</pre><br />
<br />
<br />
<br />
=BackLinks=<br />
<br />
{{#dpl: linksto={{FULLPAGENAME}} }}</div>
Bishopj