Передача параметром имени файла Опции

[OS]

Как правильно передавать имя файла параметром для функции?
Например, как правильно вызвать следующую функцию:

procedure oneArray (str:string); 
var FIn, FOut : text; 
begin 
  assign(FIn,str); 
  assign(FOut,'output.txt'); 
  reset(FIn); 
  rewrite(FOut); 
  for i:=1 to nMax do read(FIn,X[i]); 
  close(FIn); 
  close(FOut); 
end;

Сообщение отредактировано: Altair - 5.11.2005 18:33

[Vit]

oneArray ('c:myfile.txt');  

[mj]

oneArray ('c:myfile.txt');  

Это слишком просто, чтобы быть ответом...
Мне кажется тут спрашивалось о другом...

[Vit]

Я ж не телепат. В вопросе спрашивалось:

Как правильно передавать имя файля параметром для функции?

Вот я и ответил на конкретно этот поставленный вопрос