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.