Expression.FormatResult Property (Expression)

By default, the FormatResult property is "<fgcolor=000080> </fgcolor>". By default the numbers get colored in blue. Use the FormatNumbers to define the appearance for the numbers in the control. If the FormatNumbers property is empty no format is applied to numbers in the control.

You can use any of the following properties to format:

numbers, FormatNumbers property, like 1.00
dates, FormatDates property, like #1/1/2001#
strings, FormatStrings property, like "string"
result, FormatResult property

The FormatNumbers supports the following HTML tags:

 bold bolds a part of the caption.
 underline specifies that the portion should appear as underlined.
<s> ~~strikeout~~ </s> specifies that the portion should appear as strikeout.
 italic specifies that the portion should appear as italic.
<fgcolor=FF0000>fgcolor</fgcolor> changes the foreground color for a portion.
<bgcolor=FF0000>bgcolor</bgcolor> changes the background color for a portion.
text displays portions of text with a different font and/or different size. For instance, the bit draws the bit text using the Tahoma font, on size 12 pt. If the name of the font is missing, and instead size is present, the current font is used with a different size. For instance, bit displays the bit text using the current font, but with a different size.
& glyph characters as &amp ( & ), &lt ( < ), &gt ( > ), &qout ( " ), &#number, For instance, the &#8364 displays the EUR character, in UNICODE configuration. The & ampersand is only recognized as markup when it is followed by a known letter or a # character and a digit. For instance if you want to display bold in HTML caption you can use bold

The following sample shows how you can show the result in bold:

VBA (MS Access, Excell...)

With Expression1
	.FormatResult = "<b> </b>"
	.Expression = "currency(value)"
	.AllowSplitter = 2
	.SplitPaneHeight = 196
End With

VB6

With Expression1
	.FormatResult = "<b> </b>"
	.Expression = "currency(value)"
	.AllowSplitter = exVSplitter
	.SplitPaneHeight = 196
End With

VB.NET

With Expression1
	.FormatResult = "<b> </b>"
	.Expression = "currency(value)"
	.AllowSplitter = exontrol.EXPRESSIONLib.SplitterEnum.exVSplitter
	.SplitPaneHeight = 196
End With

VB.NET for /COM

With AxExpression1
	.FormatResult = "<b> </b>"
	.Expression = "currency(value)"
	.AllowSplitter = EXPRESSIONLib.SplitterEnum.exVSplitter
	.SplitPaneHeight = 196
End With

C++

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

	#import <Expression.dll>
	using namespace EXPRESSIONLib;
*/
EXPRESSIONLib::IExpressionPtr spExpression1 = GetDlgItem(IDC_EXPRESSION1)->GetControlUnknown();
spExpression1->PutFormatResult(L"<b> </b>");
spExpression1->PutExpression(L"currency(value)");
spExpression1->PutAllowSplitter(EXPRESSIONLib::exVSplitter);
spExpression1->PutSplitPaneHeight(196);

C++ Builder

Expression1->FormatResult = L"<b> </b>";
Expression1->Expression = L"currency(value)";
Expression1->AllowSplitter = Expressionlib_tlb::SplitterEnum::exVSplitter;
Expression1->SplitPaneHeight = 196;

expression1.FormatResult = "<b> </b>";
expression1.Expression = "currency(value)";
expression1.AllowSplitter = exontrol.EXPRESSIONLib.SplitterEnum.exVSplitter;
expression1.SplitPaneHeight = 196;

JScript/JavaScript

<BODY onload="Init()">
<OBJECT CLASSID="clsid:B33F5489-49AC-4155-98E7-9BBFC57FF019" id="Expression1"></OBJECT>

<SCRIPT LANGUAGE="JScript">
function Init()
{
	Expression1.FormatResult = "<b> </b>";
	Expression1.Expression = "currency(value)";
	Expression1.AllowSplitter = 2;
	Expression1.SplitPaneHeight = 196;
}
</SCRIPT>
</BODY>

VBScript

<BODY onload="Init()">
<OBJECT CLASSID="clsid:B33F5489-49AC-4155-98E7-9BBFC57FF019" id="Expression1"></OBJECT>

<SCRIPT LANGUAGE="VBScript">
Function Init()
	With Expression1
		.FormatResult = "<b> </b>"
		.Expression = "currency(value)"
		.AllowSplitter = 2
		.SplitPaneHeight = 196
	End With
End Function
</SCRIPT>
</BODY>

C# for /COM

axExpression1.FormatResult = "<b> </b>";
axExpression1.Expression = "currency(value)";
axExpression1.AllowSplitter = EXPRESSIONLib.SplitterEnum.exVSplitter;
axExpression1.SplitPaneHeight = 196;

X++ (Dynamics Ax 2009)

public void init()
{
	;

	super();

	expression1.FormatResult("<b> </b>");
	expression1.Expression("currency(value)");
	expression1.AllowSplitter(2/*exVSplitter*/);
	expression1.SplitPaneHeight(196);
}

Delphi 8 (.NET only)

with AxExpression1 do
begin
	FormatResult := '<b> </b>';
	Expression := 'currency(value)';
	AllowSplitter := EXPRESSIONLib.SplitterEnum.exVSplitter;
	SplitPaneHeight := 196;
end

Delphi (standard)

with Expression1 do
begin
	FormatResult := '<b> </b>';
	Expression := 'currency(value)';
	AllowSplitter := EXPRESSIONLib_TLB.exVSplitter;
	SplitPaneHeight := 196;
end

VFP

with thisform.Expression1
	.FormatResult = "<b> </b>"
	.Expression = "currency(value)"
	.AllowSplitter = 2
	.SplitPaneHeight = 196
endwith

dBASE Plus

local oExpression

oExpression = form.EXPRESSIONACTIVEXCONTROL1.nativeObject
oExpression.FormatResult = "<b> </b>"
oExpression.Expression = "currency(value)"
oExpression.AllowSplitter = 2
oExpression.SplitPaneHeight = 196

XBasic (Alpha Five)

Dim oExpression as P

oExpression = topparent:CONTROL_ACTIVEX1.activex
oExpression.FormatResult = "<b> </b>"
oExpression.Expression = "currency(value)"
oExpression.AllowSplitter = 2
oExpression.SplitPaneHeight = 196

Visual Objects


oDCOCX_Exontrol1:FormatResult := "<b> </b>"
oDCOCX_Exontrol1:Expression := "currency(value)"
oDCOCX_Exontrol1:AllowSplitter := exVSplitter
oDCOCX_Exontrol1:SplitPaneHeight := 196

PowerBuilder

OleObject oExpression

oExpression = ole_1.Object
oExpression.FormatResult = "<b> </b>"
oExpression.Expression = "currency(value)"
oExpression.AllowSplitter = 2
oExpression.SplitPaneHeight = 196

Visual DataFlex

Procedure OnCreate
	Forward Send OnCreate
	Set ComFormatResult to "<b> </b>"
	Set ComExpression to "currency(value)"
	Set ComAllowSplitter to OLEexVSplitter
	Set ComSplitPaneHeight to 196
End_Procedure

XBase++

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

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

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

	oExpression := XbpActiveXControl():new( oForm:drawingArea )
	oExpression:CLSID  := "Exontrol.Expression.1" /*{B33F5489-49AC-4155-98E7-9BBFC57FF019}*/
	oExpression:create(,, {10,60},{610,370} )

		oExpression:FormatResult := "<b> </b>"
		oExpression:Expression := "currency(value)"
		oExpression:AllowSplitter := 2/*exVSplitter*/
		oExpression:SplitPaneHeight := 196

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

		Type	Description
		String	A string expression that defines the HTML format to display the result.