Delphi vs Asm

Тема в разделе "Delphi - FAQ", создана пользователем Sergey(RD), 16 июн 2004.

Статус темы:
Закрыта.
  1. Sergey(RD)

    Sergey(RD) Гость

    Не могу найти доки по синтаксису.
    Необходимо некоторые процедуры написать в асме.
    Проблемы с синтаксисом
     
  2. Barmutik

    Barmutik Гость

    Открой любой системный юнит .. там половина функций на Асме .. вот пирмер одной из них...

    unction CompareStr(const S1, S2: string): Integer; assembler;
    asm
    PUSH ESI
    PUSH EDI
    MOV ESI,EAX
    MOV EDI,EDX
    OR EAX,EAX
    JE @@1
    MOV EAX,[EAX-4]
    @@1: OR EDX,EDX
    JE @@2
    MOV EDX,[EDX-4]
    @@2: MOV ECX,EAX
    CMP ECX,EDX
    JBE @@3
    MOV ECX,EDX
    @@3: CMP ECX,ECX
    REPE CMPSB
    JE @@4
    MOVZX EAX,BYTE PTR [ESI-1]
    MOVZX EDX,BYTE PTR [EDI-1]
    @@4: SUB EAX,EDX
    POP EDI
    POP ESI
    end;
     
  3. Deka

    Deka Гость

    А что конкретно надо-то?
     
  4. Silentroot

    Silentroot Гость

  5. RAIN

    RAIN Гость

    Silentroot
    В смысле такую форму? Чтобы зарегить почту, или я что-то не понял? :unsure:
     
Загрузка...
Статус темы:
Закрыта.

Поделиться этой страницей