Estoy hecho un lío con las excepciones

[noob]

Tengo este bloque de código:

Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
begin
  if (Edit1.Text = '') or (Edit2.Text = '') or (Edit3.Text = '') then
    MessageBox( 0, 'Hay campos en blanco', 'Error', 0 )
  else
    MessageBox( 0, 'Todo está correcto', 'Información', 0 );
end;

Pero me gustaría gestionarlo mediante excepciones, la verdad es que me lío bastante con el try except end y es que tampoco le veo la utilidad si puedo usar un if else.

¿Me podéis decir como puedo transformar mi bloque de código en otro gestionado mediante excepciones?

Muchas gracias.