Idee gesucht: Mehrere Daten mit Funktion zurückgeben

[Andreas L.]

Hmm... irgendwas klappt noch nicht ganz:

Delphi-Quellcode:

for Line := 0 to Cookies.Count -1 do
    begin

     if pos(Domain, Cookies.Strings[Line]) > 0 then
      begin

       SetLength(tempcookies, Length(tempcookies) + 1);
       tempcookies[Length(tempcookies)] := CreateMozCookie(Cookies.Strings[Line]);

      end;
    end;

Cookies = stringlist
tempcookies = TMozCookies
CreateMozCookie() gibt ein TMozCookie zurück

Delphi-Quellcode:

type
  TMozCookie = record
      Domain: String;
      WholeDomain: Boolean;
      Path: String;
      Secure: Boolean;
      Expires: TDate;
      Name: String;
      Value: String;
  end;

  TMozCookies = array of TMozCookie;

Also TMozCookie ist ein Cookie (als record) und TMozCookies ist ein Array mit mehreren TMozCookie.

Ich versuche also mit

tempcookies[Length(tempcookies)] := CreateMozCookie(Cookies.Strings[Line]); mehrere TMozCookie in das Array zu schreiben.

Ich habe die Anwendung schon mit F7 durch gemacht. Direkt wenn die Funktion CreateMozCookie durch ist kommt eine AV. Der Cursor im Editor bleibt auf dem letzten end; stehen. Ich denke es hat was mit der Zuweisung des MozCookie an das Array zu tun. Ich weiß leider nicht weiter. Hat da jemand Ahnung?