IndexOf(Value: IPrxControl): Integer;
Value - элемент управления.
Метод IndexOf возвращает индекс позиции элемента управления, передаваемого посредством параметра Value.
В рассматриваемом примере предполагается существование объекта Rep типа IPrxReport.
Sub UserProc;
Var
Rep : IPrxReport;
Ctrls : IPrxControls;
Ctrl : IPrxControl;
Sheet : IPrxSheet;
index : Integer;
Begin
Sheet := Rep.Sheets.Item(1);
Ctrls := Rep.Controls.SheetControls(Sheet);
Ctrl := Ctrls.FindById("ITEM1");
Index := Ctrls.IndexOf(Ctrl);
Ctrls.Move(Index,0);
End Sub UserProc;
После выполнения примера элемент управления второго листа будет перемещен.
См. также: