Gantt.HotForeColor Property (ExGantt)

By default, the HotForeColor property is 0, which means that the HotForeColor property has no effect. Use the HotForeColor property on a non-zero value to highlight the item from the cursor. The HotBackColor property specifies the background color to highlight the item from the cursor. The ItemFromPoint property gets the item from the cursor. The SelForeColor property specifies the selection foreground color.

The following sample displays a different background color mouse passes over an item.

VBA

With Gantt1
	.BeginUpdate 
	.Columns.Add "Def"
	.HotBackColor = RGB(0,0,128)
	.HotForeColor = RGB(255,255,255)
	With .Items
		.AddItem "Item A"
		.AddItem "Item B"
		.AddItem "Item C"
	End With
	.EndUpdate 
End With

VB6

With Gantt1
	.BeginUpdate 
	.Columns.Add "Def"
	.HotBackColor = RGB(0,0,128)
	.HotForeColor = RGB(255,255,255)
	With .Items
		.AddItem "Item A"
		.AddItem "Item B"
		.AddItem "Item C"
	End With
	.EndUpdate 
End With

VB.NET

With Exgantt1
	.BeginUpdate()
	.Columns.Add("Def")
	.HotBackColor = Color.FromArgb(0,0,128)
	.HotForeColor = Color.FromArgb(255,255,255)
	With .Items
		.AddItem("Item A")
		.AddItem("Item B")
		.AddItem("Item C")
	End With
	.EndUpdate()
End With

VB.NET for /COM

With AxGantt1
	.BeginUpdate()
	.Columns.Add("Def")
	.HotBackColor = RGB(0,0,128)
	.HotForeColor = RGB(255,255,255)
	With .Items
		.AddItem("Item A")
		.AddItem("Item B")
		.AddItem("Item C")
	End With
	.EndUpdate()
End With

C++

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

	#import <ExGantt.dll>
	using namespace EXGANTTLib;
*/
EXGANTTLib::IGanttPtr spGantt1 = GetDlgItem(IDC_GANTT1)->GetControlUnknown();
spGantt1->BeginUpdate();
spGantt1->GetColumns()->Add(L"Def");
spGantt1->PutHotBackColor(RGB(0,0,128));
spGantt1->PutHotForeColor(RGB(255,255,255));
EXGANTTLib::IItemsPtr var_Items = spGantt1->GetItems();
	var_Items->AddItem("Item A");
	var_Items->AddItem("Item B");
	var_Items->AddItem("Item C");
spGantt1->EndUpdate();

C++ Builder

Gantt1->BeginUpdate();
Gantt1->Columns->Add(L"Def");
Gantt1->HotBackColor = RGB(0,0,128);
Gantt1->HotForeColor = RGB(255,255,255);
Exganttlib_tlb::IItemsPtr var_Items = Gantt1->Items;
	var_Items->AddItem(TVariant("Item A"));
	var_Items->AddItem(TVariant("Item B"));
	var_Items->AddItem(TVariant("Item C"));
Gantt1->EndUpdate();

exgantt1.BeginUpdate();
exgantt1.Columns.Add("Def");
exgantt1.HotBackColor = Color.FromArgb(0,0,128);
exgantt1.HotForeColor = Color.FromArgb(255,255,255);
exontrol.EXGANTTLib.Items var_Items = exgantt1.Items;
	var_Items.AddItem("Item A");
	var_Items.AddItem("Item B");
	var_Items.AddItem("Item C");
exgantt1.EndUpdate();

JavaScript

<OBJECT classid="clsid:CD481F4D-2D25-4759-803F-752C568F53B7" id="Gantt1"></OBJECT>

<SCRIPT LANGUAGE="JScript">
	Gantt1.BeginUpdate()

	Gantt1.Columns.Add("Def")

	Gantt1.HotBackColor = 8388608

	Gantt1.HotForeColor = 16777215

	var var_Items = Gantt1.Items

		var_Items.AddItem("Item A")

		var_Items.AddItem("Item B")

		var_Items.AddItem("Item C")

	Gantt1.EndUpdate()

</SCRIPT>

C# for /COM

axGantt1.BeginUpdate();
axGantt1.Columns.Add("Def");
axGantt1.HotBackColor = Color.FromArgb(0,0,128);
axGantt1.HotForeColor = Color.FromArgb(255,255,255);
EXGANTTLib.Items var_Items = axGantt1.Items;
	var_Items.AddItem("Item A");
	var_Items.AddItem("Item B");
	var_Items.AddItem("Item C");
axGantt1.EndUpdate();

X++ (Dynamics Ax 2009)

public void init()
{
	COM com_Items

	anytype var_Items




	super()


	exgantt1.BeginUpdate()

	exgantt1.Columns().Add("Def")

	exgantt1.HotBackColor(WinApi::RGB2int(0,0,128))

	exgantt1.HotForeColor(WinApi::RGB2int(255,255,255))

	var_Items = exgantt1.Items()
	 com_Items = var_Items

		com_Items.AddItem("Item A")

		com_Items.AddItem("Item B")

		com_Items.AddItem("Item C")

	exgantt1.EndUpdate()

}

VFP

with thisform.Gantt1
	.BeginUpdate
	.Columns.Add("Def")
	.HotBackColor = RGB(0,0,128)
	.HotForeColor = RGB(255,255,255)
	with .Items
		.AddItem("Item A")
		.AddItem("Item B")
		.AddItem("Item C")
	endwith
	.EndUpdate
endwith

dBASE Plus

local oGantt,var_Items

oGantt = form.Activex1.nativeObject
oGantt.BeginUpdate()
oGantt.Columns.Add("Def")
oGantt.HotBackColor = 0x800000
oGantt.HotForeColor = 0xffffff
var_Items = oGantt.Items
	var_Items.AddItem("Item A")
	var_Items.AddItem("Item B")
	var_Items.AddItem("Item C")
oGantt.EndUpdate()

XBasic (Alpha Five)

Dim oGantt as P
Dim var_Items as P

oGantt = topparent:CONTROL_ACTIVEX1.activex
oGantt.BeginUpdate()
oGantt.Columns.Add("Def")
oGantt.HotBackColor = 8388608
oGantt.HotForeColor = 16777215
var_Items = oGantt.Items
	var_Items.AddItem("Item A")
	var_Items.AddItem("Item B")
	var_Items.AddItem("Item C")
oGantt.EndUpdate()

Delphi 8 (.NET only)

with AxGantt1 do
begin
	BeginUpdate();
	Columns.Add('Def');
	HotBackColor := Color.FromArgb(0,0,128);
	HotForeColor := Color.FromArgb(255,255,255);
	with Items do
	begin
		AddItem('Item A');
		AddItem('Item B');
		AddItem('Item C');
	end;
	EndUpdate();
end

Delphi (standard)

with Gantt1 do
begin
	BeginUpdate();
	Columns.Add('Def');
	HotBackColor := RGB(0,0,128);
	HotForeColor := RGB(255,255,255);
	with Items do
	begin
		AddItem('Item A');
		AddItem('Item B');
		AddItem('Item C');
	end;
	EndUpdate();
end

Visual Objects

local var_Items as IItems

oDCOCX_Exontrol1:BeginUpdate()
oDCOCX_Exontrol1:Columns:Add("Def")
oDCOCX_Exontrol1:HotBackColor := RGB(0,0,128)
oDCOCX_Exontrol1:HotForeColor := RGB(255,255,255)
var_Items := oDCOCX_Exontrol1:Items
	var_Items:AddItem("Item A")
	var_Items:AddItem("Item B")
	var_Items:AddItem("Item C")
oDCOCX_Exontrol1:EndUpdate()

PowerBuilder

OleObject oGantt,var_Items

oGantt = ole_1.Object
oGantt.BeginUpdate()
oGantt.Columns.Add("Def")
oGantt.HotBackColor = RGB(0,0,128)
oGantt.HotForeColor = RGB(255,255,255)
var_Items = oGantt.Items
	var_Items.AddItem("Item A")
	var_Items.AddItem("Item B")
	var_Items.AddItem("Item C")
oGantt.EndUpdate()

		Type	Description
		Color	A color expression that indicates the foreground color for item from the cursor ( hovering the item ).