Type | Description | |||
String | A string expression that specifies the pattern to filter the list. |
The following samples shows the filter prompt, and filter for items that contains "london":
Access
With Gantt1 .BeginUpdate .ColumnAutoResize = True .ContinueColumnScroll = 0 .MarkSearchColumn = False .SearchColumnIndex = 1 .FilterBarPromptVisible = True .FilterBarPromptPattern = "london" With .Columns .Add("Name").Width = 96 .Add("Title").Width = 96 .Add "City" End With With .Items h0 = .AddItem("Nancy Davolio") .CellCaption(h0,1) = "Sales Representative" .CellCaption(h0,2) = "Seattle" h0 = .AddItem("Andrew Fuller") .CellCaption(h0,1) = "Vice President, Sales" .CellCaption(h0,2) = "Tacoma" .SelectItem(h0) = 1 h0 = .AddItem("Janet Leverling") .CellCaption(h0,1) = "Sales Representative" .CellCaption(h0,2) = "Kirkland" h0 = .AddItem("Margaret Peacock") .CellCaption(h0,1) = "Sales Representative" .CellCaption(h0,2) = "Redmond" h0 = .AddItem("Steven Buchanan") .CellCaption(h0,1) = "Sales Manager" .CellCaption(h0,2) = "London" h0 = .AddItem("Michael Suyama") .CellCaption(h0,1) = "Sales Representative" .CellCaption(h0,2) = "London" h0 = .AddItem("Robert King") .CellCaption(h0,1) = "Sales Representative" .CellCaption(h0,2) = "London" h0 = .AddItem("Laura Callahan") .CellCaption(h0,1) = "Inside Sales Coordinator" .CellCaption(h0,2) = "Seattle" h0 = .AddItem("Anne Dodsworth") .CellCaption(h0,1) = "Sales Representative" .CellCaption(h0,2) = "London" End With .EndUpdate End With
C++
/* Copy and paste the following directives to your header file as it defines the namespace 'EXGANTTLib' for the library: 'ExGantt 1.0 Control Library' #import <ExGantt.dll> using namespace EXGANTTLib; */ EXGANTTLib::IGanttPtr spGantt1 = GetDlgItem(IDC_GANTT1)->GetControlUnknown(); spGantt1->BeginUpdate(); spGantt1->PutColumnAutoResize(VARIANT_TRUE); spGantt1->PutContinueColumnScroll(VARIANT_FALSE); spGantt1->PutMarkSearchColumn(VARIANT_FALSE); spGantt1->PutSearchColumnIndex(1); spGantt1->PutFilterBarPromptVisible(VARIANT_TRUE); spGantt1->PutFilterBarPromptPattern(L"london"); EXGANTTLib::IColumnsPtr var_Columns = spGantt1->GetColumns(); ((EXGANTTLib::IColumnPtr)(var_Columns->Add(L"Name")))->PutWidth(96); ((EXGANTTLib::IColumnPtr)(var_Columns->Add(L"Title")))->PutWidth(96); var_Columns->Add(L"City"); EXGANTTLib::IItemsPtr var_Items = spGantt1->GetItems(); long h0 = var_Items->AddItem("Nancy Davolio"); var_Items->PutCellCaption(h0,long(1),"Sales Representative"); var_Items->PutCellCaption(h0,long(2),"Seattle"); h0 = var_Items->AddItem("Andrew Fuller"); var_Items->PutCellCaption(h0,long(1),"Vice President, Sales"); var_Items->PutCellCaption(h0,long(2),"Tacoma"); var_Items->PutSelectItem(h0,VARIANT_TRUE); h0 = var_Items->AddItem("Janet Leverling"); var_Items->PutCellCaption(h0,long(1),"Sales Representative"); var_Items->PutCellCaption(h0,long(2),"Kirkland"); h0 = var_Items->AddItem("Margaret Peacock"); var_Items->PutCellCaption(h0,long(1),"Sales Representative"); var_Items->PutCellCaption(h0,long(2),"Redmond"); h0 = var_Items->AddItem("Steven Buchanan"); var_Items->PutCellCaption(h0,long(1),"Sales Manager"); var_Items->PutCellCaption(h0,long(2),"London"); h0 = var_Items->AddItem("Michael Suyama"); var_Items->PutCellCaption(h0,long(1),"Sales Representative"); var_Items->PutCellCaption(h0,long(2),"London"); h0 = var_Items->AddItem("Robert King"); var_Items->PutCellCaption(h0,long(1),"Sales Representative"); var_Items->PutCellCaption(h0,long(2),"London"); h0 = var_Items->AddItem("Laura Callahan"); var_Items->PutCellCaption(h0,long(1),"Inside Sales Coordinator"); var_Items->PutCellCaption(h0,long(2),"Seattle"); h0 = var_Items->AddItem("Anne Dodsworth"); var_Items->PutCellCaption(h0,long(1),"Sales Representative"); var_Items->PutCellCaption(h0,long(2),"London"); spGantt1->EndUpdate();
C#
extree1.BeginUpdate(); extree1.ColumnAutoResize = true; extree1.ContinueColumnScroll = false; extree1.MarkSearchColumn = false; extree1.SearchColumnIndex = 1; extree1.FilterBarPromptVisible = true; extree1.FilterBarPromptPattern = "london"; exontrol.EXGANTTLib.Columns var_Columns = extree1.Columns; (var_Columns.Add("Name") as exontrol.EXGANTTLib.Column).Width = 96; (var_Columns.Add("Title") as exontrol.EXGANTTLib.Column).Width = 96; var_Columns.Add("City"); exontrol.EXGANTTLib.Items var_Items = extree1.Items; int h0 = var_Items.AddItem("Nancy Davolio"); var_Items.set_CellCaption(h0,1,"Sales Representative"); var_Items.set_CellCaption(h0,2,"Seattle"); h0 = var_Items.AddItem("Andrew Fuller"); var_Items.set_CellCaption(h0,1,"Vice President, Sales"); var_Items.set_CellCaption(h0,2,"Tacoma"); var_Items.set_SelectItem(h0,1); h0 = var_Items.AddItem("Janet Leverling"); var_Items.set_CellCaption(h0,1,"Sales Representative"); var_Items.set_CellCaption(h0,2,"Kirkland"); h0 = var_Items.AddItem("Margaret Peacock"); var_Items.set_CellCaption(h0,1,"Sales Representative"); var_Items.set_CellCaption(h0,2,"Redmond"); h0 = var_Items.AddItem("Steven Buchanan"); var_Items.set_CellCaption(h0,1,"Sales Manager"); var_Items.set_CellCaption(h0,2,"London"); h0 = var_Items.AddItem("Michael Suyama"); var_Items.set_CellCaption(h0,1,"Sales Representative"); var_Items.set_CellCaption(h0,2,"London"); h0 = var_Items.AddItem("Robert King"); var_Items.set_CellCaption(h0,1,"Sales Representative"); var_Items.set_CellCaption(h0,2,"London"); h0 = var_Items.AddItem("Laura Callahan"); var_Items.set_CellCaption(h0,1,"Inside Sales Coordinator"); var_Items.set_CellCaption(h0,2,"Seattle"); h0 = var_Items.AddItem("Anne Dodsworth"); var_Items.set_CellCaption(h0,1,"Sales Representative"); var_Items.set_CellCaption(h0,2,"London"); extree1.EndUpdate();
C# for /COM
axGantt1.BeginUpdate(); axGantt1.ColumnAutoResize = true; axGantt1.ContinueColumnScroll = false; axGantt1.MarkSearchColumn = false; axGantt1.SearchColumnIndex = 1; axGantt1.FilterBarPromptVisible = true; axGantt1.FilterBarPromptPattern = "london"; EXGANTTLib.Columns var_Columns = axGantt1.Columns; (var_Columns.Add("Name") as EXGANTTLib.Column).Width = 96; (var_Columns.Add("Title") as EXGANTTLib.Column).Width = 96; var_Columns.Add("City"); EXGANTTLib.Items var_Items = axGantt1.Items; int h0 = var_Items.AddItem("Nancy Davolio"); var_Items.set_CellCaption(h0,1,"Sales Representative"); var_Items.set_CellCaption(h0,2,"Seattle"); h0 = var_Items.AddItem("Andrew Fuller"); var_Items.set_CellCaption(h0,1,"Vice President, Sales"); var_Items.set_CellCaption(h0,2,"Tacoma"); var_Items.set_SelectItem(h0,true); h0 = var_Items.AddItem("Janet Leverling"); var_Items.set_CellCaption(h0,1,"Sales Representative"); var_Items.set_CellCaption(h0,2,"Kirkland"); h0 = var_Items.AddItem("Margaret Peacock"); var_Items.set_CellCaption(h0,1,"Sales Representative"); var_Items.set_CellCaption(h0,2,"Redmond"); h0 = var_Items.AddItem("Steven Buchanan"); var_Items.set_CellCaption(h0,1,"Sales Manager"); var_Items.set_CellCaption(h0,2,"London"); h0 = var_Items.AddItem("Michael Suyama"); var_Items.set_CellCaption(h0,1,"Sales Representative"); var_Items.set_CellCaption(h0,2,"London"); h0 = var_Items.AddItem("Robert King"); var_Items.set_CellCaption(h0,1,"Sales Representative"); var_Items.set_CellCaption(h0,2,"London"); h0 = var_Items.AddItem("Laura Callahan"); var_Items.set_CellCaption(h0,1,"Inside Sales Coordinator"); var_Items.set_CellCaption(h0,2,"Seattle"); h0 = var_Items.AddItem("Anne Dodsworth"); var_Items.set_CellCaption(h0,1,"Sales Representative"); var_Items.set_CellCaption(h0,2,"London"); axGantt1.EndUpdate();
Delphi
with AxGantt1 do begin BeginUpdate(); ColumnAutoResize := True; ContinueColumnScroll := False; MarkSearchColumn := False; SearchColumnIndex := 1; FilterBarPromptVisible := True; FilterBarPromptPattern := 'london'; with Columns do begin (Add('Name') as EXGANTTLib.Column).Width := 96; (Add('Title') as EXGANTTLib.Column).Width := 96; Add('City'); end; with Items do begin h0 := AddItem('Nancy Davolio'); CellCaption[TObject(h0),TObject(1)] := 'Sales Representative'; CellCaption[TObject(h0),TObject(2)] := 'Seattle'; h0 := AddItem('Andrew Fuller'); CellCaption[TObject(h0),TObject(1)] := 'Vice President, Sales'; CellCaption[TObject(h0),TObject(2)] := 'Tacoma'; SelectItem[h0] := True; h0 := AddItem('Janet Leverling'); CellCaption[TObject(h0),TObject(1)] := 'Sales Representative'; CellCaption[TObject(h0),TObject(2)] := 'Kirkland'; h0 := AddItem('Margaret Peacock'); CellCaption[TObject(h0),TObject(1)] := 'Sales Representative'; CellCaption[TObject(h0),TObject(2)] := 'Redmond'; h0 := AddItem('Steven Buchanan'); CellCaption[TObject(h0),TObject(1)] := 'Sales Manager'; CellCaption[TObject(h0),TObject(2)] := 'London'; h0 := AddItem('Michael Suyama'); CellCaption[TObject(h0),TObject(1)] := 'Sales Representative'; CellCaption[TObject(h0),TObject(2)] := 'London'; h0 := AddItem('Robert King'); CellCaption[TObject(h0),TObject(1)] := 'Sales Representative'; CellCaption[TObject(h0),TObject(2)] := 'London'; h0 := AddItem('Laura Callahan'); CellCaption[TObject(h0),TObject(1)] := 'Inside Sales Coordinator'; CellCaption[TObject(h0),TObject(2)] := 'Seattle'; h0 := AddItem('Anne Dodsworth'); CellCaption[TObject(h0),TObject(1)] := 'Sales Representative'; CellCaption[TObject(h0),TObject(2)] := 'London'; end; EndUpdate(); end
VB
With Gantt1 .BeginUpdate .ColumnAutoResize = True .ContinueColumnScroll = 0 .MarkSearchColumn = False .SearchColumnIndex = 1 .FilterBarPromptVisible = True .FilterBarPromptPattern = "london" With .Columns .Add("Name").Width = 96 .Add("Title").Width = 96 .Add "City" End With With .Items h0 = .AddItem("Nancy Davolio") .CellCaption(h0,1) = "Sales Representative" .CellCaption(h0,2) = "Seattle" h0 = .AddItem("Andrew Fuller") .CellCaption(h0,1) = "Vice President, Sales" .CellCaption(h0,2) = "Tacoma" .SelectItem(h0) = 1 h0 = .AddItem("Janet Leverling") .CellCaption(h0,1) = "Sales Representative" .CellCaption(h0,2) = "Kirkland" h0 = .AddItem("Margaret Peacock") .CellCaption(h0,1) = "Sales Representative" .CellCaption(h0,2) = "Redmond" h0 = .AddItem("Steven Buchanan") .CellCaption(h0,1) = "Sales Manager" .CellCaption(h0,2) = "London" h0 = .AddItem("Michael Suyama") .CellCaption(h0,1) = "Sales Representative" .CellCaption(h0,2) = "London" h0 = .AddItem("Robert King") .CellCaption(h0,1) = "Sales Representative" .CellCaption(h0,2) = "London" h0 = .AddItem("Laura Callahan") .CellCaption(h0,1) = "Inside Sales Coordinator" .CellCaption(h0,2) = "Seattle" h0 = .AddItem("Anne Dodsworth") .CellCaption(h0,1) = "Sales Representative" .CellCaption(h0,2) = "London" End With .EndUpdate End With
VB.NET
Dim h0 With Extree1 .BeginUpdate() .ColumnAutoResize = True .ContinueColumnScroll = False .MarkSearchColumn = False .SearchColumnIndex = 1 .FilterBarPromptVisible = True .FilterBarPromptPattern = "london" With .Columns .Add("Name").Width = 96 .Add("Title").Width = 96 .Add("City") End With With .Items h0 = .AddItem("Nancy Davolio") .set_CellCaption(h0,1,"Sales Representative") .set_CellCaption(h0,2,"Seattle") h0 = .AddItem("Andrew Fuller") .set_CellCaption(h0,1,"Vice President, Sales") .set_CellCaption(h0,2,"Tacoma") .set_SelectItem(h0,1) h0 = .AddItem("Janet Leverling") .set_CellCaption(h0,1,"Sales Representative") .set_CellCaption(h0,2,"Kirkland") h0 = .AddItem("Margaret Peacock") .set_CellCaption(h0,1,"Sales Representative") .set_CellCaption(h0,2,"Redmond") h0 = .AddItem("Steven Buchanan") .set_CellCaption(h0,1,"Sales Manager") .set_CellCaption(h0,2,"London") h0 = .AddItem("Michael Suyama") .set_CellCaption(h0,1,"Sales Representative") .set_CellCaption(h0,2,"London") h0 = .AddItem("Robert King") .set_CellCaption(h0,1,"Sales Representative") .set_CellCaption(h0,2,"London") h0 = .AddItem("Laura Callahan") .set_CellCaption(h0,1,"Inside Sales Coordinator") .set_CellCaption(h0,2,"Seattle") h0 = .AddItem("Anne Dodsworth") .set_CellCaption(h0,1,"Sales Representative") .set_CellCaption(h0,2,"London") End With .EndUpdate() End With
VB.NET for /COM
Dim h0 With AxGantt1 .BeginUpdate() .ColumnAutoResize = True .ContinueColumnScroll = False .MarkSearchColumn = False .SearchColumnIndex = 1 .FilterBarPromptVisible = True .FilterBarPromptPattern = "london" With .Columns .Add("Name").Width = 96 .Add("Title").Width = 96 .Add("City") End With With .Items h0 = .AddItem("Nancy Davolio") .CellCaption(h0,1) = "Sales Representative" .CellCaption(h0,2) = "Seattle" h0 = .AddItem("Andrew Fuller") .CellCaption(h0,1) = "Vice President, Sales" .CellCaption(h0,2) = "Tacoma" .SelectItem(h0) = True h0 = .AddItem("Janet Leverling") .CellCaption(h0,1) = "Sales Representative" .CellCaption(h0,2) = "Kirkland" h0 = .AddItem("Margaret Peacock") .CellCaption(h0,1) = "Sales Representative" .CellCaption(h0,2) = "Redmond" h0 = .AddItem("Steven Buchanan") .CellCaption(h0,1) = "Sales Manager" .CellCaption(h0,2) = "London" h0 = .AddItem("Michael Suyama") .CellCaption(h0,1) = "Sales Representative" .CellCaption(h0,2) = "London" h0 = .AddItem("Robert King") .CellCaption(h0,1) = "Sales Representative" .CellCaption(h0,2) = "London" h0 = .AddItem("Laura Callahan") .CellCaption(h0,1) = "Inside Sales Coordinator" .CellCaption(h0,2) = "Seattle" h0 = .AddItem("Anne Dodsworth") .CellCaption(h0,1) = "Sales Representative" .CellCaption(h0,2) = "London" End With .EndUpdate() End With
VFP
with thisform.Gantt1 .BeginUpdate .ColumnAutoResize = .T. .ContinueColumnScroll = 0 .MarkSearchColumn = .F. .SearchColumnIndex = 1 .FilterBarPromptVisible = .T. .FilterBarPromptPattern = "london" with .Columns .Add("Name").Width = 96 .Add("Title").Width = 96 .Add("City") endwith with .Items h0 = .AddItem("Nancy Davolio") .CellCaption(h0,1) = "Sales Representative" .CellCaption(h0,2) = "Seattle" h0 = .AddItem("Andrew Fuller") .CellCaption(h0,1) = "Vice President, Sales" .CellCaption(h0,2) = "Tacoma" .SelectItem(h0) = 1 h0 = .AddItem("Janet Leverling") .CellCaption(h0,1) = "Sales Representative" .CellCaption(h0,2) = "Kirkland" h0 = .AddItem("Margaret Peacock") .CellCaption(h0,1) = "Sales Representative" .CellCaption(h0,2) = "Redmond" h0 = .AddItem("Steven Buchanan") .CellCaption(h0,1) = "Sales Manager" .CellCaption(h0,2) = "London" h0 = .AddItem("Michael Suyama") .CellCaption(h0,1) = "Sales Representative" .CellCaption(h0,2) = "London" h0 = .AddItem("Robert King") .CellCaption(h0,1) = "Sales Representative" .CellCaption(h0,2) = "London" h0 = .AddItem("Laura Callahan") .CellCaption(h0,1) = "Inside Sales Coordinator" .CellCaption(h0,2) = "Seattle" h0 = .AddItem("Anne Dodsworth") .CellCaption(h0,1) = "Sales Representative" .CellCaption(h0,2) = "London" endwith .EndUpdate endwith