Type | Description | |||
Type as DescriptionTypeEnum | A DescriptionTypeEnum expression that indicates the caption begin changed | |||
String | A String expression that defines the new caption to be shown. |
instead of
The following samples show how you can change the name for months in the drop-down filter window (localization)?
VBA (MS Access, Excell...)
With Pivot1 Debug.Print( .Description(17) ) .Description(17) = "Ianuarie Februarie Martie Aprilie Mai Iunie Iulie August Septembrie Octombrie Noiembrie Decembrie" .Description(0) = "(Toate)" .Description(1) = "(Gol)" .Description(2) = "(Plin)" .Description(3) = "Filtreaza:" .Description(16) = "Azi" .Description(18) = "D L Ma Mi J V S" .Description(25) = "Exclud" .Description(26) = "Coloane" .Description(11) = "si" .Description(12) = "Data:" .Description(15) = "Data" .Description(13) = "la" .Description(24) = "nu" .Description(23) = "sau" .Import "C:\Program Files\Exontrol\ExPivot\Sample\data.txt" .DataColumns.Item("OrderDate").SortType = 2 .PivotRows = "9" .Refresh End With
VB6
With Pivot1 Debug.Print( .Description(exFilterBarDateMonths) ) .Description(exFilterBarDateMonths) = "Ianuarie Februarie Martie Aprilie Mai Iunie Iulie August Septembrie Octombrie Noiembrie Decembrie" .Description(exFilterBarAll) = "(Toate)" .Description(exFilterBarBlanks) = "(Gol)" .Description(exFilterBarNonBlanks) = "(Plin)" .Description(exFilterBarFilterForCaption) = "Filtreaza:" .Description(exFilterBarDateTodayCaption) = "Azi" .Description(exFilterBarDateWeekDays) = "D L Ma Mi J V S" .Description(exFilterBarExclude) = "Exclud" .Description(exColumnsFloatBar) = "Coloane" .Description(exFilterBarAnd) = "si" .Description(exFilterBarDate) = "Data:" .Description(exFilterBarDateTitle) = "Data" .Description(exFilterBarDateTo) = "la" .Description(exFilterBarNot) = "nu" .Description(exFilterBarOr) = "sau" .Import "C:\Program Files\Exontrol\ExPivot\Sample\data.txt" .DataColumns.Item("OrderDate").SortType = SortDate .PivotRows = "9" .Refresh End With
VB.NET
With Expivot1 Debug.Print( .get_Description(exontrol.EXPIVOTLib.DescriptionTypeEnum.exFilterBarDateMonths) ) .set_Description(exontrol.EXPIVOTLib.DescriptionTypeEnum.exFilterBarDateMonths,"Ianuarie Februarie Martie Aprilie Mai Iunie Iulie August Septembrie Octombrie Noiembrie Decembrie") .set_Description(exontrol.EXPIVOTLib.DescriptionTypeEnum.exFilterBarAll,"(Toate)") .set_Description(exontrol.EXPIVOTLib.DescriptionTypeEnum.exFilterBarBlanks,"(Gol)") .set_Description(exontrol.EXPIVOTLib.DescriptionTypeEnum.exFilterBarNonBlanks,"(Plin)") .set_Description(exontrol.EXPIVOTLib.DescriptionTypeEnum.exFilterBarFilterForCaption,"Filtreaza:") .set_Description(exontrol.EXPIVOTLib.DescriptionTypeEnum.exFilterBarDateTodayCaption,"Azi") .set_Description(exontrol.EXPIVOTLib.DescriptionTypeEnum.exFilterBarDateWeekDays,"D L Ma Mi J V S") .set_Description(exontrol.EXPIVOTLib.DescriptionTypeEnum.exFilterBarExclude,"Exclud") .set_Description(exontrol.EXPIVOTLib.DescriptionTypeEnum.exColumnsFloatBar,"Coloane") .set_Description(exontrol.EXPIVOTLib.DescriptionTypeEnum.exFilterBarAnd,"si") .set_Description(exontrol.EXPIVOTLib.DescriptionTypeEnum.exFilterBarDate,"Data:") .set_Description(exontrol.EXPIVOTLib.DescriptionTypeEnum.exFilterBarDateTitle,"Data") .set_Description(exontrol.EXPIVOTLib.DescriptionTypeEnum.exFilterBarDateTo,"la") .set_Description(exontrol.EXPIVOTLib.DescriptionTypeEnum.exFilterBarNot,"nu") .set_Description(exontrol.EXPIVOTLib.DescriptionTypeEnum.exFilterBarOr,"sau") .Import("C:\Program Files\Exontrol\ExPivot\Sample\data.txt") .DataColumns.Item("OrderDate").SortType = exontrol.EXPIVOTLib.SortTypeEnum.SortDate .PivotRows = "9" .Refresh() End With
VB.NET for /COM
With AxPivot1 Debug.Print( .get_Description(EXPIVOTLib.DescriptionTypeEnum.exFilterBarDateMonths) ) .set_Description(EXPIVOTLib.DescriptionTypeEnum.exFilterBarDateMonths,"Ianuarie Februarie Martie Aprilie Mai Iunie Iulie August Septembrie Octombrie Noiembrie Decembrie") .set_Description(EXPIVOTLib.DescriptionTypeEnum.exFilterBarAll,"(Toate)") .set_Description(EXPIVOTLib.DescriptionTypeEnum.exFilterBarBlanks,"(Gol)") .set_Description(EXPIVOTLib.DescriptionTypeEnum.exFilterBarNonBlanks,"(Plin)") .set_Description(EXPIVOTLib.DescriptionTypeEnum.exFilterBarFilterForCaption,"Filtreaza:") .set_Description(EXPIVOTLib.DescriptionTypeEnum.exFilterBarDateTodayCaption,"Azi") .set_Description(EXPIVOTLib.DescriptionTypeEnum.exFilterBarDateWeekDays,"D L Ma Mi J V S") .set_Description(EXPIVOTLib.DescriptionTypeEnum.exFilterBarExclude,"Exclud") .set_Description(EXPIVOTLib.DescriptionTypeEnum.exColumnsFloatBar,"Coloane") .set_Description(EXPIVOTLib.DescriptionTypeEnum.exFilterBarAnd,"si") .set_Description(EXPIVOTLib.DescriptionTypeEnum.exFilterBarDate,"Data:") .set_Description(EXPIVOTLib.DescriptionTypeEnum.exFilterBarDateTitle,"Data") .set_Description(EXPIVOTLib.DescriptionTypeEnum.exFilterBarDateTo,"la") .set_Description(EXPIVOTLib.DescriptionTypeEnum.exFilterBarNot,"nu") .set_Description(EXPIVOTLib.DescriptionTypeEnum.exFilterBarOr,"sau") .Import("C:\Program Files\Exontrol\ExPivot\Sample\data.txt") .DataColumns.Item("OrderDate").SortType = EXPIVOTLib.SortTypeEnum.SortDate .PivotRows = "9" .Refresh() End With
C++
/* Copy and paste the following directives to your header file as it defines the namespace 'EXPIVOTLib' for the library: 'ExPivot 1.0 Control Library' #import <ExPivot.dll> using namespace EXPIVOTLib; */ EXPIVOTLib::IPivotPtr spPivot1 = GetDlgItem(IDC_PIVOT1)->GetControlUnknown(); OutputDebugStringW( spPivot1->GetDescription(EXPIVOTLib::exFilterBarDateMonths) ); spPivot1->PutDescription(EXPIVOTLib::exFilterBarDateMonths,L"Ianuarie Februarie Martie Aprilie Mai Iunie Iulie August Septembrie Octombrie Noiembrie Decembrie"); spPivot1->PutDescription(EXPIVOTLib::exFilterBarAll,L"(Toate)"); spPivot1->PutDescription(EXPIVOTLib::exFilterBarBlanks,L"(Gol)"); spPivot1->PutDescription(EXPIVOTLib::exFilterBarNonBlanks,L"(Plin)"); spPivot1->PutDescription(EXPIVOTLib::exFilterBarFilterForCaption,L"Filtreaza:"); spPivot1->PutDescription(EXPIVOTLib::exFilterBarDateTodayCaption,L"Azi"); spPivot1->PutDescription(EXPIVOTLib::exFilterBarDateWeekDays,L"D L Ma Mi J V S"); spPivot1->PutDescription(EXPIVOTLib::exFilterBarExclude,L"Exclud"); spPivot1->PutDescription(EXPIVOTLib::exColumnsFloatBar,L"Coloane"); spPivot1->PutDescription(EXPIVOTLib::exFilterBarAnd,L"si"); spPivot1->PutDescription(EXPIVOTLib::exFilterBarDate,L"Data:"); spPivot1->PutDescription(EXPIVOTLib::exFilterBarDateTitle,L"Data"); spPivot1->PutDescription(EXPIVOTLib::exFilterBarDateTo,L"la"); spPivot1->PutDescription(EXPIVOTLib::exFilterBarNot,L"nu"); spPivot1->PutDescription(EXPIVOTLib::exFilterBarOr,L"sau"); spPivot1->Import("C:\\Program Files\\Exontrol\\ExPivot\\Sample\\data.txt",vtMissing); spPivot1->GetDataColumns()->GetItem("OrderDate")->PutSortType(EXPIVOTLib::SortDate); spPivot1->PutPivotRows(L"9"); spPivot1->Refresh();
C++ Builder
OutputDebugString( Pivot1->Description[Expivotlib_tlb::DescriptionTypeEnum::exFilterBarDateMonths] ); Pivot1->Description[Expivotlib_tlb::DescriptionTypeEnum::exFilterBarDateMonths] = L"Ianuarie Februarie Martie Aprilie Mai Iunie Iulie August Septembrie Octombrie Noiembrie Decembrie"; Pivot1->Description[Expivotlib_tlb::DescriptionTypeEnum::exFilterBarAll] = L"(Toate)"; Pivot1->Description[Expivotlib_tlb::DescriptionTypeEnum::exFilterBarBlanks] = L"(Gol)"; Pivot1->Description[Expivotlib_tlb::DescriptionTypeEnum::exFilterBarNonBlanks] = L"(Plin)"; Pivot1->Description[Expivotlib_tlb::DescriptionTypeEnum::exFilterBarFilterForCaption] = L"Filtreaza:"; Pivot1->Description[Expivotlib_tlb::DescriptionTypeEnum::exFilterBarDateTodayCaption] = L"Azi"; Pivot1->Description[Expivotlib_tlb::DescriptionTypeEnum::exFilterBarDateWeekDays] = L"D L Ma Mi J V S"; Pivot1->Description[Expivotlib_tlb::DescriptionTypeEnum::exFilterBarExclude] = L"Exclud"; Pivot1->Description[Expivotlib_tlb::DescriptionTypeEnum::exColumnsFloatBar] = L"Coloane"; Pivot1->Description[Expivotlib_tlb::DescriptionTypeEnum::exFilterBarAnd] = L"si"; Pivot1->Description[Expivotlib_tlb::DescriptionTypeEnum::exFilterBarDate] = L"Data:"; Pivot1->Description[Expivotlib_tlb::DescriptionTypeEnum::exFilterBarDateTitle] = L"Data"; Pivot1->Description[Expivotlib_tlb::DescriptionTypeEnum::exFilterBarDateTo] = L"la"; Pivot1->Description[Expivotlib_tlb::DescriptionTypeEnum::exFilterBarNot] = L"nu"; Pivot1->Description[Expivotlib_tlb::DescriptionTypeEnum::exFilterBarOr] = L"sau"; Pivot1->Import(TVariant("C:\\Program Files\\Exontrol\\ExPivot\\Sample\\data.txt"),TNoParam()); Pivot1->DataColumns->get_Item(TVariant("OrderDate"))->SortType = Expivotlib_tlb::SortTypeEnum::SortDate; Pivot1->PivotRows = L"9"; Pivot1->Refresh();
C#
System.Diagnostics.Debug.Print( expivot1.get_Description(exontrol.EXPIVOTLib.DescriptionTypeEnum.exFilterBarDateMonths) ); expivot1.set_Description(exontrol.EXPIVOTLib.DescriptionTypeEnum.exFilterBarDateMonths,"Ianuarie Februarie Martie Aprilie Mai Iunie Iulie August Septembrie Octombrie Noiembrie Decembrie"); expivot1.set_Description(exontrol.EXPIVOTLib.DescriptionTypeEnum.exFilterBarAll,"(Toate)"); expivot1.set_Description(exontrol.EXPIVOTLib.DescriptionTypeEnum.exFilterBarBlanks,"(Gol)"); expivot1.set_Description(exontrol.EXPIVOTLib.DescriptionTypeEnum.exFilterBarNonBlanks,"(Plin)"); expivot1.set_Description(exontrol.EXPIVOTLib.DescriptionTypeEnum.exFilterBarFilterForCaption,"Filtreaza:"); expivot1.set_Description(exontrol.EXPIVOTLib.DescriptionTypeEnum.exFilterBarDateTodayCaption,"Azi"); expivot1.set_Description(exontrol.EXPIVOTLib.DescriptionTypeEnum.exFilterBarDateWeekDays,"D L Ma Mi J V S"); expivot1.set_Description(exontrol.EXPIVOTLib.DescriptionTypeEnum.exFilterBarExclude,"Exclud"); expivot1.set_Description(exontrol.EXPIVOTLib.DescriptionTypeEnum.exColumnsFloatBar,"Coloane"); expivot1.set_Description(exontrol.EXPIVOTLib.DescriptionTypeEnum.exFilterBarAnd,"si"); expivot1.set_Description(exontrol.EXPIVOTLib.DescriptionTypeEnum.exFilterBarDate,"Data:"); expivot1.set_Description(exontrol.EXPIVOTLib.DescriptionTypeEnum.exFilterBarDateTitle,"Data"); expivot1.set_Description(exontrol.EXPIVOTLib.DescriptionTypeEnum.exFilterBarDateTo,"la"); expivot1.set_Description(exontrol.EXPIVOTLib.DescriptionTypeEnum.exFilterBarNot,"nu"); expivot1.set_Description(exontrol.EXPIVOTLib.DescriptionTypeEnum.exFilterBarOr,"sau"); expivot1.Import("C:\\Program Files\\Exontrol\\ExPivot\\Sample\\data.txt",null); expivot1.DataColumns["OrderDate"].SortType = exontrol.EXPIVOTLib.SortTypeEnum.SortDate; expivot1.PivotRows = "9"; expivot1.Refresh();
JScript/JavaScript
<BODY onload="Init()"> <OBJECT CLASSID="clsid:5C9DF3D3-81B1-42C4-BED6-658F17748686" id="Pivot1"></OBJECT> <SCRIPT LANGUAGE="JScript"> function Init() { alert( Pivot1.Description(17) ); Pivot1.Description(17) = "Ianuarie Februarie Martie Aprilie Mai Iunie Iulie August Septembrie Octombrie Noiembrie Decembrie"; Pivot1.Description(0) = "(Toate)"; Pivot1.Description(1) = "(Gol)"; Pivot1.Description(2) = "(Plin)"; Pivot1.Description(3) = "Filtreaza:"; Pivot1.Description(16) = "Azi"; Pivot1.Description(18) = "D L Ma Mi J V S"; Pivot1.Description(25) = "Exclud"; Pivot1.Description(26) = "Coloane"; Pivot1.Description(11) = "si"; Pivot1.Description(12) = "Data:"; Pivot1.Description(15) = "Data"; Pivot1.Description(13) = "la"; Pivot1.Description(24) = "nu"; Pivot1.Description(23) = "sau"; Pivot1.Import("C:\\Program Files\\Exontrol\\ExPivot\\Sample\\data.txt",null); Pivot1.DataColumns.Item("OrderDate").SortType = 2; Pivot1.PivotRows = "9"; Pivot1.Refresh(); } </SCRIPT> </BODY>
VBScript
<BODY onload="Init()"> <OBJECT CLASSID="clsid:5C9DF3D3-81B1-42C4-BED6-658F17748686" id="Pivot1"></OBJECT> <SCRIPT LANGUAGE="VBScript"> Function Init() With Pivot1 alert( .Description(17) ) .Description(17) = "Ianuarie Februarie Martie Aprilie Mai Iunie Iulie August Septembrie Octombrie Noiembrie Decembrie" .Description(0) = "(Toate)" .Description(1) = "(Gol)" .Description(2) = "(Plin)" .Description(3) = "Filtreaza:" .Description(16) = "Azi" .Description(18) = "D L Ma Mi J V S" .Description(25) = "Exclud" .Description(26) = "Coloane" .Description(11) = "si" .Description(12) = "Data:" .Description(15) = "Data" .Description(13) = "la" .Description(24) = "nu" .Description(23) = "sau" .Import "C:\Program Files\Exontrol\ExPivot\Sample\data.txt" .DataColumns.Item("OrderDate").SortType = 2 .PivotRows = "9" .Refresh End With End Function </SCRIPT> </BODY>
C# for /COM
System.Diagnostics.Debug.Print( axPivot1.get_Description(EXPIVOTLib.DescriptionTypeEnum.exFilterBarDateMonths) ); axPivot1.set_Description(EXPIVOTLib.DescriptionTypeEnum.exFilterBarDateMonths,"Ianuarie Februarie Martie Aprilie Mai Iunie Iulie August Septembrie Octombrie Noiembrie Decembrie"); axPivot1.set_Description(EXPIVOTLib.DescriptionTypeEnum.exFilterBarAll,"(Toate)"); axPivot1.set_Description(EXPIVOTLib.DescriptionTypeEnum.exFilterBarBlanks,"(Gol)"); axPivot1.set_Description(EXPIVOTLib.DescriptionTypeEnum.exFilterBarNonBlanks,"(Plin)"); axPivot1.set_Description(EXPIVOTLib.DescriptionTypeEnum.exFilterBarFilterForCaption,"Filtreaza:"); axPivot1.set_Description(EXPIVOTLib.DescriptionTypeEnum.exFilterBarDateTodayCaption,"Azi"); axPivot1.set_Description(EXPIVOTLib.DescriptionTypeEnum.exFilterBarDateWeekDays,"D L Ma Mi J V S"); axPivot1.set_Description(EXPIVOTLib.DescriptionTypeEnum.exFilterBarExclude,"Exclud"); axPivot1.set_Description(EXPIVOTLib.DescriptionTypeEnum.exColumnsFloatBar,"Coloane"); axPivot1.set_Description(EXPIVOTLib.DescriptionTypeEnum.exFilterBarAnd,"si"); axPivot1.set_Description(EXPIVOTLib.DescriptionTypeEnum.exFilterBarDate,"Data:"); axPivot1.set_Description(EXPIVOTLib.DescriptionTypeEnum.exFilterBarDateTitle,"Data"); axPivot1.set_Description(EXPIVOTLib.DescriptionTypeEnum.exFilterBarDateTo,"la"); axPivot1.set_Description(EXPIVOTLib.DescriptionTypeEnum.exFilterBarNot,"nu"); axPivot1.set_Description(EXPIVOTLib.DescriptionTypeEnum.exFilterBarOr,"sau"); axPivot1.Import("C:\\Program Files\\Exontrol\\ExPivot\\Sample\\data.txt",null); axPivot1.DataColumns["OrderDate"].SortType = EXPIVOTLib.SortTypeEnum.SortDate; axPivot1.PivotRows = "9"; axPivot1.Refresh();
X++ (Dynamics Ax 2009)
public void init() { COM com_Column; anytype var_Column; ; super(); print( expivot1.Description(17/*exFilterBarDateMonths*/) ); expivot1.Description(17/*exFilterBarDateMonths*/,"Ianuarie Februarie Martie Aprilie Mai Iunie Iulie August Septembrie Octombrie Noiembrie Decembrie"); expivot1.Description(0/*exFilterBarAll*/,"(Toate)"); expivot1.Description(1/*exFilterBarBlanks*/,"(Gol)"); expivot1.Description(2/*exFilterBarNonBlanks*/,"(Plin)"); expivot1.Description(3/*exFilterBarFilterForCaption*/,"Filtreaza:"); expivot1.Description(16/*exFilterBarDateTodayCaption*/,"Azi"); expivot1.Description(18/*exFilterBarDateWeekDays*/,"D L Ma Mi J V S"); expivot1.Description(25/*exFilterBarExclude*/,"Exclud"); expivot1.Description(26/*exColumnsFloatBar*/,"Coloane"); expivot1.Description(11/*exFilterBarAnd*/,"si"); expivot1.Description(12/*exFilterBarDate*/,"Data:"); expivot1.Description(15/*exFilterBarDateTitle*/,"Data"); expivot1.Description(13/*exFilterBarDateTo*/,"la"); expivot1.Description(24/*exFilterBarNot*/,"nu"); expivot1.Description(23/*exFilterBarOr*/,"sau"); expivot1.Import("C:\\Program Files\\Exontrol\\ExPivot\\Sample\\data.txt"); var_Column = COM::createFromObject(expivot1.DataColumns()).Item("OrderDate"); com_Column = var_Column; com_Column.SortType(2/*SortDate*/); expivot1.PivotRows("9"); expivot1.Refresh(); }
Delphi 8 (.NET only)
with AxPivot1 do begin OutputDebugString( get_Description(EXPIVOTLib.DescriptionTypeEnum.exFilterBarDateMonths) ); set_Description(EXPIVOTLib.DescriptionTypeEnum.exFilterBarDateMonths,'Ianuarie Februarie Martie Aprilie Mai Iunie Iulie August Septembrie Octombrie Noiembrie Decembrie'); set_Description(EXPIVOTLib.DescriptionTypeEnum.exFilterBarAll,'(Toate)'); set_Description(EXPIVOTLib.DescriptionTypeEnum.exFilterBarBlanks,'(Gol)'); set_Description(EXPIVOTLib.DescriptionTypeEnum.exFilterBarNonBlanks,'(Plin)'); set_Description(EXPIVOTLib.DescriptionTypeEnum.exFilterBarFilterForCaption,'Filtreaza:'); set_Description(EXPIVOTLib.DescriptionTypeEnum.exFilterBarDateTodayCaption,'Azi'); set_Description(EXPIVOTLib.DescriptionTypeEnum.exFilterBarDateWeekDays,'D L Ma Mi J V S'); set_Description(EXPIVOTLib.DescriptionTypeEnum.exFilterBarExclude,'Exclud'); set_Description(EXPIVOTLib.DescriptionTypeEnum.exColumnsFloatBar,'Coloane'); set_Description(EXPIVOTLib.DescriptionTypeEnum.exFilterBarAnd,'si'); set_Description(EXPIVOTLib.DescriptionTypeEnum.exFilterBarDate,'Data:'); set_Description(EXPIVOTLib.DescriptionTypeEnum.exFilterBarDateTitle,'Data'); set_Description(EXPIVOTLib.DescriptionTypeEnum.exFilterBarDateTo,'la'); set_Description(EXPIVOTLib.DescriptionTypeEnum.exFilterBarNot,'nu'); set_Description(EXPIVOTLib.DescriptionTypeEnum.exFilterBarOr,'sau'); Import('C:\Program Files\Exontrol\ExPivot\Sample\data.txt',Nil); DataColumns.Item['OrderDate'].SortType := EXPIVOTLib.SortTypeEnum.SortDate; PivotRows := '9'; Refresh(); end
Delphi (standard)
with Pivot1 do begin OutputDebugString( Description[EXPIVOTLib_TLB.exFilterBarDateMonths] ); Description[EXPIVOTLib_TLB.exFilterBarDateMonths] := 'Ianuarie Februarie Martie Aprilie Mai Iunie Iulie August Septembrie Octombrie Noiembrie Decembrie'; Description[EXPIVOTLib_TLB.exFilterBarAll] := '(Toate)'; Description[EXPIVOTLib_TLB.exFilterBarBlanks] := '(Gol)'; Description[EXPIVOTLib_TLB.exFilterBarNonBlanks] := '(Plin)'; Description[EXPIVOTLib_TLB.exFilterBarFilterForCaption] := 'Filtreaza:'; Description[EXPIVOTLib_TLB.exFilterBarDateTodayCaption] := 'Azi'; Description[EXPIVOTLib_TLB.exFilterBarDateWeekDays] := 'D L Ma Mi J V S'; Description[EXPIVOTLib_TLB.exFilterBarExclude] := 'Exclud'; Description[EXPIVOTLib_TLB.exColumnsFloatBar] := 'Coloane'; Description[EXPIVOTLib_TLB.exFilterBarAnd] := 'si'; Description[EXPIVOTLib_TLB.exFilterBarDate] := 'Data:'; Description[EXPIVOTLib_TLB.exFilterBarDateTitle] := 'Data'; Description[EXPIVOTLib_TLB.exFilterBarDateTo] := 'la'; Description[EXPIVOTLib_TLB.exFilterBarNot] := 'nu'; Description[EXPIVOTLib_TLB.exFilterBarOr] := 'sau'; Import('C:\Program Files\Exontrol\ExPivot\Sample\data.txt',Null); DataColumns.Item['OrderDate'].SortType := EXPIVOTLib_TLB.SortDate; PivotRows := '9'; Refresh(); end
VFP
with thisform.Pivot1 DEBUGOUT( .Description(17) ) .Object.Description(17) = "Ianuarie Februarie Martie Aprilie Mai Iunie Iulie August Septembrie Octombrie Noiembrie Decembrie" .Object.Description(0) = "(Toate)" .Object.Description(1) = "(Gol)" .Object.Description(2) = "(Plin)" .Object.Description(3) = "Filtreaza:" .Object.Description(16) = "Azi" .Object.Description(18) = "D L Ma Mi J V S" .Object.Description(25) = "Exclud" .Object.Description(26) = "Coloane" .Object.Description(11) = "si" .Object.Description(12) = "Data:" .Object.Description(15) = "Data" .Object.Description(13) = "la" .Object.Description(24) = "nu" .Object.Description(23) = "sau" .Import("C:\Program Files\Exontrol\ExPivot\Sample\data.txt") .DataColumns.Item("OrderDate").SortType = 2 .PivotRows = "9" .Refresh endwith
dBASE Plus
local oPivot oPivot = form.EXPIVOTACTIVEXCONTROL1.nativeObject ? oPivot.Description(17) oPivot.Template = [Description(17) = "Ianuarie Februarie Martie Aprilie Mai Iunie Iulie August Septembrie Octombrie Noiembrie Decembrie"] // oPivot.Description(17) = "Ianuarie Februarie Martie Aprilie Mai Iunie Iulie August Septembrie Octombrie Noiembrie Decembrie" oPivot.Template = [Description(0) = "(Toate)"] // oPivot.Description(0) = "(Toate)" oPivot.Template = [Description(1) = "(Gol)"] // oPivot.Description(1) = "(Gol)" oPivot.Template = [Description(2) = "(Plin)"] // oPivot.Description(2) = "(Plin)" oPivot.Template = [Description(3) = "Filtreaza:"] // oPivot.Description(3) = "Filtreaza:" oPivot.Template = [Description(16) = "Azi"] // oPivot.Description(16) = "Azi" oPivot.Template = [Description(18) = "D L Ma Mi J V S"] // oPivot.Description(18) = "D L Ma Mi J V S" oPivot.Template = [Description(25) = "Exclud"] // oPivot.Description(25) = "Exclud" oPivot.Template = [Description(26) = "Coloane"] // oPivot.Description(26) = "Coloane" oPivot.Template = [Description(11) = "si"] // oPivot.Description(11) = "si" oPivot.Template = [Description(12) = "Data:"] // oPivot.Description(12) = "Data:" oPivot.Template = [Description(15) = "Data"] // oPivot.Description(15) = "Data" oPivot.Template = [Description(13) = "la"] // oPivot.Description(13) = "la" oPivot.Template = [Description(24) = "nu"] // oPivot.Description(24) = "nu" oPivot.Template = [Description(23) = "sau"] // oPivot.Description(23) = "sau" oPivot.Import("C:\Program Files\Exontrol\ExPivot\Sample\data.txt") oPivot.DataColumns.Item("OrderDate").SortType = 2 oPivot.PivotRows = "9" oPivot.Refresh()
XBasic (Alpha Five)
Dim oPivot as P oPivot = topparent:CONTROL_ACTIVEX1.activex ? oPivot.Description(17) oPivot.Template = "Description(17) = `Ianuarie Februarie Martie Aprilie Mai Iunie Iulie August Septembrie Octombrie Noiembrie Decembrie`" // oPivot.Description(17) = "Ianuarie Februarie Martie Aprilie Mai Iunie Iulie August Septembrie Octombrie Noiembrie Decembrie" oPivot.Template = "Description(0) = `(Toate)`" // oPivot.Description(0) = "(Toate)" oPivot.Template = "Description(1) = `(Gol)`" // oPivot.Description(1) = "(Gol)" oPivot.Template = "Description(2) = `(Plin)`" // oPivot.Description(2) = "(Plin)" oPivot.Template = "Description(3) = `Filtreaza:`" // oPivot.Description(3) = "Filtreaza:" oPivot.Template = "Description(16) = `Azi`" // oPivot.Description(16) = "Azi" oPivot.Template = "Description(18) = `D L Ma Mi J V S`" // oPivot.Description(18) = "D L Ma Mi J V S" oPivot.Template = "Description(25) = `Exclud`" // oPivot.Description(25) = "Exclud" oPivot.Template = "Description(26) = `Coloane`" // oPivot.Description(26) = "Coloane" oPivot.Template = "Description(11) = `si`" // oPivot.Description(11) = "si" oPivot.Template = "Description(12) = `Data:`" // oPivot.Description(12) = "Data:" oPivot.Template = "Description(15) = `Data`" // oPivot.Description(15) = "Data" oPivot.Template = "Description(13) = `la`" // oPivot.Description(13) = "la" oPivot.Template = "Description(24) = `nu`" // oPivot.Description(24) = "nu" oPivot.Template = "Description(23) = `sau`" // oPivot.Description(23) = "sau" oPivot.Import("C:\Program Files\Exontrol\ExPivot\Sample\data.txt") oPivot.DataColumns.Item("OrderDate").SortType = 2 oPivot.PivotRows = "9" oPivot.Refresh()
Visual Objects
OutputDebugString(String2Psz( oDCOCX_Exontrol1:[Description,exFilterBarDateMonths] )) oDCOCX_Exontrol1:[Description,exFilterBarDateMonths] := "Ianuarie Februarie Martie Aprilie Mai Iunie Iulie August Septembrie Octombrie Noiembrie Decembrie" oDCOCX_Exontrol1:[Description,exFilterBarAll] := "(Toate)" oDCOCX_Exontrol1:[Description,exFilterBarBlanks] := "(Gol)" oDCOCX_Exontrol1:[Description,exFilterBarNonBlanks] := "(Plin)" oDCOCX_Exontrol1:[Description,exFilterBarFilterForCaption] := "Filtreaza:" oDCOCX_Exontrol1:[Description,exFilterBarDateTodayCaption] := "Azi" oDCOCX_Exontrol1:[Description,exFilterBarDateWeekDays] := "D L Ma Mi J V S" oDCOCX_Exontrol1:[Description,exFilterBarExclude] := "Exclud" oDCOCX_Exontrol1:[Description,exColumnsFloatBar] := "Coloane" oDCOCX_Exontrol1:[Description,exFilterBarAnd] := "si" oDCOCX_Exontrol1:[Description,exFilterBarDate] := "Data:" oDCOCX_Exontrol1:[Description,exFilterBarDateTitle] := "Data" oDCOCX_Exontrol1:[Description,exFilterBarDateTo] := "la" oDCOCX_Exontrol1:[Description,exFilterBarNot] := "nu" oDCOCX_Exontrol1:[Description,exFilterBarOr] := "sau" oDCOCX_Exontrol1:Import("C:\Program Files\Exontrol\ExPivot\Sample\data.txt",nil) oDCOCX_Exontrol1:DataColumns:[Item,"OrderDate"]:SortType := SortDate oDCOCX_Exontrol1:PivotRows := "9" oDCOCX_Exontrol1:Refresh()
PowerBuilder
OleObject oPivot oPivot = ole_1.Object MessageBox("Information",string( oPivot.Description(17) )) oPivot.Description(17,"Ianuarie Februarie Martie Aprilie Mai Iunie Iulie August Septembrie Octombrie Noiembrie Decembrie") oPivot.Description(0,"(Toate)") oPivot.Description(1,"(Gol)") oPivot.Description(2,"(Plin)") oPivot.Description(3,"Filtreaza:") oPivot.Description(16,"Azi") oPivot.Description(18,"D L Ma Mi J V S") oPivot.Description(25,"Exclud") oPivot.Description(26,"Coloane") oPivot.Description(11,"si") oPivot.Description(12,"Data:") oPivot.Description(15,"Data") oPivot.Description(13,"la") oPivot.Description(24,"nu") oPivot.Description(23,"sau") oPivot.Import("C:\Program Files\Exontrol\ExPivot\Sample\data.txt") oPivot.DataColumns.Item("OrderDate").SortType = 2 oPivot.PivotRows = "9" oPivot.Refresh()
Visual DataFlex
Procedure OnCreate Forward Send OnCreate Showln (ComDescription(Self,OLEexFilterBarDateMonths)) Set ComDescription OLEexFilterBarDateMonths to "Ianuarie Februarie Martie Aprilie Mai Iunie Iulie August Septembrie Octombrie Noiembrie Decembrie" Set ComDescription OLEexFilterBarAll to "(Toate)" Set ComDescription OLEexFilterBarBlanks to "(Gol)" Set ComDescription OLEexFilterBarNonBlanks to "(Plin)" Set ComDescription OLEexFilterBarFilterForCaption to "Filtreaza:" Set ComDescription OLEexFilterBarDateTodayCaption to "Azi" Set ComDescription OLEexFilterBarDateWeekDays to "D L Ma Mi J V S" Set ComDescription OLEexFilterBarExclude to "Exclud" Set ComDescription OLEexColumnsFloatBar to "Coloane" Set ComDescription OLEexFilterBarAnd to "si" Set ComDescription OLEexFilterBarDate to "Data:" Set ComDescription OLEexFilterBarDateTitle to "Data" Set ComDescription OLEexFilterBarDateTo to "la" Set ComDescription OLEexFilterBarNot to "nu" Set ComDescription OLEexFilterBarOr to "sau" Get ComImport "C:\Program Files\Exontrol\ExPivot\Sample\data.txt" Nothing to Nothing Variant voColumns Get ComDataColumns to voColumns Handle hoColumns Get Create (RefClass(cComColumns)) to hoColumns Set pvComObject of hoColumns to voColumns Variant voColumn Get ComItem of hoColumns "OrderDate" to voColumn Handle hoColumn Get Create (RefClass(cComColumn)) to hoColumn Set pvComObject of hoColumn to voColumn Set ComSortType of hoColumn to OLESortDate Send Destroy to hoColumn Send Destroy to hoColumns Set ComPivotRows to "9" Send ComRefresh End_Procedure
XBase++
#include "AppEvent.ch" #include "ActiveX.ch" PROCEDURE Main LOCAL oForm LOCAL nEvent := 0, mp1 := NIL, mp2 := NIL, oXbp := NIL LOCAL oPivot oForm := XbpDialog():new( AppDesktop() ) oForm:drawingArea:clipChildren := .T. oForm:create( ,,{100,100}, {640,480},, .F. ) oForm:close := {|| PostAppEvent( xbeP_Quit )} oPivot := XbpActiveXControl():new( oForm:drawingArea ) oPivot:CLSID := "Exontrol.Pivot.1" /*{5C9DF3D3-81B1-42C4-BED6-658F17748686}*/ oPivot:create(,, {10,60},{610,370} ) DevOut( oPivot:Description(17/*exFilterBarDateMonths*/) ) oPivot:SetProperty("Description",17/*exFilterBarDateMonths*/,"Ianuarie Februarie Martie Aprilie Mai Iunie Iulie August Septembrie Octombrie Noiembrie Decembrie") oPivot:SetProperty("Description",0/*exFilterBarAll*/,"(Toate)") oPivot:SetProperty("Description",1/*exFilterBarBlanks*/,"(Gol)") oPivot:SetProperty("Description",2/*exFilterBarNonBlanks*/,"(Plin)") oPivot:SetProperty("Description",3/*exFilterBarFilterForCaption*/,"Filtreaza:") oPivot:SetProperty("Description",16/*exFilterBarDateTodayCaption*/,"Azi") oPivot:SetProperty("Description",18/*exFilterBarDateWeekDays*/,"D L Ma Mi J V S") oPivot:SetProperty("Description",25/*exFilterBarExclude*/,"Exclud") oPivot:SetProperty("Description",26/*exColumnsFloatBar*/,"Coloane") oPivot:SetProperty("Description",11/*exFilterBarAnd*/,"si") oPivot:SetProperty("Description",12/*exFilterBarDate*/,"Data:") oPivot:SetProperty("Description",15/*exFilterBarDateTitle*/,"Data") oPivot:SetProperty("Description",13/*exFilterBarDateTo*/,"la") oPivot:SetProperty("Description",24/*exFilterBarNot*/,"nu") oPivot:SetProperty("Description",23/*exFilterBarOr*/,"sau") oPivot:Import("C:\Program Files\Exontrol\ExPivot\Sample\data.txt") oPivot:DataColumns:Item("OrderDate"):SortType := 2/*SortDate*/ oPivot:PivotRows := "9" oPivot:Refresh() oForm:Show() DO WHILE nEvent != xbeP_Quit nEvent := AppEvent( @mp1, @mp2, @oXbp ) oXbp:handleEvent( nEvent, mp1, mp2 ) ENDDO RETURN