Thema: Delphi Internal Error L973

Einzelnen Beitrag anzeigen

dassi87

Registriert seit: 5. Jan 2007
Ort: Hanau
7 Beiträge
 
Delphi 8 Architect
 
#7

Re: Internal Error L973

  Alt 6. Jan 2007, 15:03
Hi,

hab das ganze jetzt noch mal versucht neu aufzubauen und dabei rausgefunden, dass er den Fehler schon nach der Typn-Deklaration anzeigt, genauer gesagt beim Record liegen muss. Da genau das der Teil ist, der neu für mich ist, stell ich grad mal den Quelltext rein und hoffe/denke dass sich jemand damit besser auskennt als ich und vielleicht den möglichen Fehler entdeckt:
Delphi-Quellcode:
type
  Tzweiter_Versuch = class(TForm)
    BitBtn_Auto: TBitBtn;
    BitBtn_Bus: TBitBtn;
    BitBtn_LKW: TBitBtn;
  private
    { Private declarations }
  public
    { Public declarations }
  end;


  TFahrzeug = class
  public
  FPosX: integer;
  FPosY: integer;
  FWidth: integer;
  FHeight: integer;
  FArt: string;
  FDelay: integer;
  end;


  TFahrzeuginstanz = record
  Instanz: TFahrzeug;
  empty: boolean;
  end;

var
  zweiter_Versuch: Tzweiter_Versuch;
  Fahrzeuge: array[0..15] of TFahrzeuginstanz;
  end
Danke schon mal

[edit=sakura] [delphi]-Tags. Mfg, sakura[/edit]
Stefanie
  Mit Zitat antworten Zitat