Warum denn so kompliziert und langsam (stroint/besser noch strtointdef)über 3 Stringlisten?
Willst Du mit Pointer arbeiten?Das wäre natürlich high-end,
vorerst, ist meiner Meinung nach ein Record am übersichtlichsten.
Delphi-Quellcode:
Type
TMeineStreamDaten=Record
//z.B.
MSDDateiname:String;
MSDSize,Position:integer;
//MeinStream:TStream;
.
.
.
end;
Var MeineStreamDaten:Array of TMeineStreamDaten;
cnt1:integer;
Procedure CreateMyStreamData(StreamDatenAnzahl_);
var cnt1:integer;
begin
Setlength(MeineStreamDaten,StreamDatenAnzahl_);
For cnt1:=0 to Length(MeineStreamDaten)-1 do
with MeineStreamDaten[cnt1] do
begin
MsdSize:=Sizeofirgendwas;
MSDDateiname:='Test'+inttostr(cnt1);
.
.
.
end;
.
.
.