.pas файл - это обычный текстовый файл. И создать его можно:
Код:
var f:text;
...
assignfile(f,'123.pas');
rewrite(f);
И редактировать:
Код:
...
assignfile(f,'123.pas');
append(f);
Но это только для дозаписи. Если надо именно менять имеющийся в файле текст - то лучше так:
Код:
var f:file;
...
assignfile(f,'123.pas');
reset(f,1);
и дальше работать через seek, BlockRead, BlockWrite.