[dmdx]

Код:

var: Fl: TextFile;

procedure OpenFile(var FilePatch: string);
begin
 try
  AssignFile(Fl,FilePatch);
  Reset(Fl);
 finally
 end;
end;

begin
OpenFile('c:\log.log');
end;

т.е. по логике я передаю функции OpenFile адрес памяти в которой храниться значение c:\log.log !?
А если не использовать var

Код:

...
procedure OpenFile(FilePatch: string);
...

то я бы передавал именно значение c:\log.log !?