How do I bold specified files or folders?

VBA (MS Access, Excell...)

1234567With ExFileView1
	With .FileTypes.Add("*")
		.Folder = True
		.Bold = True
		.Apply 
	End With
End With

VB6

1234567With ExFileView1
	With .FileTypes.Add("*")
		.Folder = True
		.Bold = True
		.Apply 
	End With
End With

VB.NET

1234567With Exfileview1
	With .FileTypes.Add("*")
		.Folder = True
		.Bold = True
		.Apply()
	End With
End With

VB.NET for /COM

1234567With AxExFileView1
	With .FileTypes.Add("*")
		.Folder = True
		.Bold = True
		.Apply()
	End With
End With

C++

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

	#import <ExFileVw.dll>
	using namespace EXFILEVIEWLib;
*/
EXFILEVIEWLib::IExFileViewPtr spExFileView1 = GetDlgItem(IDC_EXFILEVIEW1)->GetControlUnknown();
EXFILEVIEWLib::IFileTypePtr var_FileType = spExFileView1->GetFileTypes()->Add(L"*");
	var_FileType->PutFolder(VARIANT_TRUE);
	var_FileType->PutBold(VARIANT_TRUE);
	var_FileType->Apply();

C++ Builder

1234Exfileviewlib_tlb::IFileTypePtr var_FileType = ExFileView1->FileTypes->Add(L"*");
	var_FileType->Folder = true;
	var_FileType->Bold = true;
	var_FileType->Apply();

C#

1234exontrol.EXFILEVIEWLib.FileType var_FileType = exfileview1.FileTypes.Add("*");
	var_FileType.Folder = true;
	var_FileType.Bold = true;
	var_FileType.Apply();

JavaScript

12345678<OBJECT classid="clsid:F26C97E5-3E86-4CE4-935B-A997AB3DDBE4" id="ExFileView1"></OBJECT>

<SCRIPT LANGUAGE="JScript">
	var var_FileType = ExFileView1.FileTypes.Add("*");
		var_FileType.Folder = true;
		var_FileType.Bold = true;
		var_FileType.Apply();
</SCRIPT>

C# for /COM

1234EXFILEVIEWLib.FileType var_FileType = axExFileView1.FileTypes.Add("*");
	var_FileType.Folder = true;
	var_FileType.Bold = true;
	var_FileType.Apply();

X++ (Dynamics Ax 2009)

12345678910111213public void init()
{
	COM com_FileType;
	anytype var_FileType;
	;

	super();

	var_FileType = COM::createFromObject(exfileview1.FileTypes()).Add("*"); com_FileType = var_FileType;
		com_FileType.Folder(true);
		com_FileType.Bold(true);
		com_FileType.Apply();
}

Delphi 8 (.NET only)

123456789with AxExFileView1 do
begin
	with FileTypes.Add('*') do
	begin
		Folder := True;
		Bold := True;
		Apply();
	end;
end

Delphi (standard)

123456789with ExFileView1 do
begin
	with FileTypes.Add('*') do
	begin
		Folder := True;
		Bold := True;
		Apply();
	end;
end

VFP

1234567with thisform.ExFileView1
	with .FileTypes.Add("*")
		.Folder = .T.
		.Bold = .T.
		.Apply
	endwith
endwith

dBASE Plus

1234567local oExFileView,var_FileType

oExFileView = form.Activex1.nativeObject
var_FileType = oExFileView.FileTypes.Add("*")
	var_FileType.Folder = true
	var_FileType.Bold = true
	var_FileType.Apply()

XBasic (Alpha Five)

12345678Dim oExFileView as P
Dim var_FileType as P

oExFileView = topparent:CONTROL_ACTIVEX1.activex
var_FileType = oExFileView.FileTypes.Add("*")
	var_FileType.Folder = .t.
	var_FileType.Bold = .t.
	var_FileType.Apply()

Visual Objects

123456local var_FileType as IFileType

var_FileType := oDCOCX_Exontrol1:FileTypes:Add("*")
	var_FileType:Folder := true
	var_FileType:Bold := true
	var_FileType:Apply()

PowerBuilder

1234567OleObject oExFileView,var_FileType

oExFileView = ole_1.Object
var_FileType = oExFileView.FileTypes.Add("*")
	var_FileType.Folder = true
	var_FileType.Bold = true
	var_FileType.Apply()

Visual DataFlex

123456789101112131415161718Procedure OnCreate
	Forward Send OnCreate
	Variant voFileTypes
	Get ComFileTypes to voFileTypes
	Handle hoFileTypes
	Get Create (RefClass(cComFileTypes)) to hoFileTypes
	Set pvComObject of hoFileTypes to voFileTypes
		Variant voFileType
		Get ComAdd of hoFileTypes "*" to voFileType
		Handle hoFileType
		Get Create (RefClass(cComFileType)) to hoFileType
		Set pvComObject of hoFileType to voFileType
			Set ComFolder of hoFileType to True
			Set ComBold of hoFileType to True
			Send ComApply of hoFileType
		Send Destroy to hoFileType
	Send Destroy to hoFileTypes
End_Procedure

XBase++

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

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

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

	oExFileView := XbpActiveXControl():new( oForm:drawingArea )
	oExFileView:CLSID  := "Exontrol.ExFileView.1" /*{F26C97E5-3E86-4CE4-935B-A997AB3DDBE4}*/
	oExFileView:create(,, {10,60},{610,370} )

		oFileType := oExFileView:FileTypes():Add("*")
			oFileType:Folder := .T.
			oFileType:Bold := .T.
			oFileType:Apply()

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