Показать сообщение отдельно
  #15  
Старый 22.10.2012, 15:28
Аватар для poli-smen
poli-smen poli-smen вне форума
Профессионал
 
Регистрация: 06.08.2012
Адрес: Кривой Рог
Сообщения: 1,791
Версия Delphi: Delphi 7, XE2
Репутация: 4415
По умолчанию

Цитата:
Сообщение от sorockinalex
думаю, цикл от 0 до -1 с заданием его в виде:
Код:
for i:=0 to -1 do
не должен выполняться...
Совершенно верно - такой цикл ни разу не выполнится.
Цитата:
Сообщение от sorockinalex
так и не разобрался где ошибка, или не ошибка. в коде выше обошёл просто дополнительным условием
Я нашёл где у тебя ошибка. Вот здесь, в объявлении переменной i:
Код:
var
  width, maxwidth, fullwidth: cardinal;
  i: cardinal;
Объявлена она у тебя как беззнаковая (т.е. всегда неотрицательная), а ты пытаешься выполнить цикл от 0 до -1.
Итого вместо:
Код:
for i:=0 to -1 do
у тебя получается:
Код:
for i:=0 to 4294967295 do
Ответить с цитированием