Ver Mensaje Individual
  #1  
Antiguo 15-02-2005
jplj jplj is offline
Miembro
 
Registrado: oct 2003
Posts: 189
Reputación: 21
jplj Va por buen camino
Error al crear una instancia de clase

He creado una clase similar a:

Código Delphi [-]

TUnidad = class(TObject)
private
  FInserccion: Boolean;
  FModif_A: Boolean;
  ...

public
   constructor Create(Owner: TComponent; Id: Integer; Inserccion: Boolean);
   function Save: Boolean;
end;

...

constructor TUnidadACA.Create(Owner: TComponent; Id: Integer; Inserccion: Boolean);
begin
   inherited Create;

   FInserccion:= Inserccion;
   FModif_A:= False;
...
end;

Posteriormente en un formulario en su parte privada he definido una variable de la clase y en una de sus funciones:

Código Delphi [-]
   if Assigned(FUniACA) then FUniACA.Free;

   try
      FUniACA.Create(Self, StrToInt(Id), false);
      ...

Al crear la clase, cuando se produce la asignación:
FInserccion:= Inserccion;
FModif_A:= False;
o cualquier otra se porduce una excepción:

Cita:
Access violation at address 004C0D1E in module "nombre.exe". Wirte of address 00000004
¿porqué?


Saludos.
__________________
Sonríe. Mañana puede ser peor.
Responder Con Cita