Тема: Программирование матричных операций
Показать сообщение отдельно
  #13  
Старый 10.12.2011, 23:09
Аватар для angvelem
angvelem angvelem вне форума
.
  
Регистрация: 18.05.2011
Адрес: Омск
Сообщения: 3,970
Версия Delphi: 3,5,7,10,12,XE2
Репутация: выкл
По умолчанию
Замени:
Код:
  for Ch := #0 to #255 do AStat[Ch] := 0;
на
Код:
  FillChar(AStat, SizeOf(AStat), 0);
второй код понятнее и удобнее.
__________________
Je venus de nulle part
55.026263 с.ш., 73.397636 в.д.
Ответить с цитированием