[learndel]

чтоб каждый последующий элемент брался из файла ч.з. ","
Щас делаю вроде так

Код:

var
s:integer;
rez: array[1..4] of integer;
prosedure
for i:=1 to 4 do
begin 
AssignFile(f,'qw.txt');
reset(f);
readln(f,s);
res[i]:=IntToStr(s);
end;

но неудобно много txt шек приходится создавать
хочу сделать двумерный массив чтобы заполнялся
ч.з. "," строки массива, а ч/з eoln столбцы...

_________________________________________

Помогите пожалуйста, Сорри если пост некорректен...