일단 페이지 콘트롤의 속성중에 OwnerDraw 를 True 로 해놓으시고..

페이지 콘트롤의 OnDrawTab 이벤트에서 아래처럼 작성하면 됩니다.



참고로 델파이 3이라면 아마 아래이벤트가 없을 겁니다.

지금 쓰고 있는 것이 델파이 5인데 거기에는 있어요..



procedure TForm1.PageControl1DrawTab(Control: TCustomTabControl;

TabIndex: Integer; const Rect: TRect; Active: Boolean);

begin

with Control.Canvas do

begin

Brush.Color:=clBtnFace;

FillRect(Rect);

if Active then Font.Color:=clRed else Font.Color:=clBtnText;



TextOut(REct.Left+3, Rect.Top+2, PageControl1.Pages[TabIndex].Caption);

end;

end;



박일용 wrote:

> 페이지콘트롤을 놓고 세개(AAA,BBB,CCC)의 페이지를 만들었습니다.

> 그런데 엑티브된 페이지의 글씨 색을 어떻게 변경하나요?

> 만약 BBB가 엑티브되 있다면

> AAA,CCC는 검정색으로 BBB는 빨간색으로 나타나게 하려면 어찌해댜 하는지요

> 좀 알려주세요...

>