property Expression.FormatStrings as String
Specifies the HTML format that's applied to strings.

TypeDescription
String A string expression that defines the HTML expression being used when control displays strings. 
By default, the FormatStrings property is "<fgcolor=800000> </fgcolor>". By default the strings get colored in red. Use the FormatStrings to define the appearance for the strings in the control. If the FormatStrings property is empty no format is applied to strings in the control. 

You can use any of the following properties to format:

The FormatStrings supports the following HTML tags: 

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

VBA (MS Access, Excell...)

With Expression1
	.FormatStrings = "<b> </b>"
	.Expression = "value + ""aka"""
End With

VB6

With Expression1
	.FormatStrings = "<b> </b>"
	.Expression = "value + ""aka"""
End With

VB.NET

With Expression1
	.FormatStrings = "<b> </b>"
	.Expression = "value + ""aka"""
End With

VB.NET for /COM

With AxExpression1
	.FormatStrings = "<b> </b>"
	.Expression = "value + ""aka"""
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->PutFormatStrings(L"<b> </b>");
spExpression1->PutExpression(L"value + \"aka\"");

C++ Builder

Expression1->FormatStrings = L"<b> </b>";
Expression1->Expression = L"value + \"aka\"";

C#

expression1.FormatStrings = "<b> </b>";
expression1.Expression = "value + \"aka\"";

JScript/JavaScript

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

<SCRIPT LANGUAGE="JScript">
function Init()
{
	Expression1.FormatStrings = "<b> </b>";
	Expression1.Expression = "value + \"aka\"";
}
</SCRIPT>
</BODY>

VBScript

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

<SCRIPT LANGUAGE="VBScript">
Function Init()
	With Expression1
		.FormatStrings = "<b> </b>"
		.Expression = "value + ""aka"""
	End With
End Function
</SCRIPT>
</BODY>

C# for /COM

axExpression1.FormatStrings = "<b> </b>";
axExpression1.Expression = "value + \"aka\"";

X++ (Dynamics Ax 2009)

public void init()
{
	;

	super();

	expression1.FormatStrings("<b> </b>");
	expression1.Expression("value + \"aka\"");
}

Delphi 8 (.NET only)

with AxExpression1 do
begin
	FormatStrings := '<b> </b>';
	Expression := 'value + "aka"';
end

Delphi (standard)

with Expression1 do
begin
	FormatStrings := '<b> </b>';
	Expression := 'value + "aka"';
end

VFP

with thisform.Expression1
	.FormatStrings = "<b> </b>"
	.Expression = "value + "+chr(34)+"aka"+chr(34)+""
endwith

dBASE Plus

local oExpression

oExpression = form.EXPRESSIONACTIVEXCONTROL1.nativeObject
oExpression.FormatStrings = "<b> </b>"
oExpression.Expression = "value + " + ["] + "aka" + ["] + ""

XBasic (Alpha Five)

Dim oExpression as P

oExpression = topparent:CONTROL_ACTIVEX1.activex
oExpression.FormatStrings = "<b> </b>"
oExpression.Expression = "value + \"aka\""

Visual Objects


oDCOCX_Exontrol1:FormatStrings := "<b> </b>"
oDCOCX_Exontrol1:Expression := "value + " + CHR(34) + "aka" + CHR(34) + ""

PowerBuilder

OleObject oExpression

oExpression = ole_1.Object
oExpression.FormatStrings = "<b> </b>"
oExpression.Expression = "value + " + CHAR(34) + "aka" + CHAR(34) + ""

Visual DataFlex

Procedure OnCreate
	Forward Send OnCreate
	Set ComFormatStrings to "<b> </b>"
	Set ComExpression to "value + "aka""
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:FormatStrings := "<b> </b>"
		oExpression:Expression := "value + " + CHR(34) + "aka" + CHR(34) + ""

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