E/A Fehler in Dyn. Array

**BungeeBug**

Hi all,

ich habe ein dyn. Array, in dem ich gerne MD5Digests speichern würde. Also hab ich mir eben nen
MyHashArray : Array of MD5Digest; erstellt. So weit so gut.
Nun habe ich eine Procedure die das Array füllen soll.

zusammenfalten · markieren

Delphi-Quellcode:

			// Thread zum hashen

// Proceduren

PROCEDURE TMyHashThread.execute;

VAR

 i : integer;

BEGIN

// Code zum hashen ...

SetLength(MyHashArray,0);

FOR i := 0 TO Form1.ListBox1.Items.Count-1 DO

 BEGIN

  SetLength(MyHashArray,i);

  MyHashArray[i] := MD5File(Copy(Verzeichniss,0,Pos('*',Verzeichniss)-1)+Form1.ListBox1.Items[i]);

 END;

END;

Das geht auch alles bis zu einer beliebigen Anzahl an Einträgen (Zahl ist immer anders). Dann bekomm ich eine Exception vom Kompiler der dann auch Promt alle 4re von sich streckt und nix mehr macht.
Ich weis nur nich was ich flasch mache ...

Zusatzinfo:
Es handelt ich um eine "EAccessViolation".

Bin für jeden Tipp zuhaben

E/A Fehler in Dyn. Array

E/A Fehler in Dyn. Array

Forumregeln