Прешёл с VB на Delphi, попробовал цикл For и заметил что привычного step нет. Как же его всё-таки можно реализовать?

Такой конструкции нет (и никогда не было, к сожалению)
Заменить на While:

[Code]
Var i:integer;
...
While i<SomeMaxValue do
 begin
   i:=i+Step;
   ....Do something
 end;
[Code]

Кстати, а что будет если ... :

procedure Cycle(Step: Integer)
var I: Integer;
begin
 for I := 1 to 100 do
 begin
   I := I + Step - 1;
   ......
   ......
   ......
 end;
end;

Ничего не будет... нельзя ассигновать значение переменной цикла FOR

Цитата(neutrino @ 30.10.2002, 10:04)

Кстати, а что будет если ... :

Ничего хорошего не будет - компиллятор не компиллирует такие вещи начиная со 2х Дельфей

Жаль, а С такое понимает

Цитата(neutrino @ 30.10.2002, 20:31)

Жаль, а С такое понимает

Ну там-то вообще все просто
for (int i = 0; i < 10; i+=2)
printf ("Test %d", i);

На самом деле, есть возможность использование конструкции со степом...
for I := 1 to 10 do
 begin
   asm
     Inc ebx
   end;
   WriteLn (I);
 end;

Как организован цикл в дельфи:
каждую итерацию регистр ebx увеличивается на 1
и в конце цикла происходит сравнение регистра с 10 (в данном случае)
что это может повлечь за собой:
ну самое малое - это то, что увеличивая регистр на 2 мы можем просто пролетить 10 и выдет бесконечный цикл (9+2=11)
Как избежать: можно в памяти исправить сравнение равности (jnz) на заменить на <=.
А вообще, не стоит оно таких затрат.

Неужели всегда в цикле используется регистр ?
А если я зделаю много вложеных циклов, тогда в коде появится много PUSH и POP ?

Я почему-то всегда думал, что там используется регистр CX. А про вложенные циклы: именно так это и делается. По крайней мере я, когда писал сортировку массива, использовал PUSH, POP. Но их не так уж и много - одна пара на каждый вложенный цикл.

На самом деле компилляторы сейчас стали значительно умнее и просто так push-и не втыкают. Вот пример. Это оригинальный MS-овский код (Excel).

Код

; Подпрограмма MD5Update( MD5_CTX - контекст MD5, буфер, длина буфера ) ; MD5_CTX - контекст MD5 - в ECX (его адрес) ; буфер - в EDX (его адрес) ; длина буфера - в стеке (первое слово за адресом возврата) P309AD4FC proc; Что-то делаем с 24 байтами по ECX(0062B958)  sub esp,40h; Выделить 64 байта ?  push ebx; 10h  push esi  push edi; 00640F64  mov esi,ecx; Адрес переданного по ECX буффера-0062B958  mov eax,[esp+50h]  push ebp  mov ebp,edx       ; EBP=0062BCFE - адрес следующих 2 байт этого буффера ?  mov edx,[esi]; 4 байта из переданного в ECX массива  mov ecx,edx; Положить их (00,50h,..) в ecx  lea eax,[edx+eax*8]; Длина массива * 8 + dd из массива в 24  and ecx,01F8h; 4 байта из переданного в ECX массива and 01F8h  shr ecx,3; разделить их на 8  cmp eax,edx; Сравнить: (Длина массива * 8 + dd из массива в 24 байта) и (dd из массива)  jae L309AD522; Вышли за пределы ?  inc dword ptr [esi+04]; ESI=0062B958 - адрес массива в 24 байта ? L309AD522:  mov [esi],eax; в массив 24h положить вычисленный eax  mov eax,[esp+54h]; Длина еще одного буффера, переданного нам  shr eax,1Dh      ; Оставить 31 и 30 биты ? - 00,00,..  add [esi+04],eax; Добавить к ESI=0062B958 - адрес массива в 24  mov eax,[esp+54h]; Длина еще одного буффера, переданного нам  dec dword ptr [esp+54h]; Длина еще одного буффера, переданногонам  test eax,eax; Прошли весь переданный массив ?  jz L309AD59F; Нет, нет,.. L309AD53A:  mov al,[ebp+0]; С 0062BCFE взять 31h,00h,.. (Пароль в UniCode со второго символа ?)  inc ebp  mov [ecx+esi+18h],al ; Положить его в [4 байта из переданного в ((ECX and 01F8h) shr 3 + ; + адрес переданного массива в 24 байта + следующие в нем 24 байта)  inc ecx; Прирастить разделенный на 8 первый элемент массива  cmp ecx,40h; Он вдруг стал 64 ?  jnz L309AD593; Да, да ...  xor edi,edi  lea eax,[esp+10h] L309AD54E:  lea ebx,[edi+esi]  xor ecx,ecx  xor edx,edx  add eax,04  mov cl,[ebx+1Bh]  mov dl,[ebx+19h]  shl ecx,10h  add edi,4  or ecx,edx  xor edx,edx  shl ecx,08h  mov dl,[ebx+1Ah]  shl edx,10h  or ecx,edx  xor edx,edx  mov dl,[ebx+18h]  or ecx,edx  mov [eax-04],ecx  lea ecx,[esp+50h]  cmp eax,ecx  jb L309AD54E  lea edx,[esp+10h]  lea ecx,[esi+08h]  call P309AD671; МАКРОСЫ !!!  xor ecx,ecx L309AD593:  mov eax,[esp+54h]; ->09,..  dec dword ptr [esp+54h]; Длина еще одного буффера, переданного нам  test eax,eax; Прошли весь переданный буффер ?  jnz L309AD53A; Продолжать заменять переданный буффер символами пароля L309AD59F:  pop ebp  pop edi  pop esi  pop ebx  add esp,40h  ret 4 P309AD4FC endp ; Конец подпрограммы 309AD4FC

Обратите внимание, как компиллятор оформил вложенные циклы.
Самый верхний цикл (метка L309AD53A) использует локальный счетчик в [esp+54h] - видимо, программист декрементировал переданный int:

MD5_Update(... int Count..)
{
...
do // метка L309AD53A
{
...
}
while (!--Count)
...

Внутри этого цикла есть вложенный (метка L309AD54E). На этот раз компиллятор обошелся регистрами и командой lea для движения по локальному буфферу:

lea eax,[esp+10h]
L309AD54E:
...
lea ecx,[esp+50h]
cmp eax,ecx
jb L309AD54E

Видимо, тут программист писал что-то вроде:

BYTE  LocBuffer[0x40];
BYTE b;
BYTE *p;

p= LocBuffer;
while (1)
{
b = p++;
...
 if (p == *LocBuffer + sizeof(LocBuffer)) break;
}

Код, конечно, грешит механистичностью и некоторые места кажутся вообще нелогичными. Но это только кажется - компиллятор оптимизировал код под конвеер Пентиума(P6). Лично мне удалось всего в 6 раз сделать его быстрее ;)

А такую инфу вообще можно найти, или это экзешники надо ковырять, чтобы узнать как компилятор проги компилит ? Может где то какиенить описания есть ?

Цитата

Шурик Дата сообщения: 31.10.2002,13:40 А такую инфу вообще можно найти, или это экзешники надо ковырять, чтобы узнать как компилятор проги компилит ? Может где то какиенить описания есть ?

Уже готовых коммерческих - надо. А свой проект ты можешь легко посмотреть сам !

2Chingachguk: А MD5 это разве не алгоритм шифрования?

Цитата

neutrino Дата сообщения: 31.10.2002,13:50 2Chingachguk: А MD5 это разве не алгоритм шифрования?

Нет, это хэш-функция. (Если хочешь, могу линк на мою статью про excel дать, там я писал, что это).

Обычно используется для идентификации пользователя (файл хэшей) и т.п.