dxSpreadSheet动态切换Sheet
Posted 舟山渔夫
tags:
篇首语:本文由小常识网(cha138.com)小编为大家整理,主要介绍了dxSpreadSheet动态切换Sheet相关的知识,希望对你有一定的参考价值。
procedure TForm1.btnShowCaptionClick(Sender: TObject);
var
objWorksheet: TdxSpreadSheetTableView;
i: integer;
strList: TStringlist;
begin
strList := TStringlist.Create;
strList.Add(‘当前工作簿包括以下工作表:‘);
for i := 0 to SpreadSheet.SheetCount - 1 do
begin
objWorksheet := SpreadSheet.Sheets[i] as TdxSpreadSheetTableView;
strList.Add(objWorksheet.Caption);
end;
ShowMessage(strList.Text);
strList.Free;
end;
procedure TForm1.btnActiveShtClick(Sender: TObject);
var
indexLastSheet : integer;
begin
indexLastSheet := SpreadSheet.SheetCount - 1;
SpreadSheet.ActiveSheetIndex := indexLastSheet;
end;
以上是关于dxSpreadSheet动态切换Sheet的主要内容,如果未能解决你的问题,请参考以下文章