Цитата:
	
	
		| 
			
				 Сообщение от icWasya 
				Уточняю - у write - два параметра.Первый - это что пишем, второй сколько. 
Что там делает  'crypted'? 
А правильней, наверно можно так
 
	Код: 
	for ifile:=0 to round do CloseF.Write(fout[ifile],sizeof(fout[ifile]));  
 
или даже так
 
	Код: 
	CloseF.Write(fout[0],sizeof(fout[0])*ifile);  
  
			
		 | 
	
	
 
Точно! Спасибо)) по привычке написал как в ассигнфайл.