property Edit.TempInlineToolTip as String
Specifies a temporarily inline tooltip to be shown on the current line.

TypeDescription
String A String expression that defines the temporarily inline HTML text to be shown on the current line.
By default, the TempInlineToolTip property is empty. The TempInlineToolTip property can be used, even if the AllowInlineToolTip property is exDisableInlineToolTip ( by default ). For instance, you can use the Inline-ToolTip feature to display inside the control at current line, any information/html text you may need. Use the AllowInlineToolTip property to enable or disable the control's inline-tooltip feature. The TempInlineToolTip is hidden as soon as the selection is changed ( the caret is moved ). The Background(exTempInlineToolTipForeColor) / Background(exTempInlineToolTipBackColor) property define the foreground / background color / visual appearance of the temporarily inline-tooltip panel. If these are not defined, the Background(exInlineToolTipForeColor) / Background(exInlineToolTipBackColor) is used instead.

The TempInlineToolTip, supports built-HTML as listed:

 

Is it possible to display the inline tooltip with a different appearance than temporarily inline tooltip?

VBA (MS Access, Excell...)

With Edit1
	.LineNumberWidth = -1
	.LineNumberBackColor = RGB(240,240,240)
	.AddKeyword "<b>class</b>","<r>a set or category of things having some property or attribute in common and differentiated from others by kind, type, or qua" & _
"lity."
	.AllowInlineToolTip = 513 ' AllowInlineToolTipEnum.exInlineToolTipWordWrap Or AllowInlineToolTipEnum.exInlineToolTip
	.Background(159) = RGB(128,128,128)
	.Background(158) = RGB(240,240,240)
	.CaretLine = 6
	.Background(160) = RGB(255,40,0)
	.Background(161) = RGB(0,0,1)
	.TempInlineToolTip = "<br><c><font ;12>This is a bit of text that's shown temporarily only. <br><c>Now, click the <off -4><b>class</b></off> keyword," & _
" in the top...<br>"
	.Refresh 
End With

VB6

With Edit1
	.LineNumberWidth = -1
	.LineNumberBackColor = RGB(240,240,240)
	.AddKeyword "<b>class</b>","<r>a set or category of things having some property or attribute in common and differentiated from others by kind, type, or qua" & _
"lity."
	.AllowInlineToolTip = AllowInlineToolTipEnum.exInlineToolTipWordWrap Or AllowInlineToolTipEnum.exInlineToolTip
	.Background(exInlineToolTipForeColor) = RGB(128,128,128)
	.Background(exInlineToolTipBackColor) = RGB(240,240,240)
	.CaretLine = 6
	.Background(exTempInlineToolTipBackColor) = RGB(255,40,0)
	.Background(exTempInlineToolTipForeColor) = RGB(0,0,1)
	.TempInlineToolTip = "<br><c><font ;12>This is a bit of text that's shown temporarily only. <br><c>Now, click the <off -4><b>class</b></off> keyword," & _
" in the top...<br>"
	.Refresh 
End With

VB.NET

With Exedit1
	.LineNumberWidth = -1
	.LineNumberBackColor = Color.FromArgb(240,240,240)
	.AddKeyword("<b>class</b>","<r>a set or category of things having some property or attribute in common and differentiated from others by kind, type, or qua" & _
"lity.")
	.AllowInlineToolTip = exontrol.EXEDITLib.AllowInlineToolTipEnum.exInlineToolTipWordWrap Or exontrol.EXEDITLib.AllowInlineToolTipEnum.exInlineToolTip
	.set_Background(exontrol.EXEDITLib.BackgroundPartEnum.exInlineToolTipForeColor,Color.FromArgb(128,128,128))
	.set_Background(exontrol.EXEDITLib.BackgroundPartEnum.exInlineToolTipBackColor,Color.FromArgb(240,240,240))
	.CaretLine = 6
	.set_Background(exontrol.EXEDITLib.BackgroundPartEnum.exTempInlineToolTipBackColor,Color.FromArgb(255,40,0))
	.set_Background(exontrol.EXEDITLib.BackgroundPartEnum.exTempInlineToolTipForeColor,Color.FromArgb(0,0,1))
	.TempInlineToolTip = "<br><c><font ;12>This is a bit of text that's shown temporarily only. <br><c>Now, click the <off -4><b>class</b></off> keyword," & _
" in the top...<br>"
	.Refresh()
End With

VB.NET for /COM

With AxEdit1
	.LineNumberWidth = -1
	.LineNumberBackColor = RGB(240,240,240)
	.AddKeyword("<b>class</b>","<r>a set or category of things having some property or attribute in common and differentiated from others by kind, type, or qua" & _
"lity.")
	.AllowInlineToolTip = EXEDITLib.AllowInlineToolTipEnum.exInlineToolTipWordWrap Or EXEDITLib.AllowInlineToolTipEnum.exInlineToolTip
	.set_Background(EXEDITLib.BackgroundPartEnum.exInlineToolTipForeColor,8421504)
	.set_Background(EXEDITLib.BackgroundPartEnum.exInlineToolTipBackColor,15790320)
	.CaretLine = 6
	.set_Background(EXEDITLib.BackgroundPartEnum.exTempInlineToolTipBackColor,10495)
	.set_Background(EXEDITLib.BackgroundPartEnum.exTempInlineToolTipForeColor,65536)
	.TempInlineToolTip = "<br><c><font ;12>This is a bit of text that's shown temporarily only. <br><c>Now, click the <off -4><b>class</b></off> keyword," & _
" in the top...<br>"
	.Refresh()
End With

C++

/*
	Copy and paste the following directives to your header file as
	it defines the namespace 'EXEDITLib' for the library: 'ExEdit 1.0 Control Library'

	#import <ExEdit.dll>
	using namespace EXEDITLib;
*/
EXEDITLib::IEditPtr spEdit1 = GetDlgItem(IDC_EDIT1)->GetControlUnknown();
spEdit1->PutLineNumberWidth(-1);
spEdit1->PutLineNumberBackColor(RGB(240,240,240));
spEdit1->AddKeyword(L"<b>class</b>",_bstr_t("<r>a set or category of things having some property or attribute in common and differentiated from others by kind, type, or qua") +
"lity.",vtMissing,vtMissing);
spEdit1->PutAllowInlineToolTip(EXEDITLib::AllowInlineToolTipEnum(EXEDITLib::exInlineToolTipWordWrap | EXEDITLib::exInlineToolTip));
spEdit1->PutBackground(EXEDITLib::exInlineToolTipForeColor,RGB(128,128,128));
spEdit1->PutBackground(EXEDITLib::exInlineToolTipBackColor,RGB(240,240,240));
spEdit1->PutCaretLine(6);
spEdit1->PutBackground(EXEDITLib::exTempInlineToolTipBackColor,RGB(255,40,0));
spEdit1->PutBackground(EXEDITLib::exTempInlineToolTipForeColor,RGB(0,0,1));
spEdit1->PutTempInlineToolTip(_bstr_t("<br><c><font ;12>This is a bit of text that's shown temporarily only. <br><c>Now, click the <off -4><b>class</b></off> keyword,") +
" in the top...<br>");
spEdit1->Refresh();

C++ Builder

Edit1->LineNumberWidth = -1;
Edit1->LineNumberBackColor = RGB(240,240,240);
Edit1->AddKeyword(L"<b>class</b>",TVariant(String("<r>a set or category of things having some property or attribute in common and differentiated from others by kind, type, or qua") +
"lity."),TNoParam(),TNoParam());
Edit1->AllowInlineToolTip = Exeditlib_tlb::AllowInlineToolTipEnum::exInlineToolTipWordWrap | Exeditlib_tlb::AllowInlineToolTipEnum::exInlineToolTip;
Edit1->Background[Exeditlib_tlb::BackgroundPartEnum::exInlineToolTipForeColor] = RGB(128,128,128);
Edit1->Background[Exeditlib_tlb::BackgroundPartEnum::exInlineToolTipBackColor] = RGB(240,240,240);
Edit1->CaretLine = 6;
Edit1->Background[Exeditlib_tlb::BackgroundPartEnum::exTempInlineToolTipBackColor] = RGB(255,40,0);
Edit1->Background[Exeditlib_tlb::BackgroundPartEnum::exTempInlineToolTipForeColor] = RGB(0,0,1);
Edit1->TempInlineToolTip = TVariant(String("<br><c><font ;12>This is a bit of text that's shown temporarily only. <br><c>Now, click the <off -4><b>class</b></off> keyword,") +
" in the top...<br>");
Edit1->Refresh();

C#

exedit1.LineNumberWidth = -1;
exedit1.LineNumberBackColor = Color.FromArgb(240,240,240);
exedit1.AddKeyword("<b>class</b>","<r>a set or category of things having some property or attribute in common and differentiated from others by kind, type, or qua" +
"lity.",null,null);
exedit1.AllowInlineToolTip = exontrol.EXEDITLib.AllowInlineToolTipEnum.exInlineToolTipWordWrap | exontrol.EXEDITLib.AllowInlineToolTipEnum.exInlineToolTip;
exedit1.set_Background(exontrol.EXEDITLib.BackgroundPartEnum.exInlineToolTipForeColor,Color.FromArgb(128,128,128));
exedit1.set_Background(exontrol.EXEDITLib.BackgroundPartEnum.exInlineToolTipBackColor,Color.FromArgb(240,240,240));
exedit1.CaretLine = 6;
exedit1.set_Background(exontrol.EXEDITLib.BackgroundPartEnum.exTempInlineToolTipBackColor,Color.FromArgb(255,40,0));
exedit1.set_Background(exontrol.EXEDITLib.BackgroundPartEnum.exTempInlineToolTipForeColor,Color.FromArgb(0,0,1));
exedit1.TempInlineToolTip = "<br><c><font ;12>This is a bit of text that's shown temporarily only. <br><c>Now, click the <off -4><b>class</b></off> keyword," +
" in the top...<br>";
exedit1.Refresh();

JScript/JavaScript

<BODY onload="Init()">
<OBJECT CLASSID="clsid:39136531-DD0F-4281-B445-E36FC2CDDBC5" id="Edit1"></OBJECT>

<SCRIPT LANGUAGE="JScript">
function Init()
{
	Edit1.LineNumberWidth = -1;
	Edit1.LineNumberBackColor = 15790320;
	Edit1.AddKeyword("<b>class</b>","<r>a set or category of things having some property or attribute in common and differentiated from others by kind, type, or qua" +
	"lity.",null,null);
	Edit1.AllowInlineToolTip = 513;
	Edit1.Background(159) = 8421504;
	Edit1.Background(158) = 15790320;
	Edit1.CaretLine = 6;
	Edit1.Background(160) = 10495;
	Edit1.Background(161) = 65536;
	Edit1.TempInlineToolTip = "<br><c><font ;12>This is a bit of text that's shown temporarily only. <br><c>Now, click the <off -4><b>class</b></off> keyword," +
	" in the top...<br>";
	Edit1.Refresh();
}
</SCRIPT>
</BODY>

VBScript

<BODY onload="Init()">
<OBJECT CLASSID="clsid:39136531-DD0F-4281-B445-E36FC2CDDBC5" id="Edit1"></OBJECT>

<SCRIPT LANGUAGE="VBScript">
Function Init()
	With Edit1
		.LineNumberWidth = -1
		.LineNumberBackColor = RGB(240,240,240)
		.AddKeyword "<b>class</b>","<r>a set or category of things having some property or attribute in common and differentiated from others by kind, type, or qua" & _
	"lity."
		.AllowInlineToolTip = 513 ' AllowInlineToolTipEnum.exInlineToolTipWordWrap Or AllowInlineToolTipEnum.exInlineToolTip
		.Background(159) = RGB(128,128,128)
		.Background(158) = RGB(240,240,240)
		.CaretLine = 6
		.Background(160) = RGB(255,40,0)
		.Background(161) = RGB(0,0,1)
		.TempInlineToolTip = "<br><c><font ;12>This is a bit of text that's shown temporarily only. <br><c>Now, click the <off -4><b>class</b></off> keyword," & _
	" in the top...<br>"
		.Refresh 
	End With
End Function
</SCRIPT>
</BODY>

C# for /COM

axEdit1.LineNumberWidth = -1;
axEdit1.LineNumberBackColor = Color.FromArgb(240,240,240);
axEdit1.AddKeyword("<b>class</b>","<r>a set or category of things having some property or attribute in common and differentiated from others by kind, type, or qua" +
"lity.",null,null);
axEdit1.AllowInlineToolTip = EXEDITLib.AllowInlineToolTipEnum.exInlineToolTipWordWrap | EXEDITLib.AllowInlineToolTipEnum.exInlineToolTip;
axEdit1.set_Background(EXEDITLib.BackgroundPartEnum.exInlineToolTipForeColor,(uint)ColorTranslator.ToWin32(Color.FromArgb(128,128,128)));
axEdit1.set_Background(EXEDITLib.BackgroundPartEnum.exInlineToolTipBackColor,(uint)ColorTranslator.ToWin32(Color.FromArgb(240,240,240)));
axEdit1.CaretLine = 6;
axEdit1.set_Background(EXEDITLib.BackgroundPartEnum.exTempInlineToolTipBackColor,(uint)ColorTranslator.ToWin32(Color.FromArgb(255,40,0)));
axEdit1.set_Background(EXEDITLib.BackgroundPartEnum.exTempInlineToolTipForeColor,(uint)ColorTranslator.ToWin32(Color.FromArgb(0,0,1)));
axEdit1.TempInlineToolTip = "<br><c><font ;12>This is a bit of text that's shown temporarily only. <br><c>Now, click the <off -4><b>class</b></off> keyword," +
" in the top...<br>";
axEdit1.Refresh();

X++ (Dynamics Ax 2009)

public void init()
{
	str var_s,var_s1;
	;

	super();

	exedit1.LineNumberWidth(-1);
	exedit1.LineNumberBackColor(WinApi::RGB2int(240,240,240));
	var_s = "<r>a set or category of things having some property or attribute in common and differentiated from others by kind, type, or qual";
	var_s = var_s + "ity.";
	exedit1.AddKeyword("<b>class</b>",COMVariant::createFromStr(var_s));
	exedit1.AllowInlineToolTip(513/*exInlineToolTipWordWrap | exInlineToolTip*/);
	exedit1.Background(159/*exInlineToolTipForeColor*/,WinApi::RGB2int(128,128,128));
	exedit1.Background(158/*exInlineToolTipBackColor*/,WinApi::RGB2int(240,240,240));
	exedit1.CaretLine(6);
	exedit1.Background(160/*exTempInlineToolTipBackColor*/,WinApi::RGB2int(255,40,0));
	exedit1.Background(161/*exTempInlineToolTipForeColor*/,WinApi::RGB2int(0,0,1));
	var_s1 = "<br><c><font ;12>This is a bit of text that's shown temporarily only. <br><c>Now, click the <off -4><b>class</b></off> keyword, ";
	var_s1 = var_s1 + "in the top...<br>";
	exedit1.TempInlineToolTip(var_s1);
	exedit1.Refresh();
}

Delphi 8 (.NET only)

with AxEdit1 do
begin
	LineNumberWidth := -1;
	LineNumberBackColor := Color.FromArgb(240,240,240);
	AddKeyword('<b>class</b>','<r>a set or category of things having some property or attribute in common and differentiated from others by kind, type, or qual' + 
	'ity.',Nil,Nil);
	AllowInlineToolTip := Integer(EXEDITLib.AllowInlineToolTipEnum.exInlineToolTipWordWrap) Or Integer(EXEDITLib.AllowInlineToolTipEnum.exInlineToolTip);
	set_Background(EXEDITLib.BackgroundPartEnum.exInlineToolTipForeColor,$808080);
	set_Background(EXEDITLib.BackgroundPartEnum.exInlineToolTipBackColor,$f0f0f0);
	CaretLine := 6;
	set_Background(EXEDITLib.BackgroundPartEnum.exTempInlineToolTipBackColor,$28ff);
	set_Background(EXEDITLib.BackgroundPartEnum.exTempInlineToolTipForeColor,$10000);
	TempInlineToolTip := '<br><c><font ;12>This is a bit of text that''s shown temporarily only. <br><c>Now, click the <off -4><b>class</b></off> keyword, ' + 
	'in the top...<br>';
	Refresh();
end

Delphi (standard)

with Edit1 do
begin
	LineNumberWidth := -1;
	LineNumberBackColor := RGB(240,240,240);
	AddKeyword('<b>class</b>','<r>a set or category of things having some property or attribute in common and differentiated from others by kind, type, or qual' + 
	'ity.',Null,Null);
	AllowInlineToolTip := Integer(EXEDITLib_TLB.exInlineToolTipWordWrap) Or Integer(EXEDITLib_TLB.exInlineToolTip);
	Background[EXEDITLib_TLB.exInlineToolTipForeColor] := $808080;
	Background[EXEDITLib_TLB.exInlineToolTipBackColor] := $f0f0f0;
	CaretLine := 6;
	Background[EXEDITLib_TLB.exTempInlineToolTipBackColor] := $28ff;
	Background[EXEDITLib_TLB.exTempInlineToolTipForeColor] := $10000;
	TempInlineToolTip := '<br><c><font ;12>This is a bit of text that''s shown temporarily only. <br><c>Now, click the <off -4><b>class</b></off> keyword, ' + 
	'in the top...<br>';
	Refresh();
end

VFP

with thisform.Edit1
	.LineNumberWidth = -1
	.LineNumberBackColor = RGB(240,240,240)
	var_s = "<r>a set or category of things having some property or attribute in common and differentiated from others by kind, type, or qual"
	var_s = var_s + "ity."
	.AddKeyword("<b>class</b>",var_s)
	.AllowInlineToolTip = 513 && AllowInlineToolTipEnum.exInlineToolTipWordWrap Or AllowInlineToolTipEnum.exInlineToolTip
	.Object.Background(159) = RGB(128,128,128)
	.Object.Background(158) = RGB(240,240,240)
	.CaretLine = 6
	.Object.Background(160) = RGB(255,40,0)
	.Object.Background(161) = RGB(0,0,1)
	var_s1 = "<br><c><font ;12>This is a bit of text that's shown temporarily only. <br><c>Now, click the <off -4><b>class</b></off> keyword, "
	var_s1 = var_s1 + "in the top...<br>"
	.TempInlineToolTip = var_s1
	.Refresh
endwith

dBASE Plus

local oEdit

oEdit = form.EXEDITACTIVEXCONTROL1.nativeObject
oEdit.LineNumberWidth = -1
oEdit.LineNumberBackColor = 0xf0f0f0
oEdit.AddKeyword("<b>class</b>","<r>a set or category of things having some property or attribute in common and differentiated from others by kind, type, or quality.")
oEdit.AllowInlineToolTip = 513 /*exInlineToolTipWordWrap | exInlineToolTip*/
oEdit.Template = [Background(159) = 8421504] // oEdit.Background(159) = 0x808080
oEdit.Template = [Background(158) = 15790320] // oEdit.Background(158) = 0xf0f0f0
oEdit.CaretLine = 6
oEdit.Template = [Background(160) = 10495] // oEdit.Background(160) = 0x28ff
oEdit.Template = [Background(161) = 65536] // oEdit.Background(161) = 0x10000
oEdit.TempInlineToolTip = "<br><c><font ;12>This is a bit of text that's shown temporarily only. <br><c>Now, click the <off -4><b>class</b></off> keyword, in the top...<br>"
oEdit.Refresh()

XBasic (Alpha Five)

Dim oEdit as P

oEdit = topparent:CONTROL_ACTIVEX1.activex
oEdit.LineNumberWidth = -1
oEdit.LineNumberBackColor = 15790320
oEdit.AddKeyword("<b>class</b>","<r>a set or category of things having some property or attribute in common and differentiated from others by kind, type, or quality.")
oEdit.AllowInlineToolTip = 513 'exInlineToolTipWordWrap + exInlineToolTip
oEdit.Template = "Background(159) = 8421504" // oEdit.Background(159) = 8421504
oEdit.Template = "Background(158) = 15790320" // oEdit.Background(158) = 15790320
oEdit.CaretLine = 6
oEdit.Template = "Background(160) = 10495" // oEdit.Background(160) = 10495
oEdit.Template = "Background(161) = 65536" // oEdit.Background(161) = 65536
oEdit.TempInlineToolTip = "<br><c><font ;12>This is a bit of text that's shown temporarily only. <br><c>Now, click the <off -4><b>class</b></off> keyword, in the top...<br>"
oEdit.Refresh()

Visual Objects


oDCOCX_Exontrol1:LineNumberWidth := -1
oDCOCX_Exontrol1:LineNumberBackColor := RGB(240,240,240)
oDCOCX_Exontrol1:AddKeyword("<b>class</b>","<r>a set or category of things having some property or attribute in common and differentiated from others by kind, type, or quality.",nil,nil)
oDCOCX_Exontrol1:AllowInlineToolTip := exInlineToolTipWordWrap | exInlineToolTip
oDCOCX_Exontrol1:[Background,exInlineToolTipForeColor] := RGB(128,128,128)
oDCOCX_Exontrol1:[Background,exInlineToolTipBackColor] := RGB(240,240,240)
oDCOCX_Exontrol1:CaretLine := 6
oDCOCX_Exontrol1:[Background,exTempInlineToolTipBackColor] := RGB(255,40,0)
oDCOCX_Exontrol1:[Background,exTempInlineToolTipForeColor] := RGB(0,0,1)
oDCOCX_Exontrol1:TempInlineToolTip := "<br><c><font ;12>This is a bit of text that's shown temporarily only. <br><c>Now, click the <off -4><b>class</b></off> keyword, in the top...<br>"
oDCOCX_Exontrol1:Refresh()

PowerBuilder

OleObject oEdit

oEdit = ole_1.Object
oEdit.LineNumberWidth = -1
oEdit.LineNumberBackColor = RGB(240,240,240)
oEdit.AddKeyword("<b>class</b>","<r>a set or category of things having some property or attribute in common and differentiated from others by kind, type, or quality.")
oEdit.AllowInlineToolTip = 513 /*exInlineToolTipWordWrap | exInlineToolTip*/
oEdit.Background(159,RGB(128,128,128))
oEdit.Background(158,RGB(240,240,240))
oEdit.CaretLine = 6
oEdit.Background(160,RGB(255,40,0))
oEdit.Background(161,RGB(0,0,1))
oEdit.TempInlineToolTip = "<br><c><font ;12>This is a bit of text that's shown temporarily only. <br><c>Now, click the <off -4><b>class</b></off> keyword, in the top...<br>"
oEdit.Refresh()

Visual DataFlex

Procedure OnCreate
	Forward Send OnCreate
	Set ComLineNumberWidth to -1
	Set ComLineNumberBackColor to (RGB(240,240,240))
	Send ComAddKeyword "<b>class</b>" "<r>a set or category of things having some property or attribute in common and differentiated from others by kind, type, or quality." Nothing Nothing
	Set ComAllowInlineToolTip to (OLEexInlineToolTipWordWrap + OLEexInlineToolTip)
	Set ComBackground OLEexInlineToolTipForeColor to (RGB(128,128,128))
	Set ComBackground OLEexInlineToolTipBackColor to (RGB(240,240,240))
	Set ComCaretLine to 6
	Set ComBackground OLEexTempInlineToolTipBackColor to (RGB(255,40,0))
	Set ComBackground OLEexTempInlineToolTipForeColor to (RGB(0,0,1))
	Set ComTempInlineToolTip to "<br><c><font ;12>This is a bit of text that's shown temporarily only. <br><c>Now, click the <off -4><b>class</b></off> keyword, in the top...<br>"
	Send ComRefresh
End_Procedure

XBase++

#include "AppEvent.ch"
#include "ActiveX.ch"

PROCEDURE Main
 	LOCAL oForm
	LOCAL nEvent := 0, mp1 := NIL, mp2 := NIL, oXbp := NIL
	LOCAL oEdit

	oForm := XbpDialog():new( AppDesktop() )
	oForm:drawingArea:clipChildren := .T.
	oForm:create( ,,{100,100}, {640,480},, .F. )
	oForm:close  := {|| PostAppEvent( xbeP_Quit )}

	oEdit := XbpActiveXControl():new( oForm:drawingArea )
	oEdit:CLSID  := "Exontrol.Edit.1" /*{39136531-DD0F-4281-B445-E36FC2CDDBC5}*/
	oEdit:create(,, {10,60},{610,370} )

		oEdit:LineNumberWidth := -1
		oEdit:SetProperty("LineNumberBackColor",AutomationTranslateColor( GraMakeRGBColor  ( { 240,240,240 } )  , .F. ))
		oEdit:AddKeyword("<b>class</b>","<r>a set or category of things having some property or attribute in common and differentiated from others by kind, type, or quality.")
		oEdit:AllowInlineToolTip := 513/*exInlineToolTipWordWrap+exInlineToolTip*/
		oEdit:SetProperty("Background",159/*exInlineToolTipForeColor*/,AutomationTranslateColor( GraMakeRGBColor  ( { 128,128,128 } )  , .F. ))
		oEdit:SetProperty("Background",158/*exInlineToolTipBackColor*/,AutomationTranslateColor( GraMakeRGBColor  ( { 240,240,240 } )  , .F. ))
		oEdit:CaretLine := 6
		oEdit:SetProperty("Background",160/*exTempInlineToolTipBackColor*/,AutomationTranslateColor( GraMakeRGBColor  ( { 255,40,0 } )  , .F. ))
		oEdit:SetProperty("Background",161/*exTempInlineToolTipForeColor*/,AutomationTranslateColor( GraMakeRGBColor  ( { 0,0,1 } )  , .F. ))
		oEdit:TempInlineToolTip := "<br><c><font ;12>This is a bit of text that's shown temporarily only. <br><c>Now, click the <off -4><b>class</b></off> keyword, in the top...<br>"
		oEdit:Refresh()

	oForm:Show()
	DO WHILE nEvent != xbeP_Quit
		nEvent := AppEvent( @mp1, @mp2, @oXbp )
		oXbp:handleEvent( nEvent, mp1, mp2 )
	ENDDO 
RETURN