Delphi-Quellcode:
type tcodepassword = record
bla1:string[100];
bla2: string[100];
bla3: string[100];
bla4: array[1..100] of string [100];
bla5: array[1..100] of array[1..100] of string[100];
bla6: array[1..100] of string[100];
end;
ok hat sich wohl erledigt... ich kürze einfach die arrays und die maximale länge der strings danke