Einzelnen Beitrag anzeigen

Benutzerbild von Pseudemys Nelsoni
Pseudemys Nelsoni

Registriert seit: 24. Dez 2002
Ort: Hamburg-Harburg
3.551 Beiträge
 
#1

Frage zu Dynamischem Array

  Alt 17. Jan 2004, 04:30
moin,

ich habe mein Typ/array folgendermassen:

Delphi-Quellcode:
type
  TNickInfo = Record
                nick: string;
                ClanID: string;
                LongIP: string;
              end;
Delphi-Quellcode:
var
  NickInfo: Array of TNickInfo;

dann parse ich das ganze:

Delphi-Quellcode:
      begin
        Delete(params, 1, Pos(':', params)+1);
        Trim(params);
        while params <> 'do
        begin
          if Pos(' ', params) > 0 then
          begin
            SetLength(NickInfo, high(NickInfo)+1);
            NickInfo[high(NickInfo)].Nick := Copy(params, 1, Pos(',', params)-1);
            Delete(params, 1, Pos(',', params));
            NickInfo[high(NickInfo)].ClanID := Copy(params, 1, Pos(',', params)-1);
            Delete(params, 1, Pos(',', params));
            NickInfo[high(NickInfo)].LongIP := Copy(params, 1, Pos(' ', params)-1);
            Delete(params, 1, Pos(' ', params));
          end
          else
          begin
            SetLength(NickInfo, high(NickInfo)+1);
            NickInfo[high(NickInfo)].Nick := Copy(params, 1, Pos(',', params)-1);
            Delete(params, 1, Pos(',', params));
            NickInfo[high(NickInfo)].ClanID := Copy(params, 1, Pos(',', params)-1);
            Delete(params, 1, Pos(',', params));
            NickInfo[high(NickInfo)].LongIP := Copy(params, 1, Pos('', params)-1);
            Delete(params, 1, Pos('', params));
          end;
        end;
      end;

der string der da geparsed wird heisst:

Zitat:
:ts.cncreloaded.net - 353 - silentx * #Lob_18_0 :silentx,1163,3576143035 tibfantom,0,408781727 @silent,1294,3576143035 Uzi,1023,1141775833 @HelpBot,0,0

aber irgendwie krieg ich sobald das parsen anfängt eine ZV(EAccessViolation) bei adresse 00irgendwas.


was ist denn daran verkehrt?
Mario
  Mit Zitat antworten Zitat