delphi 中 rzpagecontrol 關閉當前的頁簽時怎么才能跳回上一次的頁簽呢?請高手幫忙
uj5u.com熱心網友回復:
var
lastPage: Integer;
procedure TForm1.pgc1Changing(Sender: TObject; var AllowChange: Boolean);
begin
lastPage := pgc1.TabIndex; // 保存上次的tabindex
end;
// 然后關閉時 pgc1.TabIndex := lastPage; 恢復上次
uj5u.com熱心網友回復:
哦,我試試看,謝謝轉載請註明出處,本文鏈接:https://www.uj5u.com/houduan/132859.html
標籤:VCL組件開發及應用
上一篇:Delphi動態創建控制元件
