TabSheet: ITabSheet;
The TabSheet property determines the table, which icon needs to be exported.
The example requires the Report object of the IPrxReport type, which sheet contains icons, for example:
Sub UserProc;
Var
Report: IPrxReport;
Exp: ITabIconExporter;
Begin
Exp := New TabIconExporter.Create;
Exp.TabSheet := (Report.Sheets.Item(0) As IPrxTable).TabSheet;
Exp.IconIndex := 0;
Exp.ExportToFile("C:\Icon1.bmp","bmp");
End Sub UserProc;
After executing the example the first sheet icon is exported to a file with the specified format.
See also: