http://hostingkartinok.com/show-image.php?id=78716c9a029e366e16ce99cd732e17e5

for j := 0 to messages.Count-1 do
// messages.Count = 0
тем не менее, зашел как-то
ловлю AV, конечно

наверно,  j объявлено как byte, word или cardinal ?

>> Sha ©  
да, cardinal (LongWord)
а
property Count: Integer

спасибо, понял

а разве компилятор не должен был предупреждение выдать если переменная цикла не integer

нет. С чего бы.
Вот если сравнивать разные типы - должен. Но не выдал почему-то.

а, так я и не сравнивал в явном виде

Объявляющим переменные цикла типом без знака надо отрубать правую руку.

> Игорь Шевченко ©   (01.09.16 17:19) [6]

 for c := 'a' to 'z' do

> Игорь Шевченко ©   (01.09.16 17:19) [6]

Хорошо, что Вы законы РФ не пишите :)

Хорошо, что Игорь не модератор, а то бы всех перебанил.

Ан нет, модератор :))

тогда и левую руку отрубить. за использование for для перебора всех элементов

> Игорь Шевченко ©   (01.09.16 17:19) [6]
> Объявляющим переменные цикла типом без знака надо отрубать
> правую руку.


Два пальца. Без трех в армию не возьмут. И в дворники )))

class function TObject.ClassNameIs(const Name: string): Boolean;

 I: Byte;

 for I := 0 to Byte(Temp[0]) do
   if Temp[I] <> Name[I]

----
unit System;

procedure   _InitializeRecord(p: Pointer; typeInfo: Pointer);
{$IFDEF PUREPASCAL}
var
 FT: PFieldTable;
 I: Cardinal;
begin
 FT := PFieldTable(Integer(typeInfo) + Byte(PTypeInfo(typeInfo).Name[0]));
 for I := FT.Count-1 downto 0 do

> тогда и левую руку отрубить. за использование for для перебора
> всех элементов

Стесняюсь спросить, а что надо использовать? Д6, если чё... ;)

> да, cardinal (LongWord)

У меня обратная ситуация была, когда я время считал разницей GetTickCount, храня промежуточные значения в переменной типа Integer... Те еще спецэффекты ловил...

> Стесняюсь спросить, а что надо использовать


Энумераторы. Хотя что-то мне подсказывает, что на низком уровне всё-равно скатится до REPNZ...

> asail ©   (01.09.16 22:07) [14]

ах, делфи... ну, тогда и ноги отрубить :)

> Asail ©   (01.09.16 22:10) [15]
>

у меня банальнее несколько
нода джейсон в принципе не нужна, просто решил выпендриться, распарсить и ее
ну и просто, не думая, воткнул переменную куда попало, а попало как раз
к переменной под GetTickCount заюзаной.

И данные были удачные поначалу, ну и забыл

(там отзывы посетителей, текстом, от руки. Для ТТХ богадельней не нужны в принципе, но решил, что позже придумаю как на основе слов оценить в целом в + или в - написал человек. А это уже можно сконвертировать в еще одну характеристику, реальную, числовую)

и "сломалось" на отсутствии комментов у одной конторы..

>
> > Стесняюсь спросить, а что надо использовать
>
>
> Энумераторы.


в делфи 6 их нет, если не ошибаюсь