如何判断两个变量的类型是否相同

2025-02-27 18:21:41
推荐回答(1个)
回答1:

function isEqual(var data1,data2;nSize:Cardinal):boolean;
asm
mov esi,data1
mov edi,data2
mov ecx,nSize
rep cmpsb
je @Equal;
mov al,0
ret
@Equal:
mov al,1
ret
end;
使用方法:
var record1,record2:TMYRecord;
begin
.......
if isEqual(record1,record2,sizeof(TMyRecord)) then
ShowMessage('record1==Record2!')
else
ShowMessage('record1!=Record2!')
end;
时间。使用格式:NOW参数说明:该函数不需要参数。 应用举