usando o evento onClick

o evento onclick é disparado no instante em que você clica com o botão esquerdo do mouse sobre o objeto.

Exemplo :

procedure TForm1.ButtonClick(sender : object) ;
begin
cliente.showModal;
end;