¿Y si no existe?

¿Y si no existe?

Ya para estas alturas, seguramente muchos habran visto los famosos mensajes de error de Visual Basic cuando un componente no esta registrado.  ¿Tienen solucion?. les propongo una si no les queda otra que usar OCX en Delphi.
Bueno, en Delphi, tira el mismo error, o uno muy parecido. Lo bueno, es que el manejo de errores de Delphi nos permite hacer varias cositas. Les cuento un ejemplo practico. Desarrollando CSS Spy, al momento de integrar el componente Mozilla ActiveX Control, note que se producian errores si el componente non estaba instalado en la maquina. ¿Que hacer? Bueno, arme la siguiente funcion:

function createMozilla(): bool;
begin
if not Assigned(MozillaBrowser1) then
begin
isMozAv:=false;
try
//Intentamos crear el objeto
MozillaBrowser1:=TMozillaBrowser.Create(pnlMoz);
except
//Mostramos un mensaje de error o algo
//Si tenemos una excepcion
end;
if Assigned(MozillaBrowser1) then
begin
isMozAv:=true;
//Aqui ponemos el codigo
//en caso de que el componente exista
end;
end
else
isMozAv:=true;
result:=isMozAv;
end;

De esta forma, ejecutanto el codigo en caso de que el componente exista, podemos habilitar o no opciones. Y dejar usar el programa aunque no tenga algun componente que, como en este caso, es opcional. Por otra parte si el componente es necesario, podemos mostrar un lindo mensaje de alerta o dar indicaciones de como descargarlo.

Saludosцерковь духовного возрождения

Jonatan Moleiro Sobre el autor Jonatan Moleiro

0 comments on “¿Y si no existe?Add yours →

Deja un comentario

Tu dirección de correo electrónico no será publicada. Los campos obligatorios están marcados con *