Delphi World - это проект, являющийся сборником статей и малодокументированных возможностей  по программированию в среде Delphi. Здесь вы найдёте работы по следующим категориям: delphi, delfi, borland, bds, дельфи, делфи, дэльфи, дэлфи, programming, example, программирование, исходные коды, code, исходники, source, sources, сорцы, сорсы, soft, programs, программы, and, how, delphiworld, базы данных, графика, игры, интернет, сети, компоненты, классы, мультимедиа, ос, железо, программа, интерфейс, рабочий стол, синтаксис, технологии, файловая система...
Поддерживает ли процессор технологию 3DNow


Разработали новый процессор на женской логике, обрабатывающий четыре логических значения: "Ни да, ни нет", "И да, и нет", "Три раза нет!" и "Нет, и не проси!!!"


// так как будем использовать 32-битный регистр
{$ifndef ver80}
function 3DNowSupport: Boolean; assembler;
asm
  push ebx
  mov @Result, True
  mov eax, $80000000
  dw $A20F
  cmp eax, $80000000
  jbe @NOEXTENDED // 3DNow не поддерживается
  mov eax, $80000001
  dw $A20F
  test edx, $80000000
  jnz @EXIT // 3DNow поддерживается
  @NOEXTENDED:
  mov @Result, False
  @EXIT:
  pop ebx
end;
{$endif}

Проект Delphi World © Выпуск 2002 - 2004
Автор проекта: ___Nikolay