Registriert seit: 24. Dez 2002
Ort: Hamburg-Harburg
3.551 Beiträge
|
Frage zu Dynamischem Array
17. Jan 2004, 05: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
|