Показать сообщение отдельно
Старый 24.01.2010, 12:28   #4
cherepets
Бывалый
 
Регистрация: 18.08.2009
Сообщений: 745
Написано 146 полезных сообщений
(для 215 пользователей)
Ответ: Lib_arcade - Аркадные игры это просто

у меня мой редактор вылетает при попытке посимвольного чтения из файла. в чем может быть дело?
типы переменных:
var i,j:integer;
    fl:textfile;
    c:array [1..25,1..25] of char;
    temp:char;
сам код:
for j:=1 to 25 do
for i:=1 to 25 do
  begin
    Read(fl,temp);
    if temp<>chr(10) then if temp<>chr(13) then c[i,j]:=temp;
  end;
(Offline)
 
Ответить с цитированием