Thema: Delphi AV bei inherited Create;

Einzelnen Beitrag anzeigen

Benutzerbild von glkgereon
glkgereon

Registriert seit: 16. Mär 2004
2.287 Beiträge
 
#1

AV bei inherited Create;

  Alt 30. Nov 2004, 19:52
moin, ich hab mir ne klasse geschrieben, um elo in dwz und umgekehrt umzurechnen (Schach...)

alle folgenden klassen sind von TObject abgeleitet

nun habbich folgende struktur(ich liste einfach mal alle "verlinkten" sachen auf):

Test:=TSpielerTable.Create;
Delphi-Quellcode:
constructor TSpielerTable.Create;
begin
  inherited Create;
  FCount := 0;
  SetLength(Spieler,0);
  Spieler[0] := TSpieler.Create;
end;
Delphi-Quellcode:
constructor TSpieler.Create;
begin
  inherited Create;
  FDaten := TDaten.Create;
  FWerte := TWerte.Create;
end;
Delphi-Quellcode:
constructor TDaten.Create;
begin
  inherited Create;
end;
Delphi-Quellcode:
constructor TWerte.Create;
begin
  inherited Create;
  FUmrechnen.Create;
  FPlayedAgainst.Create;
end;
Delphi-Quellcode:
constructor TUmrechnen.Create;
begin
  inherited Create;
end;
nun kommt bei letzterem beim "inherited Create;" eine Av (Zugriffsverletzung bei adresse 40005B99 im modul rtl70.bpl)

das wirklich seltsame ist nun, das er, wenn man bei der av auf ok klickt, er nach F9 im Code sofort zur Destroy-Procedure springt... ...ist das normal?

die klasse TUmrechnen besteht nur aus funktionen...aber das einbauen eines Dummy-Strings schafft auch keine abhilfe....

ich bin echt am verzweifeln (*heul*)

falls es wen interessiert...TUmrechnen ist wie folgt deklariert:
Delphi-Quellcode:
//##### TUmrechnen #####
  TUmrechnen = class(TObject)
    private
      FDummy: string;
    published
      constructor Create;
      destructor Destroy; override;
      function EloToDwz(Elo: integer): integer;
      function EloToIngo(Elo: integer): integer;
      function EloToBcf(Elo: integer): integer;
      function DwzToElo(Dwz: integer): integer;
      function DwzToIngo(Dwz: integer): integer;
      function DwzToBcf(Dwz: integer): integer;
      function IngoToElo(Ingo: integer): integer;
      function IngoToDwz(Ingo: integer): integer;
      function IngoToBcf(Ingo: integer): integer;
      function BcfToElo(Bcf: integer): integer;
      function BcfToDwz(Bcf: integer): integer;
      function BcfToIngo(Bcf: integer): integer;
    end;
//##### Ende TUmrechnen #####
»Unlösbare Probleme sind in der Regel schwierig...«
  Mit Zitat antworten Zitat