Difference between revisions of "Try/es"
From Free Pascal wiki
Jump to navigationJump to search (Created page with "{{Try}} '''try''' es parte tanto de un bloque '''try'''..'''finally''' como de un bloque '''try'''..'''except'''. Si tiene lugar una Exceptions| ex...") |
m |
||
Line 4: | Line 4: | ||
Si tiene lugar una [[Exceptions| excepción]] mientras se ejecuta el código entre un '''try''' y un '''finally''', la ejecución se resume en '''finally'''. Aún si no tiene lugar la excepción, el código entre '''finally''' y '''end''' se ejecutará siempre. | Si tiene lugar una [[Exceptions| excepción]] mientras se ejecuta el código entre un '''try''' y un '''finally''', la ejecución se resume en '''finally'''. Aún si no tiene lugar la excepción, el código entre '''finally''' y '''end''' se ejecutará siempre. | ||
− | <syntaxhighlight> | + | <syntaxhighlight lang=pascal> |
try | try | ||
// Código que podría generar una excepción. | // Código que podría generar una excepción. | ||
Line 13: | Line 13: | ||
Siempre que tiene lugar una excepción, se ejecutará el código que se encuentra entre '''except''' y '''end'''. | Siempre que tiene lugar una excepción, se ejecutará el código que se encuentra entre '''except''' y '''end'''. | ||
− | <syntaxhighlight> | + | <syntaxhighlight lang=pascal> |
try | try | ||
// Código que podría generar una excepción | // Código que podría generar una excepción |
Latest revision as of 06:23, 31 January 2020
│
Deutsch (de) │
English (en) │
español (es) │
suomi (fi) │
русский (ru) │
try es parte tanto de un bloque try..finally como de un bloque try..except.
Si tiene lugar una excepción mientras se ejecuta el código entre un try y un finally, la ejecución se resume en finally. Aún si no tiene lugar la excepción, el código entre finally y end se ejecutará siempre.
try
// Código que podría generar una excepción.
finally
// Será ejecutado siempre como últimas sentencias.
end;
Siempre que tiene lugar una excepción, se ejecutará el código que se encuentra entre except y end.
try
// Código que podría generar una excepción
except
// Esto se ejecutará únicamente si tiene lugar una excepción
on E: EDatabaseError do
ShowMessage( 'Database error: '+ E.ClassName + #13#10 + E.Message );
on E: Exception do
ShowMessage( 'Error: '+ E.ClassName + #13#10 + E.Message );
end;