Решение нашел с использованием TFileStream.
А до этого был какой-то глюк: трассил программу до первого BlockRead все массивы были определены (нормально), а вот после первого же на следующим шаге становились либо чушью набитыми либо имели значение inaccessible value, и при попытке обратится к ним потом с SetLength программа вылетала с ошибкой. с TFileStream такого нет.. Это я чего то не понял или у моего Delphi глюк?
|