MovementMode: TabObjectMovementMode;
MovementMode: Prognoz.Platform.Interop.Tab.TabObjectMovementMode;
The MovementMode property determines the mode of changing the object position and size.
To determine identifier of the object located on a report sheet, use the ITabObject.Id property.
To execute the example a regular report with the REGULAR_REPORT identifier, which sheet contains an object with the PrxChart1 identifier are required.
Add links to the Metabase, Report and Tab system assemblies.
Sub UserProc;
Var
mb: IMetabase;
Report: IPrxReport;
Sheet: IPrxTable;
TObj: ITabObjects;
Object: ITabObject;
Begin
mb := MetabaseClass.Active;
Report := MB.ItemById("REGULAR_REPORT").Edit As IPrxReport;
Sheet := Report.Sheets.Item(0) As IPrxTable;
TObj := Sheet.TabSheet.Objects;
Object := TObj.Object("PrxChart1");
Object.MovementMode := TabObjectMovementMode.FreeWithCells;
(Report As IMetabaseObject).Save;
End Sub UserProc;
After executing the example the object shift method Moving and Changing with Cells is set for the object.
The requirements and result of the Fore.NET Example execution match with those in the Fore Example.
Imports Prognoz.Platform.Interop.Report;
Imports Prognoz.Platform.Interop.Tab;
…
Public Shared Sub Main(Params: StartParams);
Var
mb: IMetabase;
Report: IPrxReport;
Sheet: IPrxTable;
TObj: ITabObjects;
Object: ITabObject;
Begin
mb := Params.Metabase;
Report := MB.ItemById["REGULAR_REPORT"].Edit() As IPrxReport;
Sheet := Report.Sheets.Item[0] As IPrxTable;
TObj := Sheet.TabSheet.Objects;
Object := TObj.Object["PrxChart1"];
Object.MovementMode := TabObjectMovementMode.tomFreeWithCells;
(Report As IMetabaseObject).Save();
End Sub;
See also: