Delphi - Excepcion al cargar un archivo

Hola a todos, quisiera saber como hacer para crear excepcion de un componente que carga un squin de un archivo o sea seria algo asi:

procedure buttonclick (...)
begin

try
if opendialogo1.execute then
begin
skin.loadfile := opendialogo1.filename;
end
exception
begin
///mensaje
end;

end;


Lo que yo quiero es que cuando se habra un archivo incorrecto en vez de trabarse el programa me aparesca un cuadrito de error y por lo visto no se bien como es el blocke logico de trabajo con excepciones.

desde ya muchas gracias.

Es

try
{codigo normal}
except
{Mensaje de error}

Lo que sucede es que si lo haces desde el IDE de Delphi, éste recogerá primero el error. Si presionas Run de nuevo, verás como aparece tu error personalizado.