如何使用Delphi 2007检查盒子是否支持AVX.
我的问题仅限于查询cpu中的支持(假设操作系统正常/带有SP1的Windows 7).
PDF文件名为Introduction to Intel® Advanced Vector Extensions
作者Chris Lomont解释了如何做到这一点,并提供了一个示例代码实现,但在c.
它也可以在page获得.
解决方法
这是
Intel blog上给出的汇编代码的翻译：
function isAvxSupported: Boolean;
asm
{$IFDEF cpuX86}
push ebx
{$ENDIF}
{$IFDEF cpuX64}
mov r10,rbx
{$ENDIF}
xor eax,eax
cpuid
cmp eax,1
jb @not_supported
mov eax,1
cpuid
and ecx,018000000h
cmp ecx,018000000h
jne @not_supported
xor ecx,ecx
db 0Fh,01h,0D0h //XGETBV
and eax,110b
cmp eax,110b
jne @not_supported
mov eax,1
jmp @done
@not_supported:
xor eax,eax
@done:
{$IFDEF cpuX86}
pop ebx
{$ENDIF}
{$IFDEF cpuX64}
mov rbx,r10
{$ENDIF}
end;
此代码适用于32位和64位版本的Delphi.