Показать сообщение отдельно
  #59  
Старый 15.04.2008, 22:41
AndrYxo AndrYxo вне форума
Начинающий
 
Регистрация: 04.04.2008
Сообщения: 115
Репутация: 10
По умолчанию

Цитата:
Сообщение от MegaPiha
Глобальная переменная отличается от локальной тем что объявляется в начале модуля и может быть использована в любой процедуре модуля.
То бишь надо объявить переменную outFile в самом начале Unit6. Вот в этом месте:
Код:
var
  Form6: TForm6;
  Y:array of array of real;
  C:array of array of real;
  A:array of array of real;
  B:array of array of real;
  n:integer;
  m:integer;
  k:integer;
  l:integer;
  outfile:textFile;
В процедурах объявлять эту переменную не надо.
С этим разобрался - спасибо...

Цитата:
Далее команды
AssignFile(outfile, 'c:\outfile.txt');
Rewrite(outfile);
тоже вызываем один раз перед первой работой с файлом.

Теперь во всех процедурах командами Write занести в файл данные и после последнего занесения использовать команду CloseFile(outfile)
А вот с этим нет... можно плиз разъяснить это для гипер чайника куда нужно всовывать
AssignFile(outfile, 'c:\outfile.txt');
Rewrite(outfile);
и если можно куда всунуть единственный раз CloseFile(outfile)...
очень прошу Ато у меня уже нет сил смотреть на эту прогу!!!