I use Delphi7, PageControl with owner-draw. I can't get so plain and nice look of tabs, as I see on not-owner-drawn PageControls. What's bad: 
when using owner-draw, I can't draw on "entire" tab header area, small 1-2px frame around tab header is painted by OS.

1) Delphi not owner-draw, look is OK too (XPMan used):

![delphi sys](https://i.stack.imgur.com/RT2li.png)

2) Delphi owner-draw, you see not entire tab header can be colored (XPMan used):

![delphi owner draw](https://i.stack.imgur.com/OirkI.png)

I draw current tab with blue and others with white, here. Only example.
Code:

```
procedure TForm1.PageControl1DrawTab(Control: TCustomTabControl;
  TabIndex: Integer; const Rect: TRect; Active: Boolean);
var
  c: TCanvas;
begin
  c:= (Control as TPageControl).Canvas;
  if Active then
    c.Brush.Color:= clBlue
  else
    c.Brush.Color:= clWhite;
  c.FillRect(Rect);    
end;

```

2b) Delphi owner-draw in real app (XPMan used):

![delphi real app](https://i.stack.imgur.com/xSlP2.png)

Why do i need to use owner-draw? Simple. To draw X button on tab headers, to paint upper-line with custom color, to paint icons from imagelists.

I'm looking for a way to **paint ENTIRE rect of tab headers**, not decreased rect which is given to PageControl owner-draw events. I tried to increase the rect given by owner-draw events, but this doesn't help, OS repaints this thin 1-2px frame around tab headers anyway.