Ver Mensaje Individual
  #1  
Antiguo 09-07-2008
Avatar de mrnovice
mrnovice mrnovice is offline
Miembro
 
Registrado: oct 2006
Posts: 163
Reputación: 20
mrnovice Va por buen camino
Unhappy Exception eInvalidCast con FindComponent

Saludos foreros de ClubDelphi, disculpen la molestia nuevamente, estoy intentando agarrar un fichero txt donde vengan algunos nombres los componentes, para guardar configuraciones,un ejemplo de ello sería así

SpinEdit1.Name='SpinEdit1';
Checkbox1.Name='Checkbox1';
en el fichero txt esta asì
==============
SpinEdit1=50
Checkbox1=-1
===============
bueno lo cargo en el Form, pero este no es un proyecto normal,porque simàs no recuerdo me funcionó en Formulario normal, mi proyecto esta dentro de una DLL,bueno
Gracias a Dec me dijo como en este link
--------------------------------------------------------------------
lo qué pasa al tener este código:
Código Delphi [-]
var chBox :TcheckBox;
//-----------------
 try
    chBox := (Self.FindComponent(valorX) as TCheckBox);
 except
    on EInvalidCast do showmessage('Exception!!');
 end;
pues al encontrar el SpinEdit1 me arroja EInvalidCast, no me respeta el exception, ya sè porque es un TSpinEdit y no un TCheckbox, cómo pudiera hacerle para pudiera localizar todos los diferentes componentes sin que me tire excepciones?
----------------------------------------------------------------
intente usando una especie de TComponent, pero puess no funcionó.
Alguna sugerencia? osea intento buscar componentes dentro del mismo Formulario.
Nosé si quedo claro el planteamieno XD.
Gracias de antemano cualquier sugerencia será bienvenida
Responder Con Cita