Delphi XE3, 현재 탭 시트의 이름 가져 오기

Question

여러 개의 탭 시트가있는 여러 페이지 컨트롤이 있습니다. 각 탭 시트에 사용자가 인쇄 할 수있는 그래프가 있습니다. 도구 모음 패널에 "인쇄"버튼이 있습니다. 활성 탭 시트에있는 그래프를 인쇄하는 하나의 "인쇄"단추가 필요합니다. 어떤 탭 시트가 활성 상태인지 알려줄 수있는 방법이 필요합니다. 나는 그래프의 이름을 탭 시트의 이름을 기반으로 알고있다. 그런 식으로 각 탭 시트에 "인쇄"단추를 누르지 않고 어떤 그래프를 인쇄 할 것인지 "인쇄"단추를 말할 수 있습니다. 활성 tabsheet는 '오늘'다음 인쇄 todaygraph 동일한 경우 나는 다음과 같은

원하는 의사 코드에서

;

Answer 1

탭 시트는 TPageControl에 의해 함께 유지됩니다. 이 속성은 ActivePage이며 현재 활성화 된 TabSheet 또는 nil을 나타냅니다. nil이 아닌 경우 MyPageControl.ActivePage.Caption을 사용하여 페이지 이름 (예 : 탭 시트)을 가져올 수 있습니다. 예 : 델파이 온라인 도움말, 예를 들어, http://www.delphi.com에서 제공됩니다. this page