668:
Is it possible to change the caption from a column without to remove the column and add it with the new caption
Tree1->Columns->Add(L"ColumnName")->Caption = L"NewName";
Tree1->Columns->Add(L"ColumnName")->HTMLCaption = L"<b>New</b>Name";

667:
FilterBarCaption ALL Keyword ( sample 2, result )

// AddItem event - Occurs after a new Item has been inserted to Items collection.
void __fastcall TForm1::Tree1AddItem(TObject *Sender,Extreelib_tlb::HITEM   Item)
{
	TVariant i = TVariant(Tree1->FormatABC(L"value + 1",Tree1->Items->get_ItemToIndex(Item),TNoParam(),TNoParam()));
	Tree1->Items->set_CellImage(TVariant(Item),TVariant(3),i);
}

Tree1->BeginUpdate();
Tree1->Images(TVariant(String("gBJJgBAIDAAGAAEAAQhYAf8Pf4hh0QihCJo2AEZjQAjEZFEaIEaEEaAIAkcbk0olUrlktl0vmExmUzmk1m03nE5nU7nk9n0/oFBoVDolFo1HpFJpVLplNp1PqFRqVTq") +
"lVq1XrFZrVbrldr1fsFhsVjslls1ntFptVrtltt1vuFxuVzul1u13vF5vV7vl9v1/wGBwWDwmFw2HxGJxWLxmNx0xiFdyOTh8Tf9ZymXx+QytcyNgz8r0OblWjyWds+m" +
"0ka1Vf1ta1+r1mos2xrG2xeZ0+a0W0qOx3GO4NV3WeyvD2XJ5XL5nN51aiw+lfSj0gkUkAEllHanHI5j/cHg8EZf7w8vl8j4f/qfEZeB09/vjLAB30+kZQAP/P5/H6/y" +
"NAOAEAwCjMBwFAEDwJBMDwLBYAP2/8Hv8/gAGAD8LQs9w/nhDY/oygIA="));
Extreelib_tlb::IColumnPtr var_Column = Tree1->Columns->Add(L"Col-1");
	var_Column->DisplayFilterButton = true;
	var_Column->FilterList = Extreelib_tlb::FilterListEnum::exShowExclude | Extreelib_tlb::FilterListEnum::exShowFocusItem | Extreelib_tlb::FilterListEnum::exShowCheckBox | Extreelib_tlb::FilterListEnum::exSortItemsAsc;
Extreelib_tlb::IColumnPtr var_Column1 = Tree1->Columns->Add(L"Col-2");
	var_Column1->DisplayFilterButton = true;
	var_Column1->FilterList = Extreelib_tlb::FilterListEnum::exShowExclude | Extreelib_tlb::FilterListEnum::exShowFocusItem | Extreelib_tlb::FilterListEnum::exShowCheckBox | Extreelib_tlb::FilterListEnum::exSortItemsAsc;
Extreelib_tlb::IColumnPtr var_Column2 = Tree1->Columns->Add(L"Check");
	var_Column2->set_Def(Extreelib_tlb::DefColumnEnum::exCellHasCheckBox,TVariant(true));
	var_Column2->DisplayFilterButton = true;
	var_Column2->DisplayFilterPattern = false;
	var_Column2->FilterType = Extreelib_tlb::FilterTypeEnum::exCheck;
Extreelib_tlb::IColumnPtr var_Column3 = Tree1->Columns->Add(L"Image");
	var_Column3->DisplayFilterButton = true;
	var_Column3->FilterType = Extreelib_tlb::FilterTypeEnum::exImage;
	var_Column3->FilterList = Extreelib_tlb::FilterListEnum::exShowExclude | Extreelib_tlb::FilterListEnum::exShowFocusItem | Extreelib_tlb::FilterListEnum::exShowCheckBox;
Extreelib_tlb::IColumnPtr var_Column4 = Tree1->Columns->Add(L"Pos");
	var_Column4->AllowSizing = false;
	var_Column4->AllowSort = false;
	var_Column4->Width = 32;
	var_Column4->FormatColumn = L"1 apos ``";
	var_Column4->Position = 0;
Extreelib_tlb::IItemsPtr var_Items = Tree1->Items;
	var_Items->set_CellCaption(TVariant(var_Items->AddItem(TVariant("Item A"))),TVariant(1),TVariant("Sub-Item A"));
	long h = var_Items->AddItem(TVariant("Item B"));
	var_Items->set_CellCaption(TVariant(h),TVariant(1),TVariant("Sub-Item B"));
	var_Items->set_CellState(TVariant(h),TVariant(2),1);
	var_Items->set_CellCaption(TVariant(var_Items->AddItem(TVariant("Item C"))),TVariant(1),TVariant("Sub-Item C"));
Tree1->FilterBarFont = (IFontDisp*)(Tree1->Font);
Tree1->Description[Extreelib_tlb::DescriptionTypeEnum::exFilterBarAnd] = PChar(Tree1->FormatABC(L"`<fgcolor=808080> ` + value + ` </fgcolor>`",TVariant(Tree1->Description[Extreelib_tlb::DescriptionTypeEnum::exFilterBarAnd]),TNoParam(),TNoParam()));
Tree1->FilterBarCaption = TVariant(String("(( ( all replace `[<b>` with `<bgcolor=000000><fgcolor=FFFFFF><b> ` replace `</b>]` with ` </b></bgcolor></fgcolor>` replace `[") +
"<s>` with `<bgcolor=C0C0C0><fgcolor=FFFFFF> ` replace `</s>]` with ` </fgcolor></bgcolor>` )  + `<r><fgcolor=808080>` + ( matchi" +
"temcount < 0 ? ( ( len(value) ? `` : `` ) + `<r>` + abs(matchitemcount + 1) + ` result(s)` ) : (`<r><fgcolor=808080>`+ itemcount" +
" + ` item(s)`) )))");
Tree1->FilterBarPromptVisible = Extreelib_tlb::FilterBarVisibleEnum::exFilterBarVisible | Extreelib_tlb::FilterBarVisibleEnum::exFilterBarPromptVisible;
Extreelib_tlb::IColumnPtr var_Column5 = Tree1->Columns->get_Item(TVariant(0));
	var_Column5->FilterType = Extreelib_tlb::FilterTypeEnum::exFilter;
	var_Column5->Filter = L"Item A|Item B";
Tree1->Columns->get_Item(TVariant(2))->Filter = L"1";
Tree1->ApplyFilter();
Tree1->EndUpdate();

666:
FilterBarCaption ALL Keyword ( sample 1 )

// AddItem event - Occurs after a new Item has been inserted to Items collection.
void __fastcall TForm1::Tree1AddItem(TObject *Sender,Extreelib_tlb::HITEM   Item)
{
	TVariant i = TVariant(Tree1->FormatABC(L"value + 1",Tree1->Items->get_ItemToIndex(Item),TNoParam(),TNoParam()));
	Tree1->Items->set_CellImage(TVariant(Item),TVariant(3),i);
}

Tree1->BeginUpdate();
Tree1->Images(TVariant(String("gBJJgBAIDAAGAAEAAQhYAf8Pf4hh0QihCJo2AEZjQAjEZFEaIEaEEaAIAkcbk0olUrlktl0vmExmUzmk1m03nE5nU7nk9n0/oFBoVDolFo1HpFJpVLplNp1PqFRqVTq") +
"lVq1XrFZrVbrldr1fsFhsVjslls1ntFptVrtltt1vuFxuVzul1u13vF5vV7vl9v1/wGBwWDwmFw2HxGJxWLxmNx0xiFdyOTh8Tf9ZymXx+QytcyNgz8r0OblWjyWds+m" +
"0ka1Vf1ta1+r1mos2xrG2xeZ0+a0W0qOx3GO4NV3WeyvD2XJ5XL5nN51aiw+lfSj0gkUkAEllHanHI5j/cHg8EZf7w8vl8j4f/qfEZeB09/vjLAB30+kZQAP/P5/H6/y" +
"NAOAEAwCjMBwFAEDwJBMDwLBYAP2/8Hv8/gAGAD8LQs9w/nhDY/oygIA="));
Extreelib_tlb::IColumnPtr var_Column = Tree1->Columns->Add(L"Col-1");
	var_Column->DisplayFilterButton = true;
	var_Column->FilterList = Extreelib_tlb::FilterListEnum::exShowExclude | Extreelib_tlb::FilterListEnum::exShowFocusItem | Extreelib_tlb::FilterListEnum::exShowCheckBox | Extreelib_tlb::FilterListEnum::exSortItemsAsc;
Extreelib_tlb::IColumnPtr var_Column1 = Tree1->Columns->Add(L"Col-2");
	var_Column1->DisplayFilterButton = true;
	var_Column1->FilterList = Extreelib_tlb::FilterListEnum::exShowExclude | Extreelib_tlb::FilterListEnum::exShowFocusItem | Extreelib_tlb::FilterListEnum::exShowCheckBox | Extreelib_tlb::FilterListEnum::exSortItemsAsc;
Extreelib_tlb::IColumnPtr var_Column2 = Tree1->Columns->Add(L"Check");
	var_Column2->set_Def(Extreelib_tlb::DefColumnEnum::exCellHasCheckBox,TVariant(true));
	var_Column2->DisplayFilterButton = true;
	var_Column2->DisplayFilterPattern = false;
	var_Column2->FilterType = Extreelib_tlb::FilterTypeEnum::exCheck;
Extreelib_tlb::IColumnPtr var_Column3 = Tree1->Columns->Add(L"Image");
	var_Column3->DisplayFilterButton = true;
	var_Column3->FilterType = Extreelib_tlb::FilterTypeEnum::exImage;
	var_Column3->FilterList = Extreelib_tlb::FilterListEnum::exShowExclude | Extreelib_tlb::FilterListEnum::exShowFocusItem | Extreelib_tlb::FilterListEnum::exShowCheckBox;
Extreelib_tlb::IColumnPtr var_Column4 = Tree1->Columns->Add(L"Pos");
	var_Column4->AllowSizing = false;
	var_Column4->AllowSort = false;
	var_Column4->Width = 32;
	var_Column4->FormatColumn = L"1 apos ``";
	var_Column4->Position = 0;
Extreelib_tlb::IItemsPtr var_Items = Tree1->Items;
	var_Items->set_CellCaption(TVariant(var_Items->AddItem(TVariant("Item A"))),TVariant(1),TVariant("Sub-Item A"));
	long h = var_Items->AddItem(TVariant("Item B"));
	var_Items->set_CellCaption(TVariant(h),TVariant(1),TVariant("Sub-Item B"));
	var_Items->set_CellState(TVariant(h),TVariant(2),1);
	var_Items->set_CellCaption(TVariant(var_Items->AddItem(TVariant("Item C"))),TVariant(1),TVariant("Sub-Item C"));
Tree1->FilterBarFont = (IFontDisp*)(Tree1->Font);
Tree1->Description[Extreelib_tlb::DescriptionTypeEnum::exFilterBarAnd] = PChar(Tree1->FormatABC(L"`<fgcolor=808080> ` + value + ` </fgcolor>`",TVariant(Tree1->Description[Extreelib_tlb::DescriptionTypeEnum::exFilterBarAnd]),TNoParam(),TNoParam()));
Tree1->FilterBarCaption = L"all";
Tree1->FilterBarPromptVisible = Extreelib_tlb::FilterBarVisibleEnum::exFilterBarVisible | Extreelib_tlb::FilterBarVisibleEnum::exFilterBarPromptVisible;
Extreelib_tlb::IColumnPtr var_Column5 = Tree1->Columns->get_Item(TVariant(0));
	var_Column5->FilterType = Extreelib_tlb::FilterTypeEnum::exFilter;
	var_Column5->Filter = L"Item A|Item B";
Tree1->Columns->get_Item(TVariant(2))->Filter = L"1";
Tree1->ApplyFilter();
Tree1->EndUpdate();

665:
FilterBarCaption ALLUI Keyword ( sample 2, result )

// AddItem event - Occurs after a new Item has been inserted to Items collection.
void __fastcall TForm1::Tree1AddItem(TObject *Sender,Extreelib_tlb::HITEM   Item)
{
	TVariant i = TVariant(Tree1->FormatABC(L"value + 1",Tree1->Items->get_ItemToIndex(Item),TNoParam(),TNoParam()));
	Tree1->Items->set_CellImage(TVariant(Item),TVariant(3),i);
}

Tree1->BeginUpdate();
Tree1->Images(TVariant(String("gBJJgBAIDAAGAAEAAQhYAf8Pf4hh0QihCJo2AEZjQAjEZFEaIEaEEaAIAkcbk0olUrlktl0vmExmUzmk1m03nE5nU7nk9n0/oFBoVDolFo1HpFJpVLplNp1PqFRqVTq") +
"lVq1XrFZrVbrldr1fsFhsVjslls1ntFptVrtltt1vuFxuVzul1u13vF5vV7vl9v1/wGBwWDwmFw2HxGJxWLxmNx0xiFdyOTh8Tf9ZymXx+QytcyNgz8r0OblWjyWds+m" +
"0ka1Vf1ta1+r1mos2xrG2xeZ0+a0W0qOx3GO4NV3WeyvD2XJ5XL5nN51aiw+lfSj0gkUkAEllHanHI5j/cHg8EZf7w8vl8j4f/qfEZeB09/vjLAB30+kZQAP/P5/H6/y" +
"NAOAEAwCjMBwFAEDwJBMDwLBYAP2/8Hv8/gAGAD8LQs9w/nhDY/oygIA="));
Extreelib_tlb::IColumnPtr var_Column = Tree1->Columns->Add(L"Col-1");
	var_Column->DisplayFilterButton = true;
	var_Column->FilterList = Extreelib_tlb::FilterListEnum::exShowExclude | Extreelib_tlb::FilterListEnum::exShowFocusItem | Extreelib_tlb::FilterListEnum::exShowCheckBox | Extreelib_tlb::FilterListEnum::exSortItemsAsc;
Extreelib_tlb::IColumnPtr var_Column1 = Tree1->Columns->Add(L"Col-2");
	var_Column1->DisplayFilterButton = true;
	var_Column1->FilterList = Extreelib_tlb::FilterListEnum::exShowExclude | Extreelib_tlb::FilterListEnum::exShowFocusItem | Extreelib_tlb::FilterListEnum::exShowCheckBox | Extreelib_tlb::FilterListEnum::exSortItemsAsc;
Extreelib_tlb::IColumnPtr var_Column2 = Tree1->Columns->Add(L"Check");
	var_Column2->set_Def(Extreelib_tlb::DefColumnEnum::exCellHasCheckBox,TVariant(true));
	var_Column2->DisplayFilterButton = true;
	var_Column2->DisplayFilterPattern = false;
	var_Column2->FilterType = Extreelib_tlb::FilterTypeEnum::exCheck;
Extreelib_tlb::IColumnPtr var_Column3 = Tree1->Columns->Add(L"Image");
	var_Column3->DisplayFilterButton = true;
	var_Column3->FilterType = Extreelib_tlb::FilterTypeEnum::exImage;
	var_Column3->FilterList = Extreelib_tlb::FilterListEnum::exShowExclude | Extreelib_tlb::FilterListEnum::exShowFocusItem | Extreelib_tlb::FilterListEnum::exShowCheckBox;
Extreelib_tlb::IColumnPtr var_Column4 = Tree1->Columns->Add(L"Pos");
	var_Column4->AllowSizing = false;
	var_Column4->AllowSort = false;
	var_Column4->Width = 32;
	var_Column4->FormatColumn = L"1 apos ``";
	var_Column4->Position = 0;
Extreelib_tlb::IItemsPtr var_Items = Tree1->Items;
	var_Items->set_CellCaption(TVariant(var_Items->AddItem(TVariant("Item A"))),TVariant(1),TVariant("Sub-Item A"));
	long h = var_Items->AddItem(TVariant("Item B"));
	var_Items->set_CellCaption(TVariant(h),TVariant(1),TVariant("Sub-Item B"));
	var_Items->set_CellState(TVariant(h),TVariant(2),1);
	var_Items->set_CellCaption(TVariant(var_Items->AddItem(TVariant("Item C"))),TVariant(1),TVariant("Sub-Item C"));
Tree1->FilterBarFont = (IFontDisp*)(Tree1->Font);
Tree1->Description[Extreelib_tlb::DescriptionTypeEnum::exFilterBarAnd] = PChar(Tree1->FormatABC(L"`<fgcolor=808080> ` + value + ` </fgcolor>`",TVariant(Tree1->Description[Extreelib_tlb::DescriptionTypeEnum::exFilterBarAnd]),TNoParam(),TNoParam()));
Tree1->FilterBarCaption = TVariant(String("(( ( allui replace `[<b>` with `<bgcolor=000000><fgcolor=FFFFFF><b> ` replace `</b>]` with ` </b></bgcolor></fgcolor>` replace ") +
"`[<s>` with `<bgcolor=C0C0C0><fgcolor=FFFFFF> ` replace `</s>]` with ` </fgcolor></bgcolor>` )  + `<r><fgcolor=808080>` + ( matc" +
"hitemcount < 0 ? ( ( len(value) ? `` : `` ) + `<r>` + abs(matchitemcount + 1) + ` result(s)` ) : (`<r><fgcolor=808080>`+ itemcou" +
"nt + ` item(s)`) )))");
Tree1->FilterBarPromptVisible = Extreelib_tlb::FilterBarVisibleEnum::exFilterBarVisible | Extreelib_tlb::FilterBarVisibleEnum::exFilterBarPromptVisible;
Extreelib_tlb::IColumnPtr var_Column5 = Tree1->Columns->get_Item(TVariant(0));
	var_Column5->FilterType = Extreelib_tlb::FilterTypeEnum::exFilter;
	var_Column5->Filter = L"Item A|Item B";
Tree1->Columns->get_Item(TVariant(2))->Filter = L"1";
Tree1->ApplyFilter();
Tree1->EndUpdate();

664:
FilterBarCaption ALLUI Keyword ( sample 1 )

// AddItem event - Occurs after a new Item has been inserted to Items collection.
void __fastcall TForm1::Tree1AddItem(TObject *Sender,Extreelib_tlb::HITEM   Item)
{
	TVariant i = TVariant(Tree1->FormatABC(L"value + 1",Tree1->Items->get_ItemToIndex(Item),TNoParam(),TNoParam()));
	Tree1->Items->set_CellImage(TVariant(Item),TVariant(3),i);
}

Tree1->BeginUpdate();
Tree1->Images(TVariant(String("gBJJgBAIDAAGAAEAAQhYAf8Pf4hh0QihCJo2AEZjQAjEZFEaIEaEEaAIAkcbk0olUrlktl0vmExmUzmk1m03nE5nU7nk9n0/oFBoVDolFo1HpFJpVLplNp1PqFRqVTq") +
"lVq1XrFZrVbrldr1fsFhsVjslls1ntFptVrtltt1vuFxuVzul1u13vF5vV7vl9v1/wGBwWDwmFw2HxGJxWLxmNx0xiFdyOTh8Tf9ZymXx+QytcyNgz8r0OblWjyWds+m" +
"0ka1Vf1ta1+r1mos2xrG2xeZ0+a0W0qOx3GO4NV3WeyvD2XJ5XL5nN51aiw+lfSj0gkUkAEllHanHI5j/cHg8EZf7w8vl8j4f/qfEZeB09/vjLAB30+kZQAP/P5/H6/y" +
"NAOAEAwCjMBwFAEDwJBMDwLBYAP2/8Hv8/gAGAD8LQs9w/nhDY/oygIA="));
Extreelib_tlb::IColumnPtr var_Column = Tree1->Columns->Add(L"Col-1");
	var_Column->DisplayFilterButton = true;
	var_Column->FilterList = Extreelib_tlb::FilterListEnum::exShowExclude | Extreelib_tlb::FilterListEnum::exShowFocusItem | Extreelib_tlb::FilterListEnum::exShowCheckBox | Extreelib_tlb::FilterListEnum::exSortItemsAsc;
Extreelib_tlb::IColumnPtr var_Column1 = Tree1->Columns->Add(L"Col-2");
	var_Column1->DisplayFilterButton = true;
	var_Column1->FilterList = Extreelib_tlb::FilterListEnum::exShowExclude | Extreelib_tlb::FilterListEnum::exShowFocusItem | Extreelib_tlb::FilterListEnum::exShowCheckBox | Extreelib_tlb::FilterListEnum::exSortItemsAsc;
Extreelib_tlb::IColumnPtr var_Column2 = Tree1->Columns->Add(L"Check");
	var_Column2->set_Def(Extreelib_tlb::DefColumnEnum::exCellHasCheckBox,TVariant(true));
	var_Column2->DisplayFilterButton = true;
	var_Column2->DisplayFilterPattern = false;
	var_Column2->FilterType = Extreelib_tlb::FilterTypeEnum::exCheck;
Extreelib_tlb::IColumnPtr var_Column3 = Tree1->Columns->Add(L"Image");
	var_Column3->DisplayFilterButton = true;
	var_Column3->FilterType = Extreelib_tlb::FilterTypeEnum::exImage;
	var_Column3->FilterList = Extreelib_tlb::FilterListEnum::exShowExclude | Extreelib_tlb::FilterListEnum::exShowFocusItem | Extreelib_tlb::FilterListEnum::exShowCheckBox;
Extreelib_tlb::IColumnPtr var_Column4 = Tree1->Columns->Add(L"Pos");
	var_Column4->AllowSizing = false;
	var_Column4->AllowSort = false;
	var_Column4->Width = 32;
	var_Column4->FormatColumn = L"1 apos ``";
	var_Column4->Position = 0;
Extreelib_tlb::IItemsPtr var_Items = Tree1->Items;
	var_Items->set_CellCaption(TVariant(var_Items->AddItem(TVariant("Item A"))),TVariant(1),TVariant("Sub-Item A"));
	long h = var_Items->AddItem(TVariant("Item B"));
	var_Items->set_CellCaption(TVariant(h),TVariant(1),TVariant("Sub-Item B"));
	var_Items->set_CellState(TVariant(h),TVariant(2),1);
	var_Items->set_CellCaption(TVariant(var_Items->AddItem(TVariant("Item C"))),TVariant(1),TVariant("Sub-Item C"));
Tree1->FilterBarFont = (IFontDisp*)(Tree1->Font);
Tree1->Description[Extreelib_tlb::DescriptionTypeEnum::exFilterBarAnd] = PChar(Tree1->FormatABC(L"`<fgcolor=808080> ` + value + ` </fgcolor>`",TVariant(Tree1->Description[Extreelib_tlb::DescriptionTypeEnum::exFilterBarAnd]),TNoParam(),TNoParam()));
Tree1->FilterBarCaption = L"allui";
Tree1->FilterBarPromptVisible = Extreelib_tlb::FilterBarVisibleEnum::exFilterBarVisible | Extreelib_tlb::FilterBarVisibleEnum::exFilterBarPromptVisible;
Extreelib_tlb::IColumnPtr var_Column5 = Tree1->Columns->get_Item(TVariant(0));
	var_Column5->FilterType = Extreelib_tlb::FilterTypeEnum::exFilter;
	var_Column5->Filter = L"Item A|Item B";
Tree1->Columns->get_Item(TVariant(2))->Filter = L"1";
Tree1->ApplyFilter();
Tree1->EndUpdate();

663:
FilterBarCaption AVAILABLE Keyword ( sample 2, result )

// AddItem event - Occurs after a new Item has been inserted to Items collection.
void __fastcall TForm1::Tree1AddItem(TObject *Sender,Extreelib_tlb::HITEM   Item)
{
	TVariant i = TVariant(Tree1->FormatABC(L"value + 1",Tree1->Items->get_ItemToIndex(Item),TNoParam(),TNoParam()));
	Tree1->Items->set_CellImage(TVariant(Item),TVariant(3),i);
}

Tree1->BeginUpdate();
Tree1->Images(TVariant(String("gBJJgBAIDAAGAAEAAQhYAf8Pf4hh0QihCJo2AEZjQAjEZFEaIEaEEaAIAkcbk0olUrlktl0vmExmUzmk1m03nE5nU7nk9n0/oFBoVDolFo1HpFJpVLplNp1PqFRqVTq") +
"lVq1XrFZrVbrldr1fsFhsVjslls1ntFptVrtltt1vuFxuVzul1u13vF5vV7vl9v1/wGBwWDwmFw2HxGJxWLxmNx0xiFdyOTh8Tf9ZymXx+QytcyNgz8r0OblWjyWds+m" +
"0ka1Vf1ta1+r1mos2xrG2xeZ0+a0W0qOx3GO4NV3WeyvD2XJ5XL5nN51aiw+lfSj0gkUkAEllHanHI5j/cHg8EZf7w8vl8j4f/qfEZeB09/vjLAB30+kZQAP/P5/H6/y" +
"NAOAEAwCjMBwFAEDwJBMDwLBYAP2/8Hv8/gAGAD8LQs9w/nhDY/oygIA="));
Extreelib_tlb::IColumnPtr var_Column = Tree1->Columns->Add(L"Col-1");
	var_Column->DisplayFilterButton = true;
	var_Column->FilterList = Extreelib_tlb::FilterListEnum::exShowExclude | Extreelib_tlb::FilterListEnum::exShowFocusItem | Extreelib_tlb::FilterListEnum::exShowCheckBox | Extreelib_tlb::FilterListEnum::exSortItemsAsc;
Extreelib_tlb::IColumnPtr var_Column1 = Tree1->Columns->Add(L"Col-2");
	var_Column1->DisplayFilterButton = true;
	var_Column1->FilterList = Extreelib_tlb::FilterListEnum::exShowExclude | Extreelib_tlb::FilterListEnum::exShowFocusItem | Extreelib_tlb::FilterListEnum::exShowCheckBox | Extreelib_tlb::FilterListEnum::exSortItemsAsc;
Extreelib_tlb::IColumnPtr var_Column2 = Tree1->Columns->Add(L"Check");
	var_Column2->set_Def(Extreelib_tlb::DefColumnEnum::exCellHasCheckBox,TVariant(true));
	var_Column2->DisplayFilterButton = true;
	var_Column2->DisplayFilterPattern = false;
	var_Column2->FilterType = Extreelib_tlb::FilterTypeEnum::exCheck;
Extreelib_tlb::IColumnPtr var_Column3 = Tree1->Columns->Add(L"Image");
	var_Column3->DisplayFilterButton = true;
	var_Column3->FilterType = Extreelib_tlb::FilterTypeEnum::exImage;
	var_Column3->FilterList = Extreelib_tlb::FilterListEnum::exShowExclude | Extreelib_tlb::FilterListEnum::exShowFocusItem | Extreelib_tlb::FilterListEnum::exShowCheckBox;
Extreelib_tlb::IColumnPtr var_Column4 = Tree1->Columns->Add(L"Pos");
	var_Column4->AllowSizing = false;
	var_Column4->AllowSort = false;
	var_Column4->Width = 32;
	var_Column4->FormatColumn = L"1 apos ``";
	var_Column4->Position = 0;
Extreelib_tlb::IItemsPtr var_Items = Tree1->Items;
	var_Items->set_CellCaption(TVariant(var_Items->AddItem(TVariant("Item A"))),TVariant(1),TVariant("Sub-Item A"));
	long h = var_Items->AddItem(TVariant("Item B"));
	var_Items->set_CellCaption(TVariant(h),TVariant(1),TVariant("Sub-Item B"));
	var_Items->set_CellState(TVariant(h),TVariant(2),1);
	var_Items->set_CellCaption(TVariant(var_Items->AddItem(TVariant("Item C"))),TVariant(1),TVariant("Sub-Item C"));
Tree1->FilterBarFont = (IFontDisp*)(Tree1->Font);
Tree1->Description[Extreelib_tlb::DescriptionTypeEnum::exFilterBarAnd] = PChar(Tree1->FormatABC(L"`<fgcolor=808080> ` + value + ` </fgcolor>`",TVariant(Tree1->Description[Extreelib_tlb::DescriptionTypeEnum::exFilterBarAnd]),TNoParam(),TNoParam()));
Tree1->FilterBarCaption = TVariant(String("(( ( value replace `[` with `<bgcolor=000000><fgcolor=FFFFFF><b> ` replace `]` with ` </b></bgcolor></fgcolor>` ) + ` ` + ( ava") +
"ilable replace `[` with `<bgcolor=C0C0C0><fgcolor=FFFFFF><b> ` replace `]` with ` </b></bgcolor></fgcolor>` replace `<s>` with `" +
"` replace `</s>` with `` ) + `<fgcolor=808080>` + ( matchitemcount < 0 ? ( ( len(value) ? `` : `` ) + `<r>` + abs(matchitemcount" +
" + 1) + ` result(s)` ) : (`<r><fgcolor=808080>`+ itemcount + ` item(s)`) )))");
Tree1->FilterBarPromptVisible = Extreelib_tlb::FilterBarVisibleEnum::exFilterBarVisible | Extreelib_tlb::FilterBarVisibleEnum::exFilterBarPromptVisible;
Extreelib_tlb::IColumnPtr var_Column5 = Tree1->Columns->get_Item(TVariant(0));
	var_Column5->FilterType = Extreelib_tlb::FilterTypeEnum::exFilter;
	var_Column5->Filter = L"Item A|Item B";
Tree1->Columns->get_Item(TVariant(2))->Filter = L"1";
Tree1->ApplyFilter();
Tree1->EndUpdate();

662:
FilterBarCaption AVAILABLE Keyword ( sample 1 )

// AddItem event - Occurs after a new Item has been inserted to Items collection.
void __fastcall TForm1::Tree1AddItem(TObject *Sender,Extreelib_tlb::HITEM   Item)
{
	TVariant i = TVariant(Tree1->FormatABC(L"value + 1",Tree1->Items->get_ItemToIndex(Item),TNoParam(),TNoParam()));
	Tree1->Items->set_CellImage(TVariant(Item),TVariant(3),i);
}

Tree1->BeginUpdate();
Tree1->Images(TVariant(String("gBJJgBAIDAAGAAEAAQhYAf8Pf4hh0QihCJo2AEZjQAjEZFEaIEaEEaAIAkcbk0olUrlktl0vmExmUzmk1m03nE5nU7nk9n0/oFBoVDolFo1HpFJpVLplNp1PqFRqVTq") +
"lVq1XrFZrVbrldr1fsFhsVjslls1ntFptVrtltt1vuFxuVzul1u13vF5vV7vl9v1/wGBwWDwmFw2HxGJxWLxmNx0xiFdyOTh8Tf9ZymXx+QytcyNgz8r0OblWjyWds+m" +
"0ka1Vf1ta1+r1mos2xrG2xeZ0+a0W0qOx3GO4NV3WeyvD2XJ5XL5nN51aiw+lfSj0gkUkAEllHanHI5j/cHg8EZf7w8vl8j4f/qfEZeB09/vjLAB30+kZQAP/P5/H6/y" +
"NAOAEAwCjMBwFAEDwJBMDwLBYAP2/8Hv8/gAGAD8LQs9w/nhDY/oygIA="));
Extreelib_tlb::IColumnPtr var_Column = Tree1->Columns->Add(L"Col-1");
	var_Column->DisplayFilterButton = true;
	var_Column->FilterList = Extreelib_tlb::FilterListEnum::exShowExclude | Extreelib_tlb::FilterListEnum::exShowFocusItem | Extreelib_tlb::FilterListEnum::exShowCheckBox | Extreelib_tlb::FilterListEnum::exSortItemsAsc;
Extreelib_tlb::IColumnPtr var_Column1 = Tree1->Columns->Add(L"Col-2");
	var_Column1->DisplayFilterButton = true;
	var_Column1->FilterList = Extreelib_tlb::FilterListEnum::exShowExclude | Extreelib_tlb::FilterListEnum::exShowFocusItem | Extreelib_tlb::FilterListEnum::exShowCheckBox | Extreelib_tlb::FilterListEnum::exSortItemsAsc;
Extreelib_tlb::IColumnPtr var_Column2 = Tree1->Columns->Add(L"Check");
	var_Column2->set_Def(Extreelib_tlb::DefColumnEnum::exCellHasCheckBox,TVariant(true));
	var_Column2->DisplayFilterButton = true;
	var_Column2->DisplayFilterPattern = false;
	var_Column2->FilterType = Extreelib_tlb::FilterTypeEnum::exCheck;
Extreelib_tlb::IColumnPtr var_Column3 = Tree1->Columns->Add(L"Image");
	var_Column3->DisplayFilterButton = true;
	var_Column3->FilterType = Extreelib_tlb::FilterTypeEnum::exImage;
	var_Column3->FilterList = Extreelib_tlb::FilterListEnum::exShowExclude | Extreelib_tlb::FilterListEnum::exShowFocusItem | Extreelib_tlb::FilterListEnum::exShowCheckBox;
Extreelib_tlb::IColumnPtr var_Column4 = Tree1->Columns->Add(L"Pos");
	var_Column4->AllowSizing = false;
	var_Column4->AllowSort = false;
	var_Column4->Width = 32;
	var_Column4->FormatColumn = L"1 apos ``";
	var_Column4->Position = 0;
Extreelib_tlb::IItemsPtr var_Items = Tree1->Items;
	var_Items->set_CellCaption(TVariant(var_Items->AddItem(TVariant("Item A"))),TVariant(1),TVariant("Sub-Item A"));
	long h = var_Items->AddItem(TVariant("Item B"));
	var_Items->set_CellCaption(TVariant(h),TVariant(1),TVariant("Sub-Item B"));
	var_Items->set_CellState(TVariant(h),TVariant(2),1);
	var_Items->set_CellCaption(TVariant(var_Items->AddItem(TVariant("Item C"))),TVariant(1),TVariant("Sub-Item C"));
Tree1->FilterBarFont = (IFontDisp*)(Tree1->Font);
Tree1->Description[Extreelib_tlb::DescriptionTypeEnum::exFilterBarAnd] = PChar(Tree1->FormatABC(L"`<fgcolor=808080> ` + value + ` </fgcolor>`",TVariant(Tree1->Description[Extreelib_tlb::DescriptionTypeEnum::exFilterBarAnd]),TNoParam(),TNoParam()));
Tree1->FilterBarCaption = L"value + ` ` + available";
Tree1->FilterBarPromptVisible = Extreelib_tlb::FilterBarVisibleEnum::exFilterBarVisible | Extreelib_tlb::FilterBarVisibleEnum::exFilterBarPromptVisible;
Extreelib_tlb::IColumnPtr var_Column5 = Tree1->Columns->get_Item(TVariant(0));
	var_Column5->FilterType = Extreelib_tlb::FilterTypeEnum::exFilter;
	var_Column5->Filter = L"Item A|Item B";
Tree1->Columns->get_Item(TVariant(2))->Filter = L"1";
Tree1->ApplyFilter();
Tree1->EndUpdate();

661:
Is it possible to somehow highlight the column's name different than its filter value in the control's filter bar ( sample 3, results )

Tree1->BeginUpdate();
Extreelib_tlb::IColumnPtr var_Column = Tree1->Columns->Add(L"Col-1");
	var_Column->DisplayFilterButton = true;
	var_Column->FilterList = Extreelib_tlb::FilterListEnum::exShowExclude | Extreelib_tlb::FilterListEnum::exShowFocusItem | Extreelib_tlb::FilterListEnum::exShowCheckBox | Extreelib_tlb::FilterListEnum::exSortItemsAsc;
Extreelib_tlb::IColumnPtr var_Column1 = Tree1->Columns->Add(L"Col-2");
	var_Column1->DisplayFilterButton = true;
	var_Column1->FilterList = Extreelib_tlb::FilterListEnum::exShowExclude | Extreelib_tlb::FilterListEnum::exShowFocusItem | Extreelib_tlb::FilterListEnum::exShowCheckBox | Extreelib_tlb::FilterListEnum::exSortItemsAsc;
Extreelib_tlb::IColumnPtr var_Column2 = Tree1->Columns->Add(L"Pos");
	var_Column2->AllowSizing = false;
	var_Column2->AllowSort = false;
	var_Column2->Width = 32;
	var_Column2->FormatColumn = L"1 apos ``";
	var_Column2->Position = 0;
Extreelib_tlb::IItemsPtr var_Items = Tree1->Items;
	var_Items->set_CellCaption(TVariant(var_Items->AddItem(TVariant("Item A"))),TVariant(1),TVariant("Sub-Item A"));
	var_Items->set_CellCaption(TVariant(var_Items->AddItem(TVariant("Item B"))),TVariant(1),TVariant("Sub-Item B"));
	var_Items->set_CellCaption(TVariant(var_Items->AddItem(TVariant("Item C"))),TVariant(1),TVariant("Sub-Item C"));
Tree1->FilterBarFont = (IFontDisp*)(Tree1->Font);
Tree1->Description[Extreelib_tlb::DescriptionTypeEnum::exFilterBarAnd] = PChar(Tree1->FormatABC(L"`<fgcolor=808080>` + value + `</fgcolor>`",TVariant(Tree1->Description[Extreelib_tlb::DescriptionTypeEnum::exFilterBarAnd]),TNoParam(),TNoParam()));
Tree1->FilterBarCaption = TVariant(String("(`<b>` + value + `</b><fgcolor=808080>` + ( matchitemcount < 0 ? ( ( len(value) ? `` : `` ) + `<r>` + abs(matchitemcount + 1) +") +
" ` result(s)` ) : (`<fgcolor=808080>`+ itemcount + ` item(s)`) )) replace `[` with `<bgcolor=000000><fgcolor=FFFFFF><b> ` replac" +
"e `]` with ` </b></bgcolor></fgcolor>`");
Tree1->FilterBarPromptVisible = Extreelib_tlb::FilterBarVisibleEnum::exFilterBarToggle;
Extreelib_tlb::IColumnPtr var_Column3 = Tree1->Columns->get_Item(TVariant(0));
	var_Column3->FilterType = Extreelib_tlb::FilterTypeEnum::exFilter;
	var_Column3->Filter = L"Item A|Item B";
Extreelib_tlb::IColumnPtr var_Column4 = Tree1->Columns->get_Item(TVariant(1));
	var_Column4->FilterType = Extreelib_tlb::FilterTypeEnum::exPattern;
	var_Column4->Filter = L"*B";
Tree1->ApplyFilter();
Tree1->EndUpdate();

660:
Is it possible to somehow highlight the column's name different than its filter value in the control's filter bar ( sample 2 )

Tree1->BeginUpdate();
Extreelib_tlb::IColumnPtr var_Column = Tree1->Columns->Add(L"Col-1");
	var_Column->DisplayFilterButton = true;
	var_Column->FilterList = Extreelib_tlb::FilterListEnum::exShowExclude | Extreelib_tlb::FilterListEnum::exShowFocusItem | Extreelib_tlb::FilterListEnum::exShowCheckBox | Extreelib_tlb::FilterListEnum::exSortItemsAsc;
Extreelib_tlb::IColumnPtr var_Column1 = Tree1->Columns->Add(L"Col-2");
	var_Column1->DisplayFilterButton = true;
	var_Column1->FilterList = Extreelib_tlb::FilterListEnum::exShowExclude | Extreelib_tlb::FilterListEnum::exShowFocusItem | Extreelib_tlb::FilterListEnum::exShowCheckBox | Extreelib_tlb::FilterListEnum::exSortItemsAsc;
Extreelib_tlb::IColumnPtr var_Column2 = Tree1->Columns->Add(L"Pos");
	var_Column2->AllowSizing = false;
	var_Column2->AllowSort = false;
	var_Column2->Width = 32;
	var_Column2->FormatColumn = L"1 apos ``";
	var_Column2->Position = 0;
Extreelib_tlb::IItemsPtr var_Items = Tree1->Items;
	var_Items->set_CellCaption(TVariant(var_Items->AddItem(TVariant("Item A"))),TVariant(1),TVariant("Sub-Item A"));
	var_Items->set_CellCaption(TVariant(var_Items->AddItem(TVariant("Item B"))),TVariant(1),TVariant("Sub-Item B"));
	var_Items->set_CellCaption(TVariant(var_Items->AddItem(TVariant("Item C"))),TVariant(1),TVariant("Sub-Item C"));
Tree1->FilterBarFont = (IFontDisp*)(Tree1->Font);
Tree1->Description[Extreelib_tlb::DescriptionTypeEnum::exFilterBarAnd] = PChar(Tree1->FormatABC(L"`<fgcolor=808080>` + value + `</fgcolor>`",TVariant(Tree1->Description[Extreelib_tlb::DescriptionTypeEnum::exFilterBarAnd]),TNoParam(),TNoParam()));
Tree1->FilterBarCaption = L"value replace `[` with `<bgcolor=000000><fgcolor=FFFFFF><b> ` replace `]` with ` </b></bgcolor></fgcolor>`";
Tree1->FilterBarPromptVisible = Extreelib_tlb::FilterBarVisibleEnum::exFilterBarToggle;
Extreelib_tlb::IColumnPtr var_Column3 = Tree1->Columns->get_Item(TVariant(0));
	var_Column3->FilterType = Extreelib_tlb::FilterTypeEnum::exFilter;
	var_Column3->Filter = L"Item A|Item B";
Extreelib_tlb::IColumnPtr var_Column4 = Tree1->Columns->get_Item(TVariant(1));
	var_Column4->FilterType = Extreelib_tlb::FilterTypeEnum::exPattern;
	var_Column4->Filter = L"*B";
Tree1->ApplyFilter();
Tree1->EndUpdate();

659:
Is it possible to somehow highlight the column's name different than its filter value in the control's filter bar ( sample 1 )

Tree1->BeginUpdate();
Extreelib_tlb::IColumnPtr var_Column = Tree1->Columns->Add(L"Col-1");
	var_Column->DisplayFilterButton = true;
	var_Column->FilterList = Extreelib_tlb::FilterListEnum::exShowExclude | Extreelib_tlb::FilterListEnum::exShowFocusItem | Extreelib_tlb::FilterListEnum::exShowCheckBox | Extreelib_tlb::FilterListEnum::exSortItemsAsc;
Extreelib_tlb::IColumnPtr var_Column1 = Tree1->Columns->Add(L"Col-2");
	var_Column1->DisplayFilterButton = true;
	var_Column1->FilterList = Extreelib_tlb::FilterListEnum::exShowExclude | Extreelib_tlb::FilterListEnum::exShowFocusItem | Extreelib_tlb::FilterListEnum::exShowCheckBox | Extreelib_tlb::FilterListEnum::exSortItemsAsc;
Extreelib_tlb::IColumnPtr var_Column2 = Tree1->Columns->Add(L"Pos");
	var_Column2->AllowSizing = false;
	var_Column2->AllowSort = false;
	var_Column2->Width = 32;
	var_Column2->FormatColumn = L"1 apos ``";
	var_Column2->Position = 0;
Extreelib_tlb::IItemsPtr var_Items = Tree1->Items;
	var_Items->set_CellCaption(TVariant(var_Items->AddItem(TVariant("Item A"))),TVariant(1),TVariant("Sub-Item A"));
	var_Items->set_CellCaption(TVariant(var_Items->AddItem(TVariant("Item B"))),TVariant(1),TVariant("Sub-Item B"));
	var_Items->set_CellCaption(TVariant(var_Items->AddItem(TVariant("Item C"))),TVariant(1),TVariant("Sub-Item C"));
Tree1->Description[Extreelib_tlb::DescriptionTypeEnum::exFilterBarAnd] = PChar(Tree1->FormatABC(L"`<fgcolor=808080>` + value + `</fgcolor>`",TVariant(Tree1->Description[Extreelib_tlb::DescriptionTypeEnum::exFilterBarAnd]),TNoParam(),TNoParam()));
Tree1->FilterBarCaption = L"value replace `[` with `<fgcolor=808080>[` replace `]` with `]</fgcolor>`";
Tree1->FilterBarPromptVisible = Extreelib_tlb::FilterBarVisibleEnum::exFilterBarToggle;
Extreelib_tlb::IColumnPtr var_Column3 = Tree1->Columns->get_Item(TVariant(0));
	var_Column3->FilterType = Extreelib_tlb::FilterTypeEnum::exFilter;
	var_Column3->Filter = L"Item A|Item B";
Extreelib_tlb::IColumnPtr var_Column4 = Tree1->Columns->get_Item(TVariant(1));
	var_Column4->FilterType = Extreelib_tlb::FilterTypeEnum::exPattern;
	var_Column4->Filter = L"*B";
Tree1->ApplyFilter();
Tree1->EndUpdate();

658:
Is it possible to automatically displays the control's filter label to the right

Tree1->BeginUpdate();
Extreelib_tlb::IColumnPtr var_Column = Tree1->Columns->Add(L"Item");
	var_Column->DisplayFilterButton = true;
	var_Column->FilterList = Extreelib_tlb::FilterListEnum::exShowExclude | Extreelib_tlb::FilterListEnum::exShowFocusItem | Extreelib_tlb::FilterListEnum::exShowCheckBox | Extreelib_tlb::FilterListEnum::exSortItemsAsc;
Extreelib_tlb::IColumnPtr var_Column1 = Tree1->Columns->Add(L"Pos");
	var_Column1->AllowSizing = false;
	var_Column1->AllowSort = false;
	var_Column1->Width = 32;
	var_Column1->FormatColumn = L"1 apos ``";
	var_Column1->Position = 0;
Extreelib_tlb::IItemsPtr var_Items = Tree1->Items;
	var_Items->AddItem(TVariant("Item A"));
	var_Items->AddItem(TVariant("Item B"));
	var_Items->AddItem(TVariant("Item C"));
Tree1->FilterBarCaption = L"`<r>` + value";
Tree1->FilterBarPromptVisible = Extreelib_tlb::FilterBarVisibleEnum::exFilterBarShowCloseOnRight | Extreelib_tlb::FilterBarVisibleEnum::exFilterBarToggle;
Extreelib_tlb::IColumnPtr var_Column2 = Tree1->Columns->get_Item(TVariant(0));
	var_Column2->FilterType = Extreelib_tlb::FilterTypeEnum::exFilter;
	var_Column2->Filter = L"Item B";
Tree1->ApplyFilter();
Tree1->EndUpdate();

657:
How can I get the number of results/items being shown in the control's filter bar (sample 4)

Tree1->BeginUpdate();
Extreelib_tlb::IColumnPtr var_Column = Tree1->Columns->Add(L"Item");
	var_Column->DisplayFilterButton = true;
	var_Column->FilterList = Extreelib_tlb::FilterListEnum::exShowExclude | Extreelib_tlb::FilterListEnum::exShowFocusItem | Extreelib_tlb::FilterListEnum::exShowCheckBox | Extreelib_tlb::FilterListEnum::exSortItemsAsc;
Extreelib_tlb::IColumnPtr var_Column1 = Tree1->Columns->Add(L"Pos");
	var_Column1->AllowSizing = false;
	var_Column1->AllowSort = false;
	var_Column1->Width = 32;
	var_Column1->FormatColumn = L"1 apos ``";
	var_Column1->Position = 0;
Extreelib_tlb::IItemsPtr var_Items = Tree1->Items;
	var_Items->AddItem(TVariant("Item A"));
	var_Items->AddItem(TVariant("Item B"));
	var_Items->AddItem(TVariant("Item C"));
Tree1->FilterBarFont = (IFontDisp*)(Tree1->Font);
Tree1->FilterBarPrompt = PChar(Tree1->FormatABC(L"`<b>` + value",TVariant(Tree1->FilterBarPrompt),TNoParam(),TNoParam()));
Tree1->FilterBarCaption = TVariant(String("`<b><r>` + value + `</b><fgcolor=808080>` + ( matchitemcount < 0 ? ( ( len(value) ? `<br>` : `` ) + `<r>` + abs(matchitemcount ") +
"+ 1) + ` result(s)` ) : (`<fgcolor=808080>`+ itemcount + ` item(s)`) )");
Tree1->FilterBarPromptVisible = Extreelib_tlb::FilterBarVisibleEnum::exFilterBarCompact | Extreelib_tlb::FilterBarVisibleEnum::exFilterBarShowCloseOnRight | Extreelib_tlb::FilterBarVisibleEnum::exFilterBarShowCloseIfRequired | Extreelib_tlb::FilterBarVisibleEnum::exFilterBarCaptionVisible | Extreelib_tlb::FilterBarVisibleEnum::exFilterBarVisible | Extreelib_tlb::FilterBarVisibleEnum::exFilterBarPromptVisible;
Tree1->EndUpdate();

656:
How can I get the number of results being shown in the control's filter bar (sample 3)

Tree1->BeginUpdate();
Tree1->Columns->Add(L"Item")->DisplayFilterButton = true;
Extreelib_tlb::IColumnPtr var_Column = Tree1->Columns->Add(L"Pos");
	var_Column->AllowSizing = false;
	var_Column->AllowSort = false;
	var_Column->Width = 32;
	var_Column->FormatColumn = L"1 apos ``";
	var_Column->Position = 0;
Extreelib_tlb::IItemsPtr var_Items = Tree1->Items;
	var_Items->AddItem(TVariant("Item A"));
	var_Items->AddItem(TVariant("Item B"));
	var_Items->AddItem(TVariant("Item C"));
Tree1->FilterBarFont = (IFontDisp*)(Tree1->Font);
Tree1->FilterBarCaption = TVariant(String("`<b><r>` + value + `</b><fgcolor=808080>` + ( matchitemcount < 0 ? ( ( len(value) ? `<br>` : `` ) + `<r>` + abs(matchitemcount ") +
"+ 1) + ` result(s)` ) : ``)");
Tree1->FilterBarPromptVisible = Extreelib_tlb::FilterBarVisibleEnum::exFilterBarCompact | Extreelib_tlb::FilterBarVisibleEnum::exFilterBarCaptionVisible | Extreelib_tlb::FilterBarVisibleEnum::exFilterBarVisible | Extreelib_tlb::FilterBarVisibleEnum::exFilterBarPromptVisible;
Extreelib_tlb::IColumnPtr var_Column1 = Tree1->Columns->get_Item(TVariant(0));
	var_Column1->FilterType = Extreelib_tlb::FilterTypeEnum::exFilter;
	var_Column1->Filter = L"Item A|Item B";
Tree1->ApplyFilter();
Tree1->EndUpdate();

655:
How can I get the number of results being shown in the control's filter bar (sample 2, compact)

Tree1->BeginUpdate();
Tree1->Columns->Add(L"Item")->DisplayFilterButton = true;
Extreelib_tlb::IColumnPtr var_Column = Tree1->Columns->Add(L"Pos");
	var_Column->AllowSizing = false;
	var_Column->AllowSort = false;
	var_Column->Width = 32;
	var_Column->FormatColumn = L"1 apos ``";
	var_Column->Position = 0;
Extreelib_tlb::IItemsPtr var_Items = Tree1->Items;
	var_Items->AddItem(TVariant("Item A"));
	var_Items->AddItem(TVariant("Item B"));
	var_Items->AddItem(TVariant("Item C"));
Tree1->FilterBarFont = (IFontDisp*)(Tree1->Font);
Tree1->FilterBarCaption = L"`<b><r>` + value + `</b><fgcolor=808080>` + ( matchitemcount < 0 ? `<off -4> ` + abs(matchitemcount + 1) + ` result(s)` : ``)";
Tree1->FilterBarPromptVisible = Extreelib_tlb::FilterBarVisibleEnum::exFilterBarCompact | Extreelib_tlb::FilterBarVisibleEnum::exFilterBarSingleLine | Extreelib_tlb::FilterBarVisibleEnum::exFilterBarCaptionVisible | Extreelib_tlb::FilterBarVisibleEnum::exFilterBarVisible | Extreelib_tlb::FilterBarVisibleEnum::exFilterBarPromptVisible;
Extreelib_tlb::IColumnPtr var_Column1 = Tree1->Columns->get_Item(TVariant(0));
	var_Column1->FilterType = Extreelib_tlb::FilterTypeEnum::exFilter;
	var_Column1->Filter = L"Item A|Item B";
Tree1->ApplyFilter();
Tree1->EndUpdate();

654:
How can I get the number of results being shown in the control's filter bar (sample 1)

Tree1->BeginUpdate();
Tree1->Columns->Add(L"Item")->DisplayFilterButton = true;
Extreelib_tlb::IColumnPtr var_Column = Tree1->Columns->Add(L"Pos");
	var_Column->AllowSizing = false;
	var_Column->AllowSort = false;
	var_Column->Width = 32;
	var_Column->FormatColumn = L"1 apos ``";
	var_Column->Position = 0;
Extreelib_tlb::IItemsPtr var_Items = Tree1->Items;
	var_Items->AddItem(TVariant("Item A"));
	var_Items->AddItem(TVariant("Item B"));
	var_Items->AddItem(TVariant("Item C"));
Tree1->FilterBarFont = (IFontDisp*)(Tree1->Font);
Tree1->FilterBarCaption = L"`<b>` + value + `</b><r><fgcolor=808080>` + ( matchitemcount < 0 ? abs(matchitemcount + 1) + ` result(s)` : ``)";
Tree1->FilterBarPromptVisible = Extreelib_tlb::FilterBarVisibleEnum::exFilterBarCaptionVisible | Extreelib_tlb::FilterBarVisibleEnum::exFilterBarVisible | Extreelib_tlb::FilterBarVisibleEnum::exFilterBarPromptVisible;
Extreelib_tlb::IColumnPtr var_Column1 = Tree1->Columns->get_Item(TVariant(0));
	var_Column1->FilterType = Extreelib_tlb::FilterTypeEnum::exFilter;
	var_Column1->Filter = L"Item A|Item B";
Tree1->ApplyFilter();
Tree1->EndUpdate();

653:
FilterBarCaption Predefined Keywords

// AfterExpandItem event - Fired after an item is expanded (collapsed).
void __fastcall TForm1::Tree1AfterExpandItem(TObject *Sender,Extreelib_tlb::HITEM   Item)
{
	Tree1->Refresh();
}

Tree1->BeginUpdate();
Tree1->LinesAtRoot = Extreelib_tlb::LinesAtRootEnum::exLinesAtRoot;
Tree1->Columns->Add(L"Item")->DisplayFilterButton = true;
Extreelib_tlb::IColumnPtr var_Column = Tree1->Columns->Add(L"Check");
	var_Column->set_Def(Extreelib_tlb::DefColumnEnum::exCellHasCheckBox,TVariant(true));
	var_Column->DisplayFilterButton = true;
	var_Column->DisplayFilterPattern = false;
	var_Column->FilterType = Extreelib_tlb::FilterTypeEnum::exCheck;
Extreelib_tlb::IColumnPtr var_Column1 = Tree1->Columns->Add(L"Pos");
	var_Column1->AllowSizing = false;
	var_Column1->AllowSort = false;
	var_Column1->Width = 32;
	var_Column1->FormatColumn = L"1 apos ``";
	var_Column1->Position = 0;
Extreelib_tlb::IItemsPtr var_Items = Tree1->Items;
	var_Items->AddItem(TVariant("Item A"));
	long h = var_Items->AddItem(TVariant("Item B"));
	var_Items->set_CellState(TVariant(var_Items->InsertItem(h,TNoParam(),TVariant("Sub-Item B1"))),TVariant(1),1);
	var_Items->InsertItem(h,TNoParam(),TVariant("Sub-Item B2"));
	var_Items->set_ExpandItem(h,true);
	var_Items->AddItem(TVariant("Item C"));
Tree1->FilterInclude = Extreelib_tlb::FilterIncludeEnum::exItemsWithChilds;
Tree1->FilterBarFont = (IFontDisp*)(Tree1->Font);
Tree1->FilterBarCaption = TVariant(String("`<fgcolor=0000FF><i>value/current</i></fgcolor>: <fgcolor=808080>` + value + `</fgcolor>` + `<br><fgcolor=0000FF><i>available</") +
"i></fgcolor>: ` + available + `<br><fgcolor=0000FF><i>allui</i></fgcolor>: ` + allui + `<br><fgcolor=0000FF><i>all</i></fgcolor>" +
": ` + all + `<br><fgcolor=0000FF><i>itemcount</i></fgcolor>: <fgcolor=808080>` + itemcount + `</fgcolor>`+ `<br><fgcolor=0000FF>" +
"<i>visibleitemcount</i></fgcolor>: <fgcolor=808080>` + visibleitemcount + `</fgcolor>`+ `<br><fgcolor=0000FF><i>matchitemcount</" +
"i></fgcolor>: <fgcolor=808080>` + matchitemcount + `</fgcolor>`+ `<br><fgcolor=0000FF><i>promptpattern</i></fgcolor>: <fgcolor=8" +
"08080>` + promptpattern + `</fgcolor>`");
Tree1->FilterBarPromptPattern = L"B";
Tree1->FilterBarPromptVisible = Extreelib_tlb::FilterBarVisibleEnum::exFilterBarCaptionVisible | Extreelib_tlb::FilterBarVisibleEnum::exFilterBarVisible | Extreelib_tlb::FilterBarVisibleEnum::exFilterBarPromptVisible;
Extreelib_tlb::IColumnPtr var_Column2 = Tree1->Columns->get_Item(TVariant(0));
	var_Column2->FilterType = Extreelib_tlb::FilterTypeEnum::exFilter;
	var_Column2->Filter = L"Item A|Item B";
Tree1->ApplyFilter();
Tree1->EndUpdate();

652:
I am using filter prompt feature, and also column's filter, just wondering if possible to compact displaying the filter bar so it won't show on multiple lines

Tree1->BeginUpdate();
Tree1->Columns->Add(L"Item")->DisplayFilterButton = true;
Extreelib_tlb::IColumnPtr var_Column = Tree1->Columns->Add(L"Pos");
	var_Column->AllowSizing = false;
	var_Column->AllowSort = false;
	var_Column->Width = 32;
	var_Column->FormatColumn = L"1 apos ``";
	var_Column->Position = 0;
Extreelib_tlb::IItemsPtr var_Items = Tree1->Items;
	var_Items->AddItem(TVariant("Item A"));
	var_Items->AddItem(TVariant("Item B"));
	var_Items->AddItem(TVariant("Item C"));
Tree1->FilterBarFont = (IFontDisp*)(Tree1->Font);
Tree1->FilterBarCaption = L"`<r><i><fgcolor=808080><upline><solidline><sha ;;0>` + value";
Tree1->FilterBarPromptPattern = L"B";
Tree1->FilterBarPromptVisible = Extreelib_tlb::FilterBarVisibleEnum::exFilterBarCompact | Extreelib_tlb::FilterBarVisibleEnum::exFilterBarSingleLine | Extreelib_tlb::FilterBarVisibleEnum::exFilterBarVisible | Extreelib_tlb::FilterBarVisibleEnum::exFilterBarPromptVisible;
Extreelib_tlb::IColumnPtr var_Column1 = Tree1->Columns->get_Item(TVariant(0));
	var_Column1->FilterType = Extreelib_tlb::FilterTypeEnum::exFilter;
	var_Column1->Filter = L"Item A|Item B";
Tree1->ApplyFilter();
Tree1->EndUpdate();

651:
Just wondering if it is possible to show the filter bar's close button on the right ( sample 2 )

Tree1->BeginUpdate();
Tree1->Columns->Add(L"Item")->DisplayFilterButton = true;
Extreelib_tlb::IColumnPtr var_Column = Tree1->Columns->Add(L"Pos");
	var_Column->AllowSizing = false;
	var_Column->AllowSort = false;
	var_Column->Width = 32;
	var_Column->FormatColumn = L"1 apos ``";
	var_Column->Position = 0;
Extreelib_tlb::IItemsPtr var_Items = Tree1->Items;
	var_Items->AddItem(TVariant("Item A"));
	var_Items->AddItem(TVariant("Item B"));
	var_Items->AddItem(TVariant("Item C"));
Tree1->FilterBarPromptVisible = Extreelib_tlb::FilterBarVisibleEnum::exFilterBarShowCloseOnRight | Extreelib_tlb::FilterBarVisibleEnum::exFilterBarToggle | Extreelib_tlb::FilterBarVisibleEnum::exFilterBarPromptVisible;
Tree1->FilterBarPrompt = PChar(Tree1->FormatABC(L"`<r>` + value",TVariant(Tree1->FilterBarPrompt),TNoParam(),TNoParam()));
Tree1->EndUpdate();

650:
Just wondering if it is possible to show the filter bar's close button on the right ( sample 1 )

Tree1->BeginUpdate();
Tree1->RightToLeft = true;
Tree1->Columns->Add(L"Item")->DisplayFilterButton = true;
Extreelib_tlb::IColumnPtr var_Column = Tree1->Columns->Add(L"Pos");
	var_Column->AllowSizing = false;
	var_Column->AllowSort = false;
	var_Column->Width = 32;
	var_Column->FormatColumn = L"1 apos ``";
	var_Column->Position = 0;
Extreelib_tlb::IItemsPtr var_Items = Tree1->Items;
	var_Items->AddItem(TVariant("Item A"));
	var_Items->AddItem(TVariant("Item B"));
	var_Items->AddItem(TVariant("Item C"));
Tree1->FilterBarPromptVisible = Extreelib_tlb::FilterBarVisibleEnum::exFilterBarToggle | Extreelib_tlb::FilterBarVisibleEnum::exFilterBarPromptVisible;
Tree1->EndUpdate();

649:
How can I change the visual appearance of the filter bar's close button (EBN)

Tree1->BeginUpdate();
Extreelib_tlb::IAppearancePtr var_Appearance = Tree1->VisualAppearance;
	var_Appearance->Add(1,TVariant(String("gBFLBCJwBAEHhEJAAEhABHQDg6AADACAxRDgMQBQKAAzAJBIYhiG4cYCgMZhXDOCYXABCEYRXBIZQ7BKNIxjSJ5BhIAAyDSJMjSRJUEhqGCWYDleYYYAKHIMQLOg7IJ") +
"jyI4/SJAYCydKAWhxIaZKJHCZoEDaTAADCNVAQp6MEIJVbVEI0e79OgBLp/Z7kECIJJAaRjHQdJxGLA8EhtCQhCZteK6SgMKJYXhWQYRXI1JwvMBrWrdQjiOYELQtMKm" +
"SZNLYGG4dR5SVJbcYhSYsRRFMoyDIOXYDLKsdYqSpXIThObEGgaPqJYjsUjCMKnR7HVIURrBPC9TBPE69ZgmC6ucKPX51ShKFaBWDZcwFAS+UBuYCAILiEAQGZ1XT8OR" +
"OicbgJgSTJRlCaZeDsHY7QGR4xkSYp3CaExZAQMgalQYAwjCAAfBANxcA2TgKAUOpDCGFhKg0RpXCwCwDHQHQHEyAIkCkOhbFOGA8A8DohBgRg9AccZcn8EpEjMLI2C2" +
"DYxAgQgvAIUIVkoAAPBQDJlECTZ3CCYwDACQwUA8A5MCAWAWDiQi4l8aQOEgLJuBgBgDmYFAzEoIoIl0WALgKYJbBABADAAHgHg8VAMmqCQQDMXABAATYwTmNwBDATJX" +
"AiAgjHmNQ5lgQ5QEQEQMmcWg/GwD5ylyNw2gMcJcjsBgBgOQQDDhRpVAMMwnDBFw1B0Ax8D0DxOmmJJIGQTY5hGMAwkwM4CAYLZAmAOJnAqAojiIGg6iieYkmeAYOHaK" +
"JDCyCwjH6AoggsQpQliAJLhgaJ0CESBTnyDwjk+cg4g4P5IHIHJ+BWRRzlYWAxiOUxihsY4KjKLJRGqC44FCegkkkM58iAKAPnIWIWD8SRSFSfQnkmewUhYP4GiGKJ7G" +
"0TIbCSUoggqUo0lAQ4LnEcBcD8Coiiif4nE+eAAn2HpOkcFJqi4T5SkyMw/kqQown8IBIBOdA+A+DJrBqVxXEqYo4lCApLhGHBnD8S4ymyfxmg+cwQkQP5egOUZIWoEA" +
"kjIeIPBMBJBD+TBjBifwvkuc58hQJQPmFrYykkchclSApKjGOBuD+TRDFCfw3mmIxNi8FxFlOXhVC4aYDFyPgvg2YBcBcLZGCGCJ0DSLRzGSWQ/lmY5+mEP5gmMDBZRS" +
"MRsFsOxMhMJJ/DsTpTnwaQaE+N5ojuNhdEYNI5C4TZJO1GRDmCaxnA2Yx4n8IpIjOTBQBQC5TgyYw7gUYRYikC0BYRwsDQBoB8eA6Q2hsE0BUXgywZtYCyHMKwnxSAhA" +
"QHkIQhRrBaDsCwA4ERiB2EWAIYIXhhiVEgAEUYwwYjyASLge4FhHgRDkM8OQih0jWPkGgBBAQ"));
Tree1->Columns->Add(L"Item")->DisplayFilterButton = true;
Extreelib_tlb::IColumnPtr var_Column = Tree1->Columns->Add(L"Pos");
	var_Column->AllowSizing = false;
	var_Column->AllowSort = false;
	var_Column->Width = 32;
	var_Column->FormatColumn = L"1 apos ``";
	var_Column->Position = 0;
Extreelib_tlb::IItemsPtr var_Items = Tree1->Items;
	var_Items->AddItem(TVariant("Item A"));
	var_Items->AddItem(TVariant("Item B"));
	var_Items->AddItem(TVariant("Item C"));
Tree1->FilterBarPromptVisible = Extreelib_tlb::FilterBarVisibleEnum::exFilterBarToggle | Extreelib_tlb::FilterBarVisibleEnum::exFilterBarPromptVisible;
Tree1->Background[Extreelib_tlb::BackgroundPartEnum::exFooterFilterBarButton] = 0x1000000;
Tree1->EndUpdate();

648:
How can I change the visual appearance of the filter bar's close button (solid)

Tree1->BeginUpdate();
Tree1->Columns->Add(L"Item")->DisplayFilterButton = true;
Extreelib_tlb::IColumnPtr var_Column = Tree1->Columns->Add(L"Pos");
	var_Column->AllowSizing = false;
	var_Column->AllowSort = false;
	var_Column->Width = 32;
	var_Column->FormatColumn = L"1 apos ``";
	var_Column->Position = 0;
Extreelib_tlb::IItemsPtr var_Items = Tree1->Items;
	var_Items->AddItem(TVariant("Item A"));
	var_Items->AddItem(TVariant("Item B"));
	var_Items->AddItem(TVariant("Item C"));
Tree1->FilterBarPromptVisible = Extreelib_tlb::FilterBarVisibleEnum::exFilterBarPromptVisible;
Tree1->Background[Extreelib_tlb::BackgroundPartEnum::exFooterFilterBarButton] = RGB(255,0,0);
Tree1->EndUpdate();

647:
Is it possible to prevent definitely showing the filter bar's close button

Tree1->BeginUpdate();
Tree1->Columns->Add(L"Item")->DisplayFilterButton = true;
Extreelib_tlb::IColumnPtr var_Column = Tree1->Columns->Add(L"Pos");
	var_Column->AllowSizing = false;
	var_Column->AllowSort = false;
	var_Column->Width = 32;
	var_Column->FormatColumn = L"1 apos ``";
	var_Column->Position = 0;
Extreelib_tlb::IItemsPtr var_Items = Tree1->Items;
	var_Items->AddItem(TVariant("Item A"));
	var_Items->AddItem(TVariant("Item B"));
	var_Items->AddItem(TVariant("Item C"));
Tree1->FilterBarPromptVisible = Extreelib_tlb::FilterBarVisibleEnum::exFilterBarPromptVisible;
Tree1->Background[Extreelib_tlb::BackgroundPartEnum::exFooterFilterBarButton] = -1;
Tree1->EndUpdate();

646:
Is it possible to show the close button only if there is a filter applied

Tree1->BeginUpdate();
Tree1->Columns->Add(L"Item")->DisplayFilterButton = true;
Extreelib_tlb::IColumnPtr var_Column = Tree1->Columns->Add(L"Pos");
	var_Column->AllowSizing = false;
	var_Column->AllowSort = false;
	var_Column->Width = 32;
	var_Column->FormatColumn = L"1 apos ``";
	var_Column->Position = 0;
Extreelib_tlb::IItemsPtr var_Items = Tree1->Items;
	var_Items->AddItem(TVariant("Item A"));
	var_Items->AddItem(TVariant("Item B"));
	var_Items->AddItem(TVariant("Item C"));
Tree1->FilterBarPromptVisible = Extreelib_tlb::FilterBarVisibleEnum::exFilterBarShowCloseIfRequired | Extreelib_tlb::FilterBarVisibleEnum::exFilterBarPromptVisible;
Tree1->EndUpdate();

645:
The control's filter bar is not closed once I click the close button (toggle)

Tree1->BeginUpdate();
Tree1->Columns->Add(L"Item")->DisplayFilterButton = true;
Extreelib_tlb::IColumnPtr var_Column = Tree1->Columns->Add(L"Pos");
	var_Column->AllowSizing = false;
	var_Column->AllowSort = false;
	var_Column->Width = 32;
	var_Column->FormatColumn = L"1 apos ``";
	var_Column->Position = 0;
Extreelib_tlb::IItemsPtr var_Items = Tree1->Items;
	var_Items->AddItem(TVariant("Item A"));
	var_Items->AddItem(TVariant("Item B"));
	var_Items->AddItem(TVariant("Item C"));
	var_Items->set_LockedItemCount(Extreelib_tlb::VAlignmentEnum::BottomAlignment,1);
	long h = var_Items->get_LockedItem(Extreelib_tlb::VAlignmentEnum::BottomAlignment,0);
	var_Items->set_ItemDivider(h,0);
	var_Items->set_CellCaption(TVariant(h),TVariant(0),TVariant("<c><fgcolor=808080>Press the CTRL + F to turn on/off the control's filter bar. ALT + Up/Down moves the focus."));
	var_Items->set_CellCaptionFormat(TVariant(h),TVariant(0),Extreelib_tlb::CaptionFormatEnum::exHTML);
Tree1->FilterBarCaption = L"`<r><fgcolor=808080>` + value";
Tree1->FilterBarPromptPattern = L"B";
Tree1->FilterBarPromptVisible = Extreelib_tlb::FilterBarVisibleEnum::exFilterBarCompact | Extreelib_tlb::FilterBarVisibleEnum::exFilterBarToggle | Extreelib_tlb::FilterBarVisibleEnum::exFilterBarSingleLine | Extreelib_tlb::FilterBarVisibleEnum::exFilterBarVisible | Extreelib_tlb::FilterBarVisibleEnum::exFilterBarPromptVisible;
Extreelib_tlb::IColumnPtr var_Column1 = Tree1->Columns->get_Item(TVariant(0));
	var_Column1->FilterType = Extreelib_tlb::FilterTypeEnum::exFilter;
	var_Column1->Filter = L"Item B";
Tree1->ApplyFilter();
Tree1->EndUpdate();

644:
How can I display the control's filter on a single line

Tree1->BeginUpdate();
Tree1->Columns->Add(L"Item")->DisplayFilterButton = true;
Extreelib_tlb::IColumnPtr var_Column = Tree1->Columns->Add(L"Pos");
	var_Column->AllowSizing = false;
	var_Column->AllowSort = false;
	var_Column->Width = 32;
	var_Column->FormatColumn = L"1 apos ``";
	var_Column->Position = 0;
Extreelib_tlb::IItemsPtr var_Items = Tree1->Items;
	var_Items->AddItem(TVariant("Item A"));
	var_Items->AddItem(TVariant("Item B"));
	var_Items->AddItem(TVariant("Item C"));
Tree1->FilterBarCaption = L"len(value) ? `filter for: <fgcolor 808080>` + value  : `<fgcolor 808080>no filter`";
Tree1->FilterBarPromptVisible = Extreelib_tlb::FilterBarVisibleEnum::exFilterBarSingleLine | Extreelib_tlb::FilterBarVisibleEnum::exFilterBarVisible;
Extreelib_tlb::IColumnPtr var_Column1 = Tree1->Columns->get_Item(TVariant(0));
	var_Column1->FilterType = Extreelib_tlb::FilterTypeEnum::exFilter;
	var_Column1->Filter = L"Item A|Item B";
Tree1->ApplyFilter();
Tree1->EndUpdate();

643:
How can I display the control's filter on a single line (prompt-combined)

Tree1->BeginUpdate();
Tree1->Columns->Add(L"Item")->DisplayFilterButton = true;
Extreelib_tlb::IColumnPtr var_Column = Tree1->Columns->Add(L"Pos");
	var_Column->AllowSizing = false;
	var_Column->AllowSort = false;
	var_Column->Width = 32;
	var_Column->FormatColumn = L"1 apos ``";
	var_Column->Position = 0;
Extreelib_tlb::IItemsPtr var_Items = Tree1->Items;
	var_Items->AddItem(TVariant("Item A"));
	var_Items->AddItem(TVariant("Item B"));
	var_Items->AddItem(TVariant("Item C"));
Tree1->FilterBarCaption = L"`<r>` + value";
Tree1->FilterBarPromptVisible = Extreelib_tlb::FilterBarVisibleEnum::exFilterBarCompact | Extreelib_tlb::FilterBarVisibleEnum::exFilterBarSingleLine | Extreelib_tlb::FilterBarVisibleEnum::exFilterBarVisible | Extreelib_tlb::FilterBarVisibleEnum::exFilterBarPromptVisible;
Extreelib_tlb::IColumnPtr var_Column1 = Tree1->Columns->get_Item(TVariant(0));
	var_Column1->FilterType = Extreelib_tlb::FilterTypeEnum::exFilter;
	var_Column1->Filter = L"Item A|Item B";
Tree1->ApplyFilter();
Tree1->EndUpdate();

642:
How can I get the number of results after a filter is applied

// Click event - Occurs when the user presses and then releases the left mouse button over the tree control.
void __fastcall TForm1::Tree1Click(TObject *Sender)
{
	Tree1->ClearFilter();
}

// FilterChange event - Notifies your application that the filter is changed.
void __fastcall TForm1::Tree1FilterChange(TObject *Sender)
{
	OutputDebugString( L"Items.MatchItemCount" );
	OutputDebugString( PChar(Tree1->Items->MatchItemCount) );
	OutputDebugString( PChar(Tree1->FormatABC(L"value < 0 ? `filter applied: ` + abs(value + 1) + ` result(s)` : `no filter`",Tree1->Items->MatchItemCount,TNoParam(),TNoParam())) );
}

Tree1->BeginUpdate();
Tree1->Columns->Add(L"Item")->DisplayFilterButton = true;
Extreelib_tlb::IColumnPtr var_Column = Tree1->Columns->Add(L"Pos");
	var_Column->AllowSizing = false;
	var_Column->AllowSort = false;
	var_Column->Width = 32;
	var_Column->FormatColumn = L"1 apos ``";
	var_Column->Position = 0;
Extreelib_tlb::IItemsPtr var_Items = Tree1->Items;
	var_Items->AddItem(TVariant("Item A"));
	var_Items->AddItem(TVariant("Item B"));
	var_Items->AddItem(TVariant("Item C"));
Tree1->FilterBarPromptVisible = Extreelib_tlb::FilterBarVisibleEnum::exFilterBarPromptVisible;
Tree1->FilterBarPromptPattern = L"Item";
Tree1->EndUpdate();

641:
How can I programmatically clear the control's filter

// Click event - Occurs when the user presses and then releases the left mouse button over the tree control.
void __fastcall TForm1::Tree1Click(TObject *Sender)
{
	Tree1->ClearFilter();
}

Tree1->BeginUpdate();
Tree1->Columns->Add(L"Item")->DisplayFilterButton = true;
Extreelib_tlb::IColumnPtr var_Column = Tree1->Columns->Add(L"Pos");
	var_Column->AllowSizing = false;
	var_Column->AllowSort = false;
	var_Column->Width = 32;
	var_Column->FormatColumn = L"1 apos ``";
	var_Column->Position = 0;
Extreelib_tlb::IItemsPtr var_Items = Tree1->Items;
	var_Items->AddItem(TVariant("Item A"));
	var_Items->AddItem(TVariant("Item B"));
	var_Items->AddItem(TVariant("Item C"));
Tree1->FilterBarPromptVisible = Extreelib_tlb::FilterBarVisibleEnum::exFilterBarPromptVisible;
Tree1->FilterBarPromptPattern = L"B";
Tree1->EndUpdate();

640:
Is it possible to prevent closing the control's filter bar, so it is always shown (prompt-combined)

Tree1->BeginUpdate();
Tree1->Columns->Add(L"Item")->DisplayFilterButton = true;
Extreelib_tlb::IColumnPtr var_Column = Tree1->Columns->Add(L"Pos");
	var_Column->AllowSizing = false;
	var_Column->AllowSort = false;
	var_Column->Width = 32;
	var_Column->FormatColumn = L"1 apos ``";
	var_Column->Position = 0;
Extreelib_tlb::IItemsPtr var_Items = Tree1->Items;
	var_Items->AddItem(TVariant("Item A"));
	var_Items->AddItem(TVariant("Item B"));
	var_Items->AddItem(TVariant("Item C"));
Tree1->FilterBarPromptPattern = L"B";
Tree1->FilterBarPromptVisible = Extreelib_tlb::FilterBarVisibleEnum::exFilterBarVisible | Extreelib_tlb::FilterBarVisibleEnum::exFilterBarPromptVisible;
Extreelib_tlb::IColumnPtr var_Column1 = Tree1->Columns->get_Item(TVariant(0));
	var_Column1->FilterType = Extreelib_tlb::FilterTypeEnum::exFilter;
	var_Column1->Filter = L"Item B";
Tree1->ApplyFilter();
Tree1->EndUpdate();

639:
Is it possible to prevent closing the control's filter bar, so it is always shown (prompt)

Tree1->BeginUpdate();
Tree1->Columns->Add(L"Item")->DisplayFilterButton = true;
Extreelib_tlb::IColumnPtr var_Column = Tree1->Columns->Add(L"Pos");
	var_Column->AllowSizing = false;
	var_Column->AllowSort = false;
	var_Column->Width = 32;
	var_Column->FormatColumn = L"1 apos ``";
	var_Column->Position = 0;
Extreelib_tlb::IItemsPtr var_Items = Tree1->Items;
	var_Items->AddItem(TVariant("Item A"));
	var_Items->AddItem(TVariant("Item B"));
	var_Items->AddItem(TVariant("Item C"));
Tree1->FilterBarPromptVisible = Extreelib_tlb::FilterBarVisibleEnum::exFilterBarPromptVisible;
Tree1->FilterBarPromptPattern = L"B";
Tree1->EndUpdate();

638:
Is it possible to prevent closing the control's filter bar, so it is always shown

Tree1->BeginUpdate();
Tree1->Columns->Add(L"Item")->DisplayFilterButton = true;
Extreelib_tlb::IColumnPtr var_Column = Tree1->Columns->Add(L"Pos");
	var_Column->AllowSizing = false;
	var_Column->AllowSort = false;
	var_Column->Width = 32;
	var_Column->FormatColumn = L"1 apos ``";
	var_Column->Position = 0;
Extreelib_tlb::IItemsPtr var_Items = Tree1->Items;
	var_Items->AddItem(TVariant("Item A"));
	var_Items->AddItem(TVariant("Item B"));
	var_Items->AddItem(TVariant("Item C"));
Tree1->FilterBarCaption = L"len(value) = 0 ? `<fgcolor=808080>no filter` : value";
Tree1->FilterBarPromptVisible = Extreelib_tlb::FilterBarVisibleEnum::exFilterBarVisible;
Extreelib_tlb::IColumnPtr var_Column1 = Tree1->Columns->get_Item(TVariant(0));
	var_Column1->FilterType = Extreelib_tlb::FilterTypeEnum::exFilter;
	var_Column1->Filter = L"Item B";
Tree1->ApplyFilter();
Tree1->EndUpdate();

637:
How can I change the visual appearance of the +/- buttons, open/close glyphs as current visual theme (method 4)

Tree1->BeginUpdate();
Tree1->LinesAtRoot = Extreelib_tlb::LinesAtRootEnum::exLinesAtRoot;
Tree1->VisualDesign = TVariant(String("gBFLBWIgBAEHhEJAEGg6VAkHeLpgwChAOhULB8XAUUg8MAAREEHGMcgRCJ0ei8dhABDEcQAAYAQGKIYBkAKBQAGaAoDDMOQwQwAAxjGKEEwsACEIrjKCRShyCYZRhGc") +
"TSBCIZBqEqSZLiEZRQiiCYsS5GQBRWAkEwiBiEQTjea5CgOIAFS7LIqjRQEBxhIaZYIGaiQADENo9TxIMZAfBIHShK6NJABCCSQKkYx0HScRijDIEFwGIQmbKiej4DCi" +
"CQQW7OYYRVCNMQSfa8HivJyrcamfp/YBgOBYHb1eLVPR5LwfPCGUw1P6PLxkORZHimK4tSLHV7xVpMIwZFafIQhCCoHomS5NU7UNR0TQUFx9FaGX7rDDsGwLAJ6XRgF4" +
"bg2VpnHePpenAN4bH2GwHFmApSjEGBLnWOpRGOTBZHOegrE6BxPiWVJqCweQrn0LgJAWJBjwgaw1gKO5HmWch5h+fovF+G5bmich4BgfZkB8dynRUVYqiUR5rnmex/F6" +
"N4tn2AJfnebZ3DEXw3HWXgzAyIwgicKJKBKEIhCeCgiHyHYFEmSAFmqBghFIdgSCeIJygYDAyAgJx6AoIINAMOJNCgCZCGoGoLmMCI+CwJoihMNglCCIhzFCUg0EmMhg" +
"hWDBkAiQg9CUY4jEYN4Jk2IxklYJoJHIUg+CSZJSESFwkkkGI+FOFIJEIRhPhMCRJCSVoRrSBhiDgTZjHYT4PEkYhwhgJYm0SaIaiaSYuE+GQNlmCIBGCJxjhiZQ5AkM" +
"hAg6ExJCkPhPguaAiFYUAlAkKZ0g6HoOEmWR/GHcA4m0OwIlIJIHCRgQshGJhpjoaocieaZiC6GAimkUgehIOwnGYGYIGkah6jaE4rg6SpCjKK5rEOMYlGIGIihKOggl" +
"oFoqj6L5aGaBo6CkGIkAQjiPpCAAaJILCTJQlKPACDaXJgmSaJsnCdJ4nygKEoijKQpSmKcqCpKoqysK0rivLAsSyLMtC1LYty4Lkui7LwvS+L8wDBMIwzEMUxjHMgyT" +
"KMszDNM4zzQNE0jTNQ1TWNc2DZNo2zcN03jfOA4TiOM5DlOY5zoOk6jrOw7TuO88DxPI8z0PU9j3Pg+T6Ps/D9P4/0AQFAkDQRBUGQdCEJQpC0MQ1DkPRBEUSRNFEVBh" +
"FkXRhGQ9D6Dxfh+W5gGGd4QH2XQjCmDpFFaKoVB+D5Xmed5+H8YAHnIAh9EwV5Fl0d4MkMKJICmSgygSJAoEmMUCIPgnDCCIOQFYCxJjwFoCcA4kxoF+AIJkAgExegDE" +
"gEYQInAzCUAIOEGgfxiiRDYF1Q4EQ2BSCaEQYwbAiKREMpRSymFNDIAkAxT6oVRgSA2qdVKq1WqvVirMZQUhSCnBUMoIgoQRgnGSIQUgkg1hIHYAkAYMROAmHiLsE4xx" +
"SCxBwEwCQ0wmDdBsE0GYXBtg2CSPMFIuwYiQBYBQeAcwOCnBCCZgw0g0glBONAQgqQThCGgPQGoBQfiRGmOEZIPAXjsBoPAO4HRThhA0EQSA5BAgaCKJIGg3QdhOCmNU" +
"BoQAijTCIF0FwQxpCHDIPAYYMQGgtCmFcaQtRAjZCyFYSojQ2B2BoKwIYFApBXEIBsIQ1QsAWAWEwaA1xCgjAoIAQBAQ=");
Tree1->Columns->Add(L"Column");
Extreelib_tlb::IItemsPtr var_Items = Tree1->Items;
	long h = var_Items->AddItem(TVariant("Root 1"));
	var_Items->InsertItem(h,TNoParam(),TVariant("Child 1"));
	var_Items->InsertItem(h,TNoParam(),TVariant("Child 2"));
	var_Items->set_ExpandItem(h,true);
	h = var_Items->AddItem(TVariant("Root 2"));
	var_Items->InsertItem(h,TNoParam(),TVariant("Child"));
Tree1->EndUpdate();

636:
How can I change the visual appearance of the +/- buttons, open/close glyphs as current visual theme (method 3)

Tree1->BeginUpdate();
Extreelib_tlb::IAppearancePtr var_Appearance = Tree1->VisualAppearance;
	var_Appearance->Add(3,TVariant(String("gBFLBCJwBAEHhEJAAEhABDwCg6AADACAxRDgMQBQKAAzAJBIYhiG4cYCgMZhXDOCYXABCEYRXBIZQ7BKNIxjSJ5BhIAAyDSJMjSRJUEhqGCWYDleYYYAKHIMQLJQKQS") +
"BcQR9EaBZBAWTpQC0OJDTJRI4TNAgbSYAAYRqoCb6loTKypaxjCQQIgkUBpGKdBynEYsDwSGyJCCJWyIbpKAwoVbcs4AYhuJpaQi+d5PFbjVT8dLAMBwLA8EwXAJ+Opf" +
"DxXU7eFKpR5fchXTI8UxXFqXZhkeQrfh7KYVRBKdBQRBEFQPJqnahqOpaXo2RoLUJKcQwHTmHYNQTALyuTALZrWeZ3XrgN74LbtZzVQauYRpbCMEr6bpoWLnFi6Ho1U4" +
"llWah1jqSweFqfxPgQQRphi+Yak0YIuqUfJegef4zluaJ3nqPJeCYH4BAeX5TDLBpVGqKRRnwf4flefZtHsX54BYAR/F+EwVnUd5eAMMJKDIChygyIQpAoEh4iIJ5Jlg" +
"XIcgCXpIGoFwnGEQh6BEKBgmMIICHgIJCAiUAzgyUoAhwJohkiRgygwYpiGoKwzGIcgKCkNQNCMRIbCYCRYk4QoMiOchWDwNBjhiJJaDYTRiGiFwlCQAhOE8JBJHITIR" +
"gwZRZFCFCZBkOIUhKTRpCWAwgGYQ4El4NxlBifIWCcCYCFoaoMGaKYyG6GxlBmGJdhkCAWBIeA5g4U4QhMJAImkPIShRVxGgQJRlCIUISh+SJpnCZIeBgFgiHgO4OlOM" +
"INCISByECDQikkGhuh2JwpmqBogCKaYiC6FwhmkQ4yHgYgYiaHopiuaRakCbIsisSpGjYOwaHYKYMCkK5CA2IxrCwCwFigaJrkLTI6lcdANAEgIA="));
	var_Appearance->Add(1,TVariant("CP:3 -2 -2 2 2"));
	var_Appearance->Add(4,TVariant(String("gBFLBCJwBAEHhEJAAEhABEICg6AADACAxRDgMQBQKAAzAJBIYhiG4cYCgMZhXDOCYXABCEYRXBIZQ7BKNIxjSJ5BhIAAyDSJMjSRJUEhqGCWYDleYYYAKHIMQLJQKQS") +
"BcQR9EaBZBAWTpQC0OJDTJRI4TNAgbSYAAYRqoCb6loTKypaxjCQQIgkUBpGKdBynEYsDwSGyJCCJWyIbpKAwoVbcs4AYhuJpaQi+d5PFbjVT8dLAMBwLA8EwXAJ+Opf" +
"DxXU7eFKpR5fchXTI8UxXFqXZhkeQrfh7KYVRBKdBQRBEFQPJqnahqOpaXo2RoLUJKcQwHTmHYNQTALyuTALZrWeZ3XrgN74LbtZzVQauYRpbCMEr6bpoWLnFi6Ho1U4" +
"llWah1jqSweFqfxPgQQRphi+Yak0YIuqUfJeg8X4rluaZ3niGB+AQHx/EyShjjEVYqiUR5rnmex/GAB5+AIf4gEeXJFHyXZ3gCTAygyAociMKBKEKBIeCiCZyHYFAnCE" +
"eBkh+BghFgRIegOCgYCySAgh4CAkgINAMmMNIgCcCYjn4LoLmMCJGDKC5ijIagoDMYhCAoJg1A0IxEhsJgJFiThChCY5yFYPA0GOGIYloNhNGIaIXCUJACE4TwkEkchO" +
"FSFYlFkXhUCUCQZEYTglCSMxaEkYJIBmFJhDeDZZEYPwlgmQhghaGqVDoa4bGaeY6FGGZNlmFIBGEJ4jhiZQ5AkMhAg6E5JCkRoGCUSQ6B6CYiSCBIOh+DhJmmARiWQO" +
"JtDsCJSCSBwkXSLIRicaZ6HqIIomoIguhwIpphIHoWDsJ4mCGChpmqOpGheLIOkqUo2iya4DjGJxihiQoSj4IJaDaMpCjCWoGg6PgpBiQ4tHcQJQBAgI="));
	var_Appearance->Add(2,TVariant("CP:4 -2 -2 2 2"));
Tree1->LinesAtRoot = Extreelib_tlb::LinesAtRootEnum::exGroupLinesAtRoot;
Tree1->HasButtons = Extreelib_tlb::ExpandButtonEnum::exCustom;
Tree1->HasButtonsCustom[false] = 16777216;
Tree1->HasButtonsCustom[true] = 33554432;
Tree1->Columns->Add(L"Column");
Extreelib_tlb::IItemsPtr var_Items = Tree1->Items;
	long h = var_Items->AddItem(TVariant("Root 1"));
	var_Items->InsertItem(h,TNoParam(),TVariant("Child 1"));
	var_Items->InsertItem(h,TNoParam(),TVariant("Child 2"));
	var_Items->set_ExpandItem(h,true);
	h = var_Items->AddItem(TVariant("Root 2"));
	var_Items->InsertItem(h,TNoParam(),TVariant("Child"));
Tree1->EndUpdate();

635:
How can I change the visual appearance of the +/- buttons, open/close glyphs as current visual theme (method 2)

Tree1->BeginUpdate();
Extreelib_tlb::IAppearancePtr var_Appearance = Tree1->VisualAppearance;
	var_Appearance->Add(1,TVariant("XP:TREEVIEW 2 1"));
	var_Appearance->Add(2,TVariant("XP:TREEVIEW 2 2"));
Tree1->Background[Extreelib_tlb::BackgroundPartEnum::exTreeGlyphOpen] = 0x1000000;
Tree1->Background[Extreelib_tlb::BackgroundPartEnum::exTreeGlyphClose] = 0x2000000;
Tree1->LinesAtRoot = Extreelib_tlb::LinesAtRootEnum::exLinesAtRoot;
Tree1->Columns->Add(L"Column");
Extreelib_tlb::IItemsPtr var_Items = Tree1->Items;
	long h = var_Items->AddItem(TVariant("Root 1"));
	var_Items->InsertItem(h,TNoParam(),TVariant("Child 1"));
	var_Items->InsertItem(h,TNoParam(),TVariant("Child 2"));
	var_Items->set_ExpandItem(h,true);
	h = var_Items->AddItem(TVariant("Root 2"));
	var_Items->InsertItem(h,TNoParam(),TVariant("Child"));
Tree1->EndUpdate();

634:
How can I find if the control is running in DPI mode
OutputDebugString( PChar(Tree1->FormatABC(L"dpi = 1 ? `normal/stretch mode` : `dpi mode`",TNoParam(),TNoParam(),TNoParam())) );

633:
How can I change the visual appearance of the +/- buttons (method 1)

Tree1->BeginUpdate();
Extreelib_tlb::IAppearancePtr var_Appearance = Tree1->VisualAppearance;
	var_Appearance->Add(1,TVariant(String("gBFLBCJwBAEHhEJAAEhABDwCg6AADACAxRDgMQBQKAAzAJBIYhiG4cYCgMZhXDOCYXABCEYRXBIZQ7BKNIxjSJ5BhIAAyDSJMjSRJUEhqGCWYDleYYYAKHIMQLJQKQS") +
"BcQR9EaBZBAWTpQC0OJDTJRI4TNAgbSYAAYRqoCb6loTKypaxjCQQIgkUBpGKdBynEYsDwSGyJCCJWyIbpKAwoVbcs4AYhuJpaQi+d5PFbjVT8dLAMBwLA8EwXAJ+Opf" +
"DxXU7eFKpR5fchXTI8UxXFqXZhkeQrfh7KYVRBKdBQRBEFQPJqnahqOpaXo2RoLUJKcQwHTmHYNQTALyuTALZrWeZ3XrgN74LbtZzVQauYRpbCMEr6bpoWLnFi6Ho1U4" +
"llWah1jqSweFqfxPgQQRphi+Yak0YIuqUfJegef4zluaJ3nqPJeCYH4BAeX5TDLBpVGqKRRnwf4flefZtHsX54BYAR/F+EwVnUd5eAMMJKDIChygyIQpAoEh4iIJ5Jlg" +
"XIcgCXpIGoFwnGEQh6BEKBgmMIICHgIJCAiUAzgyUoAhwJohkiRgygwYpiGoKwzGIcgKCkNQNCMRIbCYCRYk4QoMiOchWDwNBjhiJJaDYTRiGiFwlCQAhOE8JBJHITIR" +
"gwZRZFCFCZBkOIUhKTRpCWAwgGYQ4El4NxlBifIWCcCYCFoaoMGaKYyG6GxlBmGJdhkCAWBIeA5g4U4QhMJAImkPIShRVxGgQJRlCIUISh+SJpnCZIeBgFgiHgO4OlOM" +
"INCISByECDQikkGhuh2JwpmqBogCKaYiC6FwhmkQ4yHgYgYiaHopiuaRakCbIsisSpGjYOwaHYKYMCkK5CA2IxrCwCwFigaJrkLTI6lcdANAEgIA="));
	var_Appearance->Add(2,TVariant(String("gBFLBCJwBAEHhEJAAEhABEICg6AADACAxRDgMQBQKAAzAJBIYhiG4cYCgMZhXDOCYXABCEYRXBIZQ7BKNIxjSJ5BhIAAyDSJMjSRJUEhqGCWYDleYYYAKHIMQLJQKQS") +
"BcQR9EaBZBAWTpQC0OJDTJRI4TNAgbSYAAYRqoCb6loTKypaxjCQQIgkUBpGKdBynEYsDwSGyJCCJWyIbpKAwoVbcs4AYhuJpaQi+d5PFbjVT8dLAMBwLA8EwXAJ+Opf" +
"DxXU7eFKpR5fchXTI8UxXFqXZhkeQrfh7KYVRBKdBQRBEFQPJqnahqOpaXo2RoLUJKcQwHTmHYNQTALyuTALZrWeZ3XrgN74LbtZzVQauYRpbCMEr6bpoWLnFi6Ho1U4" +
"llWah1jqSweFqfxPgQQRphi+Yak0YIuqUfJeg8X4rluaZ3niGB+AQHx/EyShjjEVYqiUR5rnmex/GAB5+AIf4gEeXJFHyXZ3gCTAygyAociMKBKEKBIeCiCZyHYFAnCE" +
"eBkh+BghFgRIegOCgYCySAgh4CAkgINAMmMNIgCcCYjn4LoLmMCJGDKC5ijIagoDMYhCAoJg1A0IxEhsJgJFiThChCY5yFYPA0GOGIYloNhNGIaIXCUJACE4TwkEkchO" +
"FSFYlFkXhUCUCQZEYTglCSMxaEkYJIBmFJhDeDZZEYPwlgmQhghaGqVDoa4bGaeY6FGGZNlmFIBGEJ4jhiZQ5AkMhAg6E5JCkRoGCUSQ6B6CYiSCBIOh+DhJmmARiWQO" +
"JtDsCJSCSBwkXSLIRicaZ6HqIIomoIguhwIpphIHoWDsJ4mCGChpmqOpGheLIOkqUo2iya4DjGJxihiQoSj4IJaDaMpCjCWoGg6PgpBiQ4tHcQJQBAgI="));
Tree1->LinesAtRoot = Extreelib_tlb::LinesAtRootEnum::exLinesAtRoot;
Tree1->Background[Extreelib_tlb::BackgroundPartEnum::exTreeGlyphOpen] = 0x1000000;
Tree1->Background[Extreelib_tlb::BackgroundPartEnum::exTreeGlyphClose] = 0x2000000;
Tree1->Columns->Add(L"Column");
Extreelib_tlb::IItemsPtr var_Items = Tree1->Items;
	long h = var_Items->AddItem(TVariant("Root 1"));
	var_Items->InsertItem(h,TNoParam(),TVariant("Child 1"));
	var_Items->InsertItem(h,TNoParam(),TVariant("Child 2"));
	var_Items->set_ExpandItem(h,true);
	h = var_Items->AddItem(TVariant("Root 2"));
	var_Items->InsertItem(h,TNoParam(),TVariant("Child"));
Tree1->EndUpdate();

632:
I am using single selection, the question is if possible to select an item only when the user releases the mouse, as currently it selects the item as soon as the user clicks it
// SelectionChanged event - Fired after a new item has been selected.
void __fastcall TForm1::Tree1SelectionChanged(TObject *Sender)
{
	OutputDebugString( L"SelectionChanged" );
}

Tree1->BeginUpdate();
Tree1->FreezeEvents(true);
Tree1->SingleSel = true;
Tree1->SelectOnRelease = true;
Tree1->Columns->Add(L"Column")->FormatColumn = L"1 apos `A-Z`";
Extreelib_tlb::IItemsPtr var_Items = Tree1->Items;
	var_Items->AddItem(TVariant(""));
	var_Items->set_SelectItem(var_Items->AddItem(TVariant("")),true);
	var_Items->AddItem(TVariant(""));
Tree1->FreezeEvents(false);
Tree1->EndUpdate();

631:
Is it possible to select nothing
// SelectionChanged event - Fired after a new item has been selected.
void __fastcall TForm1::Tree1SelectionChanged(TObject *Sender)
{
	OutputDebugString( L"SelectionChanged" );
}

Tree1->BeginUpdate();
Tree1->FreezeEvents(true);
Tree1->AllowSelectNothing = true;
Tree1->Columns->Add(L"Column")->FormatColumn = L"1 apos `A-Z`";
Extreelib_tlb::IItemsPtr var_Items = Tree1->Items;
	var_Items->AddItem(TVariant(""));
	var_Items->set_SelectItem(var_Items->AddItem(TVariant("")),true);
	var_Items->AddItem(TVariant(""));
Tree1->FreezeEvents(false);
Tree1->EndUpdate();

630:
How can I specify the color for control's selection when it loses the focus

Tree1->BeginUpdate();
Extreelib_tlb::IColumnPtr var_Column = Tree1->Columns->Add(L"");
	var_Column->AllowSizing = false;
	var_Column->AllowDragging = false;
	var_Column->AllowSort = false;
	var_Column->Width = 24;
	var_Column->set_Def(Extreelib_tlb::DefColumnEnum::exCellHasButton,TVariant(true));
Tree1->Columns->Add(L"Column")->FormatColumn = L"1 apos `A-Z`";
Extreelib_tlb::IItemsPtr var_Items = Tree1->Items;
	var_Items->AddItem(TVariant(""));
	var_Items->set_SelectItem(var_Items->AddItem(TVariant("")),true);
	var_Items->AddItem(TVariant(""));
Tree1->Background[Extreelib_tlb::BackgroundPartEnum::exSelBackColorHide] = RGB(196,196,196);
Tree1->Background[Extreelib_tlb::BackgroundPartEnum::exSelForeColorHide] = RGB(0,0,1);
Tree1->EndUpdate();

629:
How can I change the background color for checked items (EBN color, frame)

// CellStateChanged event - Fired after cell's state has been changed.
void __fastcall TForm1::Tree1CellStateChanged(TObject *Sender,Extreelib_tlb::HITEM   Item,long   ColIndex)
{
	Tree1->Refresh();
}

Tree1->BeginUpdate();
Tree1->LinesAtRoot = Extreelib_tlb::LinesAtRootEnum::exLinesAtRoot;
Tree1->SelBackMode = Extreelib_tlb::BackModeEnum::exTransparent;
Tree1->DefaultItemHeight = 22;
Extreelib_tlb::IColumnPtr var_Column = Tree1->Columns->Add(L"Tasks");
	var_Column->set_Def(Extreelib_tlb::DefColumnEnum::exCellHasCheckBox,TVariant(true));
	var_Column->PartialCheck = true;
Extreelib_tlb::IAppearancePtr var_Appearance = Tree1->VisualAppearance;
	var_Appearance->Add(2,TVariant(String("gBFLBCJwBAEHhEJAAEhABUkIQAAYAQGKIcBiAKBQAGYBIJDEMQ3DjAUBjMK4ZwTC4AIQjCK4JDKHYJRpHEZgLBMJAAGIZYhhUYRUiYMkiJBGGDIDiGGI2SJAcbTVIEc") +
"x9EyUJSgSTJOjCMokTTIU4TTLYASbJafJJhWSaAiyMouDIOMg1BDNIw/Hika6jOgKUisNJXRzWIBTbDlOQ3JqnbCjOQRSrQBoNDAMAiiaKlbwJPK9RoieQXfwUAJrXJc" +
"FqXFSLVxNBKAQEBA="));
	var_Appearance->Add(1,TVariant("CP:2 1 1 -1 -1"));
Extreelib_tlb::IConditionalFormatPtr var_ConditionalFormat = Tree1->ConditionalFormats->Add(L"%CS0 = 1",TNoParam());
	var_ConditionalFormat->BackColor = 0x1000000;
Tree1->HeaderVisible = true;
Extreelib_tlb::IItemsPtr var_Items = Tree1->Items;
	long h = var_Items->AddItem(TVariant("Project"));
	long hChild = var_Items->InsertItem(h,TNoParam(),TVariant("Task 1"));
	var_Items->set_SelectItem(hChild,true);
	hChild = var_Items->InsertItem(h,TNoParam(),TVariant("Task 2"));
	var_Items->set_CellState(TVariant(hChild),TNoParam(),1);
	hChild = var_Items->InsertItem(h,TNoParam(),TVariant("Task 3"));
	var_Items->set_CellState(TVariant(hChild),TNoParam(),1);
	var_Items->set_ExpandItem(h,true);
Tree1->EndUpdate();

628:
How can I change the caption of the checked items (sample 2)

Tree1->BeginUpdate();
Tree1->LinesAtRoot = Extreelib_tlb::LinesAtRootEnum::exLinesAtRoot;
Extreelib_tlb::IColumnPtr var_Column = Tree1->Columns->Add(L"Tasks");
	var_Column->set_Def(Extreelib_tlb::DefColumnEnum::exCellHasCheckBox,TVariant(true));
	var_Column->PartialCheck = true;
	var_Column->set_Def(Extreelib_tlb::DefColumnEnum::exCellCaptionFormat,TVariant(1));
	var_Column->FormatColumn = L"%CS0 = 1 ? `<bgcolor=000000><fgcolor=FFFFFF> ` + value + ` </fgcolor></bgcolor>` : value";
Tree1->HeaderVisible = true;
Extreelib_tlb::IItemsPtr var_Items = Tree1->Items;
	long h = var_Items->AddItem(TVariant("Project"));
	long hChild = var_Items->InsertItem(h,TNoParam(),TVariant("Task 1"));
	var_Items->set_SelectItem(hChild,true);
	hChild = var_Items->InsertItem(h,TNoParam(),TVariant("Task 2"));
	var_Items->set_CellState(TVariant(hChild),TNoParam(),1);
	hChild = var_Items->InsertItem(h,TNoParam(),TVariant("Task 3"));
	var_Items->set_CellState(TVariant(hChild),TNoParam(),1);
	var_Items->set_ExpandItem(h,true);
Tree1->EndUpdate();

627:
How can I change the caption of the checked items (sample 1)

Tree1->BeginUpdate();
Tree1->LinesAtRoot = Extreelib_tlb::LinesAtRootEnum::exLinesAtRoot;
Extreelib_tlb::IColumnPtr var_Column = Tree1->Columns->Add(L"Tasks");
	var_Column->set_Def(Extreelib_tlb::DefColumnEnum::exCellHasCheckBox,TVariant(true));
	var_Column->PartialCheck = true;
	var_Column->set_Def(Extreelib_tlb::DefColumnEnum::exCellCaptionFormat,TVariant(1));
	var_Column->FormatColumn = L"value + (%CS0 = 1 ? `<r><fgcolor=808080>(checked)` : ``)";
Tree1->HeaderVisible = true;
Extreelib_tlb::IItemsPtr var_Items = Tree1->Items;
	long h = var_Items->AddItem(TVariant("Project"));
	long hChild = var_Items->InsertItem(h,TNoParam(),TVariant("Task 1"));
	var_Items->set_SelectItem(hChild,true);
	hChild = var_Items->InsertItem(h,TNoParam(),TVariant("Task 2"));
	var_Items->set_CellState(TVariant(hChild),TNoParam(),1);
	hChild = var_Items->InsertItem(h,TNoParam(),TVariant("Task 3"));
	var_Items->set_CellState(TVariant(hChild),TNoParam(),1);
	var_Items->set_ExpandItem(h,true);
Tree1->EndUpdate();

626:
How can I change the font for the checked items

// CellStateChanged event - Fired after cell's state has been changed.
void __fastcall TForm1::Tree1CellStateChanged(TObject *Sender,Extreelib_tlb::HITEM   Item,long   ColIndex)
{
	Tree1->Refresh();
}

Tree1->BeginUpdate();
Tree1->LinesAtRoot = Extreelib_tlb::LinesAtRootEnum::exLinesAtRoot;
Tree1->DefaultItemHeight = 22;
Extreelib_tlb::IColumnPtr var_Column = Tree1->Columns->Add(L"Tasks");
	var_Column->set_Def(Extreelib_tlb::DefColumnEnum::exCellHasCheckBox,TVariant(true));
	var_Column->PartialCheck = true;
Extreelib_tlb::IConditionalFormatPtr var_ConditionalFormat = Tree1->ConditionalFormats->Add(L"%CS0 = 1",TNoParam());
	/*
	Select the Component\Import Component...\Import a Type Library,
	to import the following Type Library:

		OLE Automation

	TypeLib: stdole2.tlb

	to define the namespace: Stdole_tlb
*/
//#include "STDOLE_TLB.h"
	Stdole_tlb::FontPtr f = Variant::CreateObject(L"StdFont");
		f->Name = Tree1->Font->Name;
		f->Size = TVariant(long(12));
	var_ConditionalFormat->Font = (IFontDisp*)(f);
Tree1->HeaderVisible = true;
Extreelib_tlb::IItemsPtr var_Items = Tree1->Items;
	long h = var_Items->AddItem(TVariant("Project"));
	long hChild = var_Items->InsertItem(h,TNoParam(),TVariant("Task 1"));
	var_Items->set_SelectItem(hChild,true);
	hChild = var_Items->InsertItem(h,TNoParam(),TVariant("Task 2"));
	var_Items->set_CellState(TVariant(hChild),TNoParam(),1);
	hChild = var_Items->InsertItem(h,TNoParam(),TVariant("Task 3"));
	var_Items->set_CellState(TVariant(hChild),TNoParam(),1);
	var_Items->set_ExpandItem(h,true);
Tree1->EndUpdate();

625:
How can I bold the checked items

// CellStateChanged event - Fired after cell's state has been changed.
void __fastcall TForm1::Tree1CellStateChanged(TObject *Sender,Extreelib_tlb::HITEM   Item,long   ColIndex)
{
	Tree1->Refresh();
}

Tree1->BeginUpdate();
Tree1->LinesAtRoot = Extreelib_tlb::LinesAtRootEnum::exLinesAtRoot;
Extreelib_tlb::IColumnPtr var_Column = Tree1->Columns->Add(L"Tasks");
	var_Column->set_Def(Extreelib_tlb::DefColumnEnum::exCellHasCheckBox,TVariant(true));
	var_Column->PartialCheck = true;
Extreelib_tlb::IConditionalFormatPtr var_ConditionalFormat = Tree1->ConditionalFormats->Add(L"%CS0 = 1",TNoParam());
	var_ConditionalFormat->Bold = true;
Tree1->HeaderVisible = true;
Extreelib_tlb::IItemsPtr var_Items = Tree1->Items;
	long h = var_Items->AddItem(TVariant("Project"));
	long hChild = var_Items->InsertItem(h,TNoParam(),TVariant("Task 1"));
	var_Items->set_SelectItem(hChild,true);
	hChild = var_Items->InsertItem(h,TNoParam(),TVariant("Task 2"));
	var_Items->set_CellState(TVariant(hChild),TNoParam(),1);
	hChild = var_Items->InsertItem(h,TNoParam(),TVariant("Task 3"));
	var_Items->set_CellState(TVariant(hChild),TNoParam(),1);
	var_Items->set_ExpandItem(h,true);
Tree1->EndUpdate();

624:
How can I change the foreground color for checked items

// CellStateChanged event - Fired after cell's state has been changed.
void __fastcall TForm1::Tree1CellStateChanged(TObject *Sender,Extreelib_tlb::HITEM   Item,long   ColIndex)
{
	Tree1->Refresh();
}

Tree1->BeginUpdate();
Tree1->LinesAtRoot = Extreelib_tlb::LinesAtRootEnum::exLinesAtRoot;
Tree1->SelBackMode = Extreelib_tlb::BackModeEnum::exTransparent;
Extreelib_tlb::IColumnPtr var_Column = Tree1->Columns->Add(L"Tasks");
	var_Column->set_Def(Extreelib_tlb::DefColumnEnum::exCellHasCheckBox,TVariant(true));
	var_Column->PartialCheck = true;
Extreelib_tlb::IConditionalFormatPtr var_ConditionalFormat = Tree1->ConditionalFormats->Add(L"%CS0 = 1",TNoParam());
	var_ConditionalFormat->ForeColor = RGB(255,128,128);
Tree1->HeaderVisible = true;
Extreelib_tlb::IItemsPtr var_Items = Tree1->Items;
	long h = var_Items->AddItem(TVariant("Project"));
	long hChild = var_Items->InsertItem(h,TNoParam(),TVariant("Task 1"));
	var_Items->set_SelectItem(hChild,true);
	hChild = var_Items->InsertItem(h,TNoParam(),TVariant("Task 2"));
	var_Items->set_CellState(TVariant(hChild),TNoParam(),1);
	hChild = var_Items->InsertItem(h,TNoParam(),TVariant("Task 3"));
	var_Items->set_CellState(TVariant(hChild),TNoParam(),1);
	var_Items->set_ExpandItem(h,true);
Tree1->EndUpdate();

623:
How can I change the background color for checked items (solid color)

// CellStateChanged event - Fired after cell's state has been changed.
void __fastcall TForm1::Tree1CellStateChanged(TObject *Sender,Extreelib_tlb::HITEM   Item,long   ColIndex)
{
	Tree1->Refresh();
}

Tree1->BeginUpdate();
Tree1->LinesAtRoot = Extreelib_tlb::LinesAtRootEnum::exLinesAtRoot;
Tree1->SelBackMode = Extreelib_tlb::BackModeEnum::exTransparent;
Extreelib_tlb::IColumnPtr var_Column = Tree1->Columns->Add(L"Tasks");
	var_Column->set_Def(Extreelib_tlb::DefColumnEnum::exCellHasCheckBox,TVariant(true));
	var_Column->PartialCheck = true;
Extreelib_tlb::IConditionalFormatPtr var_ConditionalFormat = Tree1->ConditionalFormats->Add(L"%CS0 = 1",TNoParam());
	var_ConditionalFormat->BackColor = RGB(255,128,128);
Tree1->HeaderVisible = true;
Extreelib_tlb::IItemsPtr var_Items = Tree1->Items;
	long h = var_Items->AddItem(TVariant("Project"));
	long hChild = var_Items->InsertItem(h,TNoParam(),TVariant("Task 1"));
	var_Items->set_SelectItem(hChild,true);
	hChild = var_Items->InsertItem(h,TNoParam(),TVariant("Task 2"));
	var_Items->set_CellState(TVariant(hChild),TNoParam(),1);
	hChild = var_Items->InsertItem(h,TNoParam(),TVariant("Task 3"));
	var_Items->set_CellState(TVariant(hChild),TNoParam(),1);
	var_Items->set_ExpandItem(h,true);
Tree1->EndUpdate();

622:
How can I export the cell's state as well

Tree1->BeginUpdate();
Extreelib_tlb::IColumnsPtr var_Columns = Tree1->Columns;
	var_Columns->Add(L"C1")->set_Def(Extreelib_tlb::DefColumnEnum::exCellHasCheckBox,TVariant(true));
	var_Columns->Add(L"C2")->FormatColumn = L"1 index `A-Z`";
	var_Columns->Add(L"C3")->FormatColumn = L"100 index ``";
Extreelib_tlb::IItemsPtr var_Items = Tree1->Items;
	var_Items->AddItem(TVariant("Item 1"));
	var_Items->set_CellState(TVariant(var_Items->AddItem(TVariant("Item 2"))),TNoParam(),1);
	var_Items->set_CellState(TVariant(var_Items->AddItem(TVariant("Item 3"))),TNoParam(),1);
Tree1->EndUpdate();
OutputDebugString( L"Export CSV Items including Check-State:" );
Tree1->BeginUpdate();
Extreelib_tlb::IColumnPtr var_Column = Tree1->Columns->Add(L"Check");
	var_Column->Position = 0;
	var_Column->FormatColumn = L"%CS0";
OutputDebugString( PChar(Tree1->Export(TVariant(""),TNoParam())) );
Tree1->Columns->Remove(TVariant("Check"));
Tree1->EndUpdate();

621:
The BeforeExpandItem event is fired when clicking the drop down filter button. What we can do to prevent that (method 2)
// BeforeExpandItem event - Fired before an item is about to be expanded (collapsed).
void __fastcall TForm1::Tree1BeforeExpandItem(TObject *Sender,Extreelib_tlb::HITEM   Item,Variant *   Cancel)
{
	OutputDebugString( L"BeforeExpandItem" );
	OutputDebugString( L"Item" );
	OutputDebugString( L"ColumnFromPoint" );
	OutputDebugString( PChar(Tree1->ColumnFromPoint[-1,-1]) );
	OutputDebugString( L"ColumnFromPoint return -1, if the user clicks the +/- glitch, else it returns the index of the column where the click occurs." );
	Tree1->Items->InsertItem(Item,TNoParam(),TVariant("new child"));
}

Tree1->BeginUpdate();
Tree1->LinesAtRoot = Extreelib_tlb::LinesAtRootEnum::exLinesAtRoot;
Extreelib_tlb::IColumnsPtr var_Columns = Tree1->Columns;
	var_Columns->Add(L"Items")->DisplayFilterButton = true;
Extreelib_tlb::IItemsPtr var_Items = Tree1->Items;
	var_Items->set_ItemHasChildren(var_Items->InsertItem(TNoParam(),TNoParam(),TVariant("Group 1")),true);
	var_Items->set_ItemHasChildren(var_Items->InsertItem(TNoParam(),TNoParam(),TVariant("Group 2")),true);
Tree1->EndUpdate();

620:
The BeforeExpandItem event is fired when clicking the drop down filter button. What we can do to prevent that (method 1)
// BeforeExpandItem event - Fired before an item is about to be expanded (collapsed).
void __fastcall TForm1::Tree1BeforeExpandItem(TObject *Sender,Extreelib_tlb::HITEM   Item,Variant *   Cancel)
{
	OutputDebugString( L"BeforeExpandItem" );
	OutputDebugString( L"Item" );
	Tree1->Items->InsertItem(Item,TNoParam(),TVariant("new child"));
}

Tree1->BeginUpdate();
Tree1->LinesAtRoot = Extreelib_tlb::LinesAtRootEnum::exLinesAtRoot;
Extreelib_tlb::IColumnsPtr var_Columns = Tree1->Columns;
	Extreelib_tlb::IColumnPtr var_Column = var_Columns->Add(L"Items");
		var_Column->DisplayFilterButton = true;
		var_Column->FilterList = Extreelib_tlb::FilterListEnum::exRootItems;
Extreelib_tlb::IItemsPtr var_Items = Tree1->Items;
	var_Items->set_ItemHasChildren(var_Items->InsertItem(TNoParam(),TNoParam(),TVariant("Group 1")),true);
	var_Items->set_ItemHasChildren(var_Items->InsertItem(TNoParam(),TNoParam(),TVariant("Group 2")),true);
Tree1->EndUpdate();

619:
How do I change the drop down filter icon/button (black)

Tree1->BeginUpdate();
Extreelib_tlb::IAppearancePtr var_Appearance = Tree1->VisualAppearance;
	var_Appearance->Add(1,TVariant(String("gBFLBCJwBAEHhEJAAEhABXUIQAAYAQGKIcBiAKBQAGYBIJDEMgzDDAUBjKKocQTC4AIQjCK4JDKHYJRpHEZyCA8EhqGASRAFUQBYiWE4oSpLABQaK0ZwIGyRIrkGQgQ") +
"gmPYDSDNU4zVIEEglBI0TDNczhNDENgtGYaJqHIYpZBcM40TKkEZoSIITZcRrOEBiRL1S0RBhGcRUHZlWzdN64LhuK47UrWdD/XhdVzXRbjfz1Oq+bxve48Br7A5yYTh" +
"dr4LhOFQ3RjIL4xbIcUwGe6VZhjOLZXjmO49T69HTtOCYBEBA"));
Tree1->Background[Extreelib_tlb::BackgroundPartEnum::exHeaderFilterBarButton] = 0x1000000;
Tree1->Background[Extreelib_tlb::BackgroundPartEnum::exCursorHoverColumn] = -1;
Tree1->HeaderAppearance = Extreelib_tlb::AppearanceEnum::None2;
Tree1->BackColorHeader = RGB(0,0,0);
Tree1->ForeColorHeader = RGB(255,255,255);
Tree1->HeaderVisible = true;
Tree1->BackColorLevelHeader = Tree1->BackColor;
Extreelib_tlb::IColumnPtr var_Column = Tree1->Columns->Add(L"Filter");
	var_Column->DisplayFilterButton = true;
	var_Column->AllowSort = false;
	var_Column->AllowDragging = false;
Tree1->EndUpdate();

618:
How do I change the drop down filter icon/button (white)

Tree1->BeginUpdate();
Extreelib_tlb::IAppearancePtr var_Appearance = Tree1->VisualAppearance;
	var_Appearance->Add(2,TVariant(String("gBFLBCJwBAEHhEJAAEhABX8GACAADACAxSDEMQBQKAAzQFAYbhgHCGAAGQaBUgmFgAQhFcZQSKUOQTDKNYykCIRSDUJYkSZEIyjBI8ExXFqNACkGKwYgmNYiTLAcgAN") +
"J0WBaGIZJ4gOT5fDKMoEDRRYADFCscwxJybQAqGQKKb+VgAVY/cTyBIAEQSKA0TDOQ5TSKWB4JPZQRBEbZMNBtBIUJquKaqShdQJCU5FdY3Xblez9P7AMBwLFEC4NQ8Y" +
"NYuPhjR4dRTIMhvVAsUArFh8Zg9GZZFjmDIDT4ydBLTQwcyVIKnP5qOa6XbmPoCQDYKxZHYxPzVDa3axuL76dqCAT7XrXNy1TbNRrzQKfcJqfCbdw2YaDZLOOT3fjuI4" +
"hhKaRzFAHJ+jYQ4xHuY4gHuGIXGeExqC8Tp6C+PoEm+G5ImycRgh0XwvDGa5rgOeoejyXwnFeQp2mkf5ClgBB9gCWIYAwfYAEKV58mkdwOggNArgOXY2EWLoDkKOA0mg" +
"bhOGgZApgaSBIHWSYHSmbApgYThmESZYJkIeIkgeCpfliLIHgpMIcmUYYYmODAlg2SI4mWfRfGOEguDcCRjFYAJihCQhJBSDoRmONgKEcI4kFCEJhhOVYTmYnAlEAQhW" +
"BMJYJGYWoWmWSR2F6F5lnkWAQhUAgpEieRWEuSYkjWGpmkmNhuhuZwJkYcocmaaYkjyEhngnUA6lEFAlAEgI="));
	var_Appearance->Add(1,TVariant("CP:2 -14 -4 -2 4"));
Tree1->Background[Extreelib_tlb::BackgroundPartEnum::exHeaderFilterBarButton] = 0x1000000;
Tree1->Background[Extreelib_tlb::BackgroundPartEnum::exCursorHoverColumn] = Tree1->BackColor;
Tree1->HeaderAppearance = Extreelib_tlb::AppearanceEnum::None2;
Tree1->BackColorHeader = RGB(255,255,255);
Tree1->HeaderVisible = true;
Tree1->HeaderHeight = 24;
Tree1->BackColorLevelHeader = Tree1->BackColor;
Extreelib_tlb::IColumnPtr var_Column = Tree1->Columns->Add(L"Filter");
	var_Column->DisplayFilterButton = true;
	var_Column->AllowSort = false;
	var_Column->AllowDragging = false;
Tree1->EndUpdate();

617:
Do you have any Fit-To-Page options when printing the control (W x T, Fit-To )

Tree1->BeginUpdate();
Tree1->ColumnAutoResize = false;
Tree1->ContinueColumnScroll = false;
/*
	Select the Component\Import Component...\Import a Type Library,
	to import the following Type Library:

		Microsoft ActiveX Data Objects 6.1 Library

	TypeLib: msado15.dll

	to define the namespace: Adodb_tlb
*/
//#include "ADODB_TLB.h"
Adodb_tlb::_RecordsetPtr rs = Variant::CreateObject(L"ADOR.Recordset");
	rs->Open(TVariant("Orders"),TVariant("Provider=Microsoft.ACE.OLEDB.12.0;Data Source=C:\\Program Files\\Exontrol\\ExTree\\Sample\\Access2007\\sample.accdb"),Adodb_tlb::CursorTypeEnum::adOpenStatic,Adodb_tlb::LockTypeEnum::adLockOptimistic,0);
Tree1->DataSource = (IDispatch*)rs;
Tree1->EndUpdate();
/*
	Select the Component\Import Component...\Import a Type Library,
	to import the following Type Library:

		ExPrint 1.0 Control Library

	TypeLib: ExPrint.dll

	to define the namespace: Exprintlib_tlb
*/
//#include "EXPRINTLIB_TLB.h"
Exprintlib_tlb::IExPrintPtr var_Print = Variant::CreateObject(L"Exontrol.Print");
	var_Print->set_Options(TVariant("FitToPage =2 x 1"));
	var_Print->PrintExt = (IUnknown*)Tree1->DefaultDispatch;
	var_Print->Preview();

616:
Do you have any Fit-To-Page options when printing the control ( x T, Fit-To Tall )

Tree1->BeginUpdate();
Tree1->ColumnAutoResize = false;
Tree1->ContinueColumnScroll = false;
/*
	Select the Component\Import Component...\Import a Type Library,
	to import the following Type Library:

		Microsoft ActiveX Data Objects 6.1 Library

	TypeLib: msado15.dll

	to define the namespace: Adodb_tlb
*/
//#include "ADODB_TLB.h"
Adodb_tlb::_RecordsetPtr rs = Variant::CreateObject(L"ADOR.Recordset");
	rs->Open(TVariant("Orders"),TVariant("Provider=Microsoft.ACE.OLEDB.12.0;Data Source=C:\\Program Files\\Exontrol\\ExTree\\Sample\\Access2007\\sample.accdb"),Adodb_tlb::CursorTypeEnum::adOpenStatic,Adodb_tlb::LockTypeEnum::adLockOptimistic,0);
Tree1->DataSource = (IDispatch*)rs;
Tree1->EndUpdate();
/*
	Select the Component\Import Component...\Import a Type Library,
	to import the following Type Library:

		ExPrint 1.0 Control Library

	TypeLib: ExPrint.dll

	to define the namespace: Exprintlib_tlb
*/
//#include "EXPRINTLIB_TLB.h"
Exprintlib_tlb::IExPrintPtr var_Print = Variant::CreateObject(L"Exontrol.Print");
	var_Print->set_Options(TVariant("FitToPage = x 2"));
	var_Print->PrintExt = (IUnknown*)Tree1->DefaultDispatch;
	var_Print->Preview();

615:
Do you have any Fit-To-Page options when printing the control ( W x, Fit-To Wide )

Tree1->BeginUpdate();
Tree1->ColumnAutoResize = false;
Tree1->ContinueColumnScroll = false;
/*
	Select the Component\Import Component...\Import a Type Library,
	to import the following Type Library:

		Microsoft ActiveX Data Objects 6.1 Library

	TypeLib: msado15.dll

	to define the namespace: Adodb_tlb
*/
//#include "ADODB_TLB.h"
Adodb_tlb::_RecordsetPtr rs = Variant::CreateObject(L"ADOR.Recordset");
	rs->Open(TVariant("Orders"),TVariant("Provider=Microsoft.ACE.OLEDB.12.0;Data Source=C:\\Program Files\\Exontrol\\ExTree\\Sample\\Access2007\\sample.accdb"),Adodb_tlb::CursorTypeEnum::adOpenStatic,Adodb_tlb::LockTypeEnum::adLockOptimistic,0);
Tree1->DataSource = (IDispatch*)rs;
Tree1->EndUpdate();
/*
	Select the Component\Import Component...\Import a Type Library,
	to import the following Type Library:

		ExPrint 1.0 Control Library

	TypeLib: ExPrint.dll

	to define the namespace: Exprintlib_tlb
*/
//#include "EXPRINTLIB_TLB.h"
Exprintlib_tlb::IExPrintPtr var_Print = Variant::CreateObject(L"Exontrol.Print");
	var_Print->set_Options(TVariant("FitToPage = 2 x"));
	var_Print->PrintExt = (IUnknown*)Tree1->DefaultDispatch;
	var_Print->Preview();

614:
Do you have any Fit-To-Page options when printing the control ( percent view, Adjust-To )

Tree1->BeginUpdate();
Tree1->ColumnAutoResize = false;
Tree1->ContinueColumnScroll = false;
/*
	Select the Component\Import Component...\Import a Type Library,
	to import the following Type Library:

		Microsoft ActiveX Data Objects 6.1 Library

	TypeLib: msado15.dll

	to define the namespace: Adodb_tlb
*/
//#include "ADODB_TLB.h"
Adodb_tlb::_RecordsetPtr rs = Variant::CreateObject(L"ADOR.Recordset");
	rs->Open(TVariant("Orders"),TVariant("Provider=Microsoft.ACE.OLEDB.12.0;Data Source=C:\\Program Files\\Exontrol\\ExTree\\Sample\\Access2007\\sample.accdb"),Adodb_tlb::CursorTypeEnum::adOpenStatic,Adodb_tlb::LockTypeEnum::adLockOptimistic,0);
Tree1->DataSource = (IDispatch*)rs;
Tree1->EndUpdate();
/*
	Select the Component\Import Component...\Import a Type Library,
	to import the following Type Library:

		ExPrint 1.0 Control Library

	TypeLib: ExPrint.dll

	to define the namespace: Exprintlib_tlb
*/
//#include "EXPRINTLIB_TLB.h"
Exprintlib_tlb::IExPrintPtr var_Print = Variant::CreateObject(L"Exontrol.Print");
	var_Print->set_Options(TVariant("FitToPage = 50%"));
	var_Print->PrintExt = (IUnknown*)Tree1->DefaultDispatch;
	var_Print->Preview();

613:
How do I prevent changing the cell's state ( check-box state )
// CellStateChanging event - Fired before cell's state is about to be changed.
void __fastcall TForm1::Tree1CellStateChanging(TObject *Sender,Extreelib_tlb::HITEM   Item,long   ColIndex,long *   NewState)
{
	Extreelib_tlb::IItemsPtr var_Items = Tree1->Items;
		NewState = var_Items->get_CellState(TVariant(Item),TVariant(ColIndex));
}

Tree1->BeginUpdate();
Tree1->LinesAtRoot = Extreelib_tlb::LinesAtRootEnum::exLinesAtRoot;
Extreelib_tlb::IColumnPtr var_Column = Tree1->Columns->Add(L"P1");
	var_Column->set_Def(Extreelib_tlb::DefColumnEnum::exCellHasCheckBox,TVariant(true));
	var_Column->PartialCheck = true;
Extreelib_tlb::IColumnPtr var_Column1 = Tree1->Columns->Add(L"P2");
	var_Column1->set_Def(Extreelib_tlb::DefColumnEnum::exCellHasCheckBox,TVariant(true));
	var_Column1->PartialCheck = true;
Extreelib_tlb::IItemsPtr var_Items = Tree1->Items;
	long h = var_Items->AddItem(TVariant("Root"));
	var_Items->InsertItem(h,TNoParam(),TVariant("Child 1"));
	var_Items->InsertItem(h,TNoParam(),TVariant("Child 2"));
	var_Items->set_ExpandItem(h,true);
Tree1->EndUpdate();

612:
How can I use the CellState with ConditionalFormat/ComputedField/FormatColumn

// CellStateChanged event - Fired after cell's state has been changed.
void __fastcall TForm1::Tree1CellStateChanged(TObject *Sender,Extreelib_tlb::HITEM   Item,long   ColIndex)
{
}

Tree1->BeginUpdate();
Tree1->LinesAtRoot = Extreelib_tlb::LinesAtRootEnum::exGroupLinesInsideLeaf;
Tree1->SelBackMode = Extreelib_tlb::BackModeEnum::exTransparent;
Extreelib_tlb::IColumnPtr var_Column = Tree1->Columns->Add(L"Items");
	var_Column->set_Def(Extreelib_tlb::DefColumnEnum::exCellHasCheckBox,TVariant(true));
	var_Column->PartialCheck = true;
Extreelib_tlb::IColumnPtr var_Column1 = Tree1->Columns->Add(L"Format");
	var_Column1->FormatColumn = L"%CS0";
	var_Column1->Caption = var_Column1->FormatColumn;
	var_Column1->set_Def(Extreelib_tlb::DefColumnEnum::exCellForeColor,TVariant(8421504));
	var_Column1->set_Def(Extreelib_tlb::DefColumnEnum::exHeaderForeColor,TVariant(var_Column1->get_Def(Extreelib_tlb::DefColumnEnum::exCellForeColor)));
Extreelib_tlb::IItemsPtr var_Items = Tree1->Items;
	long h = var_Items->AddItem(TVariant("Root"));
	var_Items->InsertItem(h,TNoParam(),TVariant("Item 1"));
	var_Items->set_CellState(TVariant(var_Items->InsertItem(h,TNoParam(),TVariant("Item 2"))),TVariant(0),1);
	var_Items->set_CellState(TVariant(var_Items->InsertItem(h,TNoParam(),TVariant("Item 3"))),TVariant(0),1);
	var_Items->set_ExpandItem(h,true);
Tree1->EndUpdate();

611:
How can I use the CellData with ConditionalFormat/ComputedField/FormatColumn

Tree1->BeginUpdate();
Tree1->Columns->Add(L"Items");
Extreelib_tlb::IColumnPtr var_Column = Tree1->Columns->Add(L"Format");
	var_Column->FormatColumn = L"%CD0";
	var_Column->Caption = var_Column->FormatColumn;
	var_Column->set_Def(Extreelib_tlb::DefColumnEnum::exCellForeColor,TVariant(8421504));
	var_Column->set_Def(Extreelib_tlb::DefColumnEnum::exHeaderForeColor,TVariant(var_Column->get_Def(Extreelib_tlb::DefColumnEnum::exCellForeColor)));
Extreelib_tlb::IItemsPtr var_Items = Tree1->Items;
	var_Items->set_CellData(TVariant(var_Items->AddItem(TVariant("Item 1"))),TVariant(0),TVariant(1234));
	var_Items->set_CellData(TVariant(var_Items->AddItem(TVariant("Item 2"))),TVariant(0),TVariant("this is just an user data"));
	var_Items->set_CellData(TVariant(var_Items->AddItem(TVariant("Item 3"))),TVariant(0),TVariant(TDateTime(2001,1,1).operator double()));
Tree1->EndUpdate();

610:
How can I use the CellCaption with ConditionalFormat/ComputedField/FormatColumn

Tree1->BeginUpdate();
Tree1->Columns->Add(L"Items");
Extreelib_tlb::IColumnPtr var_Column = Tree1->Columns->Add(L"Format");
	var_Column->FormatColumn = L"%0";
	var_Column->Caption = var_Column->FormatColumn;
	var_Column->set_Def(Extreelib_tlb::DefColumnEnum::exCellForeColor,TVariant(8421504));
	var_Column->set_Def(Extreelib_tlb::DefColumnEnum::exHeaderForeColor,TVariant(var_Column->get_Def(Extreelib_tlb::DefColumnEnum::exCellForeColor)));
	var_Column->Width = 96;
	var_Column->AllowSizing = false;
Extreelib_tlb::IColumnPtr var_Column1 = Tree1->Columns->Add(L"Format");
	var_Column1->FormatColumn = L"%C0";
	var_Column1->Caption = var_Column1->FormatColumn;
	var_Column1->set_Def(Extreelib_tlb::DefColumnEnum::exCellForeColor,TVariant(8421504));
	var_Column1->set_Def(Extreelib_tlb::DefColumnEnum::exHeaderForeColor,TVariant(var_Column1->get_Def(Extreelib_tlb::DefColumnEnum::exCellForeColor)));
	var_Column1->Width = 96;
	var_Column1->AllowSizing = false;
Extreelib_tlb::IItemsPtr var_Items = Tree1->Items;
	var_Items->AddItem(TVariant(1));
	long h = var_Items->AddItem(TVariant(0));
	var_Items->set_CellCaption(TVariant(h),TVariant(0),TVariant("<b>HTML</b> Text"));
	var_Items->set_CellCaptionFormat(TVariant(h),TVariant(0),Extreelib_tlb::CaptionFormatEnum::exHTML);
	var_Items->AddItem(TVariant(2));
Tree1->EndUpdate();

609:
Can I display the radio-button with a solid color

Tree1->BeginUpdate();
Tree1->RadioImage[false] = 32699122;
Tree1->RadioImage[true] = 16777216;
Tree1->Columns->Add(L"Check")->set_Def(Extreelib_tlb::DefColumnEnum::exCellHasRadioButton,TVariant(true));
Extreelib_tlb::IItemsPtr var_Items = Tree1->Items;
	var_Items->AddItem(TVariant("Radio 1"));
	var_Items->set_CellState(TVariant(var_Items->AddItem(TVariant("Radio 2"))),TVariant(0),1);
	var_Items->AddItem(TVariant("Radio 1"));
Tree1->EndUpdate();

608:
Can I display the check-box with a solid color

Tree1->BeginUpdate();
Tree1->CheckImage[Extreelib_tlb::CheckStateEnum::Unchecked] = 32699122;
Tree1->CheckImage[Extreelib_tlb::CheckStateEnum::Checked] = 16777216;
Tree1->Columns->Add(L"Check")->set_Def(Extreelib_tlb::DefColumnEnum::exCellHasCheckBox,TVariant(true));
Extreelib_tlb::IItemsPtr var_Items = Tree1->Items;
	var_Items->AddItem(TVariant("Check 1"));
	var_Items->set_CellState(TVariant(var_Items->AddItem(TVariant("Check 2"))),TVariant(0),1);
	var_Items->AddItem(TVariant("Check 3"));
Tree1->EndUpdate();

607:
Can I display the column's multiple-lines caption vertically oriented (method 2)

Tree1->BeginUpdate();
Tree1->HeaderHeight = 48;
Tree1->ColumnAutoResize = true;
Extreelib_tlb::IColumnsPtr var_Columns = Tree1->Columns;
	var_Columns->Add(L"And others ...");
	Extreelib_tlb::IColumnPtr var_Column = var_Columns->Add(L"");
		var_Column->HTMLCaption = L"First Column";
		var_Column->HeaderVertical = true;
		var_Column->Width = 36;
		var_Column->AllowSizing = false;
		var_Column->set_Def(Extreelib_tlb::DefColumnEnum::exCellHasCheckBox,TVariant(true));
		var_Column->set_Def(Extreelib_tlb::DefColumnEnum::exCellPaddingLeft,TVariant(8));
		var_Column->Position = 0;
	Extreelib_tlb::IColumnPtr var_Column1 = var_Columns->Add(L"");
		var_Column1->HTMLCaption = L"<c><b>Second Column";
		var_Column1->HeaderVertical = true;
		var_Column1->Width = 36;
		var_Column1->AllowSizing = false;
		var_Column1->set_Def(Extreelib_tlb::DefColumnEnum::exCellHasCheckBox,TVariant(true));
		var_Column1->set_Def(Extreelib_tlb::DefColumnEnum::exCellPaddingLeft,TVariant(8));
		var_Column1->Position = 1;
	Extreelib_tlb::IColumnPtr var_Column2 = var_Columns->Add(L"");
		var_Column2->HTMLCaption = L"<r>Third Column";
		var_Column2->HeaderVertical = true;
		var_Column2->Width = 36;
		var_Column2->AllowSizing = false;
		var_Column2->set_Def(Extreelib_tlb::DefColumnEnum::exCellHasCheckBox,TVariant(true));
		var_Column2->set_Def(Extreelib_tlb::DefColumnEnum::exCellPaddingLeft,TVariant(8));
		var_Column2->Position = 2;
Extreelib_tlb::IItemsPtr var_Items = Tree1->Items;
	var_Items->set_CellState(TVariant(var_Items->AddItem(TVariant("Item 1"))),TVariant(3),1);
	var_Items->set_CellState(TVariant(var_Items->AddItem(TVariant("Item 2"))),TVariant(2),1);
	var_Items->set_CellState(TVariant(var_Items->AddItem(TVariant("Item 3"))),TVariant(1),1);
Tree1->EndUpdate();

606:
Can I display the column's multiple-lines caption vertically oriented (method 1)

Tree1->BeginUpdate();
Tree1->HeaderHeight = 48;
Tree1->HeaderSingleLine = false;
Tree1->ColumnAutoResize = true;
Extreelib_tlb::IColumnsPtr var_Columns = Tree1->Columns;
	var_Columns->Add(L"And others ...");
	Extreelib_tlb::IColumnPtr var_Column = var_Columns->Add(L"First Column");
		var_Column->HeaderVertical = true;
		var_Column->Width = 36;
		var_Column->AllowSizing = false;
		var_Column->set_Def(Extreelib_tlb::DefColumnEnum::exCellHasCheckBox,TVariant(true));
		var_Column->set_Def(Extreelib_tlb::DefColumnEnum::exCellPaddingLeft,TVariant(8));
		var_Column->Position = 0;
	Extreelib_tlb::IColumnPtr var_Column1 = var_Columns->Add(L"Second Column");
		var_Column1->HeaderBold = true;
		var_Column1->HeaderVertical = true;
		var_Column1->Width = 36;
		var_Column1->AllowSizing = false;
		var_Column1->set_Def(Extreelib_tlb::DefColumnEnum::exCellHasCheckBox,TVariant(true));
		var_Column1->set_Def(Extreelib_tlb::DefColumnEnum::exCellPaddingLeft,TVariant(8));
		var_Column1->Position = 1;
	Extreelib_tlb::IColumnPtr var_Column2 = var_Columns->Add(L"Third Column");
		var_Column2->HeaderVertical = true;
		var_Column2->Width = 36;
		var_Column2->AllowSizing = false;
		var_Column2->set_Def(Extreelib_tlb::DefColumnEnum::exCellHasCheckBox,TVariant(true));
		var_Column2->set_Def(Extreelib_tlb::DefColumnEnum::exCellPaddingLeft,TVariant(8));
		var_Column2->Position = 2;
Extreelib_tlb::IItemsPtr var_Items = Tree1->Items;
	var_Items->set_CellState(TVariant(var_Items->AddItem(TVariant("Item 1"))),TVariant(3),1);
	var_Items->set_CellState(TVariant(var_Items->AddItem(TVariant("Item 2"))),TVariant(2),1);
	var_Items->set_CellState(TVariant(var_Items->AddItem(TVariant("Item 3"))),TVariant(1),1);
Tree1->EndUpdate();

605:
Can I display the column's caption vertically oriented (method 2)

Tree1->BeginUpdate();
Tree1->HeaderHeight = 48;
Tree1->ColumnAutoResize = true;
Extreelib_tlb::IColumnsPtr var_Columns = Tree1->Columns;
	var_Columns->Add(L"And others ...");
	Extreelib_tlb::IColumnPtr var_Column = var_Columns->Add(L"");
		var_Column->HTMLCaption = L"First";
		var_Column->HeaderVertical = true;
		var_Column->Width = 20;
		var_Column->AllowSizing = false;
		var_Column->set_Def(Extreelib_tlb::DefColumnEnum::exCellHasCheckBox,TVariant(true));
		var_Column->Position = 0;
	Extreelib_tlb::IColumnPtr var_Column1 = var_Columns->Add(L"");
		var_Column1->HTMLCaption = L"<c><b>Second";
		var_Column1->HeaderVertical = true;
		var_Column1->Width = 20;
		var_Column1->AllowSizing = false;
		var_Column1->set_Def(Extreelib_tlb::DefColumnEnum::exCellHasCheckBox,TVariant(true));
		var_Column1->Position = 1;
	Extreelib_tlb::IColumnPtr var_Column2 = var_Columns->Add(L"");
		var_Column2->HTMLCaption = L"<r>Third";
		var_Column2->HeaderVertical = true;
		var_Column2->Width = 20;
		var_Column2->AllowSizing = false;
		var_Column2->set_Def(Extreelib_tlb::DefColumnEnum::exCellHasCheckBox,TVariant(true));
		var_Column2->Position = 2;
Extreelib_tlb::IItemsPtr var_Items = Tree1->Items;
	var_Items->set_CellState(TVariant(var_Items->AddItem(TVariant("Item 1"))),TVariant(3),1);
	var_Items->set_CellState(TVariant(var_Items->AddItem(TVariant("Item 2"))),TVariant(2),1);
	var_Items->set_CellState(TVariant(var_Items->AddItem(TVariant("Item 3"))),TVariant(1),1);
Tree1->EndUpdate();

604:
Can I display the column's caption vertically oriented (method 1)

Tree1->BeginUpdate();
Tree1->HeaderHeight = 48;
Tree1->ColumnAutoResize = true;
Extreelib_tlb::IColumnsPtr var_Columns = Tree1->Columns;
	var_Columns->Add(L"And others ...");
	Extreelib_tlb::IColumnPtr var_Column = var_Columns->Add(L"First");
		var_Column->HeaderVertical = true;
		var_Column->Width = 20;
		var_Column->AllowSizing = false;
		var_Column->set_Def(Extreelib_tlb::DefColumnEnum::exCellHasCheckBox,TVariant(true));
		var_Column->Position = 0;
	Extreelib_tlb::IColumnPtr var_Column1 = var_Columns->Add(L"Second");
		var_Column1->HeaderBold = true;
		var_Column1->HeaderVertical = true;
		var_Column1->Width = 20;
		var_Column1->AllowSizing = false;
		var_Column1->set_Def(Extreelib_tlb::DefColumnEnum::exCellHasCheckBox,TVariant(true));
		var_Column1->Position = 1;
	Extreelib_tlb::IColumnPtr var_Column2 = var_Columns->Add(L"Third");
		var_Column2->HeaderVertical = true;
		var_Column2->Width = 20;
		var_Column2->AllowSizing = false;
		var_Column2->set_Def(Extreelib_tlb::DefColumnEnum::exCellHasCheckBox,TVariant(true));
		var_Column2->Position = 2;
Extreelib_tlb::IItemsPtr var_Items = Tree1->Items;
	var_Items->set_CellState(TVariant(var_Items->AddItem(TVariant("Item 1"))),TVariant(3),1);
	var_Items->set_CellState(TVariant(var_Items->AddItem(TVariant("Item 2"))),TVariant(2),1);
	var_Items->set_CellState(TVariant(var_Items->AddItem(TVariant("Item 3"))),TVariant(1),1);
Tree1->EndUpdate();

603:
How do I automatically bold items being checked

// CellStateChanged event - Fired after cell's state has been changed.
void __fastcall TForm1::Tree1CellStateChanged(TObject *Sender,Extreelib_tlb::HITEM   Item,long   ColIndex)
{
}

Tree1->BeginUpdate();
Tree1->SelBackMode = Extreelib_tlb::BackModeEnum::exTransparent;
Extreelib_tlb::IConditionalFormatPtr var_ConditionalFormat = Tree1->ConditionalFormats->Add(L"%CS0",TVariant("check"));
	var_ConditionalFormat->Bold = true;
Tree1->Columns->Add(L"Items")->set_Def(Extreelib_tlb::DefColumnEnum::exCellHasCheckBox,TVariant(true));
Tree1->Columns->Add(Tree1->ConditionalFormats->get_Item(TVariant("check"))->Expression)->FormatColumn = Tree1->ConditionalFormats->get_Item(TVariant("check"))->Expression;
Extreelib_tlb::IItemsPtr var_Items = Tree1->Items;
	var_Items->AddItem(TVariant("Item 1"));
	var_Items->set_CellState(TVariant(var_Items->AddItem(TVariant("Item 2"))),TVariant(0),1);
	var_Items->AddItem(TVariant("Item 3"));
Tree1->EndUpdate();

602:
How can I include the child items, when a filter is applied

Tree1->BeginUpdate();
Tree1->ColumnAutoResize = true;
Tree1->ContinueColumnScroll = false;
Tree1->MarkSearchColumn = false;
Tree1->SearchColumnIndex = 1;
Tree1->Indent = 16;
Tree1->LinesAtRoot = Extreelib_tlb::LinesAtRootEnum::exLinesAtRoot;
Tree1->FilterBarPromptVisible = true;
Tree1->FilterBarPromptPattern = L"Nancy";
Tree1->FilterInclude = Extreelib_tlb::FilterIncludeEnum::exItemsWithChilds;
Extreelib_tlb::IColumnsPtr var_Columns = Tree1->Columns;
	var_Columns->Add(L"Name")->Width = 96;
	var_Columns->Add(L"Title")->Width = 96;
	var_Columns->Add(L"City");
Extreelib_tlb::IItemsPtr var_Items = Tree1->Items;
	long h0 = var_Items->AddItem(TVariant("Nancy Davolio"));
	var_Items->set_CellCaption(TVariant(h0),TVariant(1),TVariant("Sales Representative"));
	var_Items->set_CellCaption(TVariant(h0),TVariant(2),TVariant("Seattle"));
	h0 = var_Items->InsertItem(h0,TNoParam(),TVariant("Andrew Fuller"));
	var_Items->set_CellCaption(TVariant(h0),TVariant(1),TVariant("Vice President, Sales"));
	var_Items->set_CellCaption(TVariant(h0),TVariant(2),TVariant("Tacoma"));
	h0 = var_Items->InsertItem(h0,TNoParam(),TVariant("Michael Suyama"));
	var_Items->set_CellCaption(TVariant(h0),TVariant(1),TVariant("Sales Representative"));
	var_Items->set_CellCaption(TVariant(h0),TVariant(2),TVariant("London"));
	h0 = var_Items->AddItem(TVariant("Janet Leverling"));
	var_Items->set_CellCaption(TVariant(h0),TVariant(1),TVariant("Sales Representative"));
	var_Items->set_CellCaption(TVariant(h0),TVariant(2),TVariant("Kirkland"));
	h0 = var_Items->InsertItem(h0,TNoParam(),TVariant("Margaret Peacock"));
	var_Items->set_CellCaption(TVariant(h0),TVariant(1),TVariant("Sales Representative"));
	var_Items->set_CellCaption(TVariant(h0),TVariant(2),TVariant("Redmond"));
Tree1->ApplyFilter();
Tree1->EndUpdate();

601:
How do I get sorted the column as string, numeric, date, date and time. Also how can it be applied to drop down filter panel

Tree1->BeginUpdate();
Extreelib_tlb::IColumnPtr var_Column = Tree1->Columns->Add(L"Date");
	var_Column->SortType = Extreelib_tlb::SortTypeEnum::SortDate;
	var_Column->DisplayFilterButton = true;
	var_Column->DisplayFilterPattern = false;
	var_Column->DisplayFilterDate = true;
	var_Column->FilterList = Extreelib_tlb::FilterListEnum::exShowFocusItem | Extreelib_tlb::FilterListEnum::exShowCheckBox | Extreelib_tlb::FilterListEnum::exSortItemsDesc;
Extreelib_tlb::IColumnPtr var_Column1 = Tree1->Columns->Add(L"DateTime");
	var_Column1->SortType = Extreelib_tlb::SortTypeEnum::SortDateTime;
	var_Column1->DisplayFilterButton = true;
	var_Column1->DisplayFilterPattern = false;
	var_Column1->FilterList = Extreelib_tlb::FilterListEnum::exShowFocusItem | Extreelib_tlb::FilterListEnum::exShowCheckBox | Extreelib_tlb::FilterListEnum::exSortItemsDesc;
Extreelib_tlb::IColumnPtr var_Column2 = Tree1->Columns->Add(L"Time");
	var_Column2->SortType = Extreelib_tlb::SortTypeEnum::SortTime;
	var_Column2->DisplayFilterButton = true;
	var_Column2->DisplayFilterPattern = false;
	var_Column2->FilterList = Extreelib_tlb::FilterListEnum::exShowFocusItem | Extreelib_tlb::FilterListEnum::exShowCheckBox | Extreelib_tlb::FilterListEnum::exSortItemsDesc;
	var_Column2->FormatColumn = L"time(value)";
Extreelib_tlb::IColumnPtr var_Column3 = Tree1->Columns->Add(L"Numeric");
	var_Column3->SortType = Extreelib_tlb::SortTypeEnum::SortNumeric;
	var_Column3->DisplayFilterButton = true;
	var_Column3->FilterList = Extreelib_tlb::FilterListEnum::exShowFocusItem | Extreelib_tlb::FilterListEnum::exShowCheckBox | Extreelib_tlb::FilterListEnum::exSortItemsDesc;
Extreelib_tlb::IColumnPtr var_Column4 = Tree1->Columns->Add(L"String");
	var_Column4->DisplayFilterButton = true;
	var_Column4->FilterList = Extreelib_tlb::FilterListEnum::exShowFocusItem | Extreelib_tlb::FilterListEnum::exShowCheckBox | Extreelib_tlb::FilterListEnum::exSortItemsDesc;
Extreelib_tlb::IItemsPtr var_Items = Tree1->Items;
	long h = var_Items->AddItem(TVariant(TDateTime(2010,1,27).operator double()));
	var_Items->set_CellCaption(TVariant(h),TVariant(1),TVariant(TDateTime(2010,1,27,10,00,00,0).operator double()));
	var_Items->set_CellCaption(TVariant(h),TVariant(2),TVariant(var_Items->get_CellCaption(TVariant(h),TVariant(1))));
	var_Items->set_CellCaption(TVariant(h),TVariant(3),TVariant(1));
	var_Items->set_CellCaption(TVariant(h),TVariant(4),TVariant(var_Items->get_CellCaption(TVariant(h),TVariant(3))));
	h = var_Items->AddItem(TVariant(TDateTime(2011,1,27).operator double()));
	var_Items->set_CellCaption(TVariant(h),TVariant(1),TVariant(TDateTime(2011,1,27,9,00,00,0).operator double()));
	var_Items->set_CellCaption(TVariant(h),TVariant(2),TVariant(var_Items->get_CellCaption(TVariant(h),TVariant(1))));
	var_Items->set_CellCaption(TVariant(h),TVariant(3),TVariant(11));
	var_Items->set_CellCaption(TVariant(h),TVariant(4),TVariant(var_Items->get_CellCaption(TVariant(h),TVariant(3))));
	h = var_Items->AddItem(TVariant(TDateTime(2010,11,2).operator double()));
	var_Items->set_CellCaption(TVariant(h),TVariant(1),TVariant(TDateTime(2010,11,2,9,00,00,0).operator double()));
	var_Items->set_CellCaption(TVariant(h),TVariant(2),TVariant(var_Items->get_CellCaption(TVariant(h),TVariant(1))));
	var_Items->set_CellCaption(TVariant(h),TVariant(3),TVariant(2));
	var_Items->set_CellCaption(TVariant(h),TVariant(4),TVariant(var_Items->get_CellCaption(TVariant(h),TVariant(3))));
Tree1->Columns->get_Item(TVariant("DateTime"))->DisplayFilterDate = false;
Tree1->EndUpdate();