Einzelnen Beitrag anzeigen

Benutzerbild von malo
malo

Registriert seit: 19. Sep 2004
2.115 Beiträge
 
#2

Re: Array of TStringList erzeugen

  Alt 1. Mai 2005, 20:07
Falscher Alarm, hatte zum Probieren das "array of" weggelassen

Allerdings wird eine Exception ausgelöst. Einmal die beiden einzigen Prozeduren in meinem Code:

Delphi-Quellcode:
constructor TTokenizer.Create;
begin
  Tokens[0] := TStringList.Create;
end;

procedure TForm2.FormCreate(Sender: TObject);
begin
  Tokenizer := TTokenizer.Create;
end;
Und einmal die Klassendeklaration von TTokenizer und var-Abschnitt:

Delphi-Quellcode:
type
  TTokenizer = class(TObject)
    private

    public
      Tokens: array of TStrings;

      constructor Create;
    end;

var
  Form2: TForm2;
  Tokenizer: TTokenizer;
  Parse: TParse;
Das bringt mir eine Speicher-Zugriffsverletzung...
  Mit Zitat antworten Zitat