Ver Mensaje Individual
  #3  
Antiguo 30-06-2005
Avatar de Lepe
[Lepe] Lepe is offline
Miembro Premium
 
Registrado: may 2003
Posts: 7.424
Reputación: 31
Lepe Va por buen camino
Quedate solo con este mensaje

La coletilla de roman de destruir los objetos es esto:
Código Delphi [-]
procedure Tform1.FormClose(...);
var i:integer;
begin
  for i:=0 to combo.items.count-1 do
     combo.items.Objects[i].Free;
end;

No tienes que andar con constructores y destructores de ningun tipo jeje. En realidad estas utilizando una clase como si fuera un registro, pero administrando la memoria, es decir, creandolos cuando los necesitas y destruyendolos cuando dejas de usarlos.

Cuando quieras acceder a un elemento, el código exacto para trabajar es:
Código Delphi [-]
procedure mio;
var E:TEmpleado;
     mivalor:integer;
begin
  E:= TEmpleado(combo.items.Objects[i]);
  mivalor := E.Numero;
end;
Aqui no tienes que crear ni destruir nada. Se crea cuando vas a meter los elementos en el combo, y lo destruyes.... pues al cerrar la ventana o justo antes de hacer combo.items.Clear;

Por muchas prisas que tengas, te aconsejo que pierdas 10 minutos en ver esto. Es una solución muy potente para todo tipo de situaciones, incluso con la propiedad Tag que tienen todos los controles y que nadie utilizamos al principio. ¡¡ Ya tienes el código y las explicaciones !! y la verdad, es muy simple.
w

Un saludo
__________________
Si usted entendió mi comentario, contácteme y gustosamente,
se lo volveré a explicar hasta que no lo entienda, Gracias.
Responder Con Cita