Duvida com PageControl

Tenho um PageControl com duas Guias.
Em determinada situação se um campo estiver ativado (na guia 1) e um usuario quiser entrar na guia 2 o sistema deve enviar uma mensagem e permanecer na guia 1

estou tentando fazer o seguinte
em PageControl1Changing
if PageControl1.ActivePageIndex = 0 then
begin
exibe mensagem
pagecontrol.activepageindex:=0;
end;

ele esta exibindo a mensagem qdo clico na guia 2, mas apos clicar em ok da mensagem ele não permanece na guia 1, vai direto pro 2.