Показать сообщение отдельно
  #2  
Старый 23.11.2010, 15:20
Аватар для v1s2222
v1s2222 v1s2222 вне форума
Продвинутый
 
Регистрация: 07.09.2010
Сообщения: 726
Репутация: 26711
По умолчанию

Не знаю, что конкретно у вас не получается, но вот несколько идей:
Код:
//задаем дин. массив типа integer:
var
  mas: array of Integer;
  len: Integer; // кол-во чисел в массиве
begin
len:=0;
SetLength(mas, len);
... читаем из файла...
  while(not(EOF(F)) do begin // пока не конец файла
    mas[len] := ... // записываем нужное в массив
    inc(len); // увеличиваем на 1 длину массива
    SetLength(mas, len);
  end;

// ЗЫ если надо двухмерный массив, то измениться:
var
  mas: array of array of Integer; // объявляем двухмерный массив.
  len1, len2: Integer; // длина
begin
...
  mas[len1, len2] := ...;
__________________
Помогаю за Спасибо
Ответить с цитированием