摘要: 00]默认TabSheet表头的宽度和高度 动态改变 TabSheet表头的宽度和高度 procedure TForm1.FormCreate(Sender: TObject); var i: Integer; begin with PageControl1 do begin for i := 0 阅读全文