Fórum Desabilitar uma Form #354941

Pessoal eu preciso desabilitar uma form enquanto estiver processando algo, ignorando qualquer comando que seja dado no momento do processamento, como no exemplo abaixo, ocorre que após o processamento todos os comandos dados aparecem normalmente.
Durante os 9 segundo que a form está desabilitada se eu clicar no botão B, após esse tempo ele mostra Botão clicado.
Vocês sabem como posso ignorar qualquer click efetuado na form enquanto ela estiver como enabled = false ?

procedure TForm2.AClick(Sender: TObject);
begin
Form2.Enabled := False;
Application.ProcessMessages;
Try
form2.Caption:=´desabilitado´;
sleep(9000);
Finally
Form2.Enabled := True;
form2.Caption:=´´;
end;
end;

procedure TForm2.BClick(Sender: TObject);
begin
SHOWMESSAGE(´BOTÃO CLICADO´);
end;