TabSet Problem

[MrMyagi]

Moin allerseits,
und zwar möchte ich eine Art Menue über ein TabSet machen.
So weit so gut, jedoch wenn ich nun den 3. Tab, welchen ich habe
anklicke, möchte ich das das Label etc visible = true wird.
Das Problem dabei ist, das es erst nach mehrerem hin und herklicken
true wird und nich gleich beim klick auf den 3. Tab.

Hier mal der Quellcode:

Delphi-Quellcode:

procedure TForm1.TabSet1Change(Sender: TObject; NewTab: Integer;
  var AllowChange: Boolean);
begin
if TabSet1.TabIndex = 0 then
begin

//...

end;

if TabSet1.TabIndex = 1 then
begin

//...

end;

if TabSet1.TabIndex = 2 then
begin
//wird erst bei mhereren hin und herklicken ausgeführt
label1.Visible := true;
edit1.Visible := true;
Button1.Visible := true;
end;
end;