Delphi中比较GUID是否相等
2008-06-08 05:53
169 查看
1、CompareMem(@guid1, @guid2, SizeOf(TGUID))
最开始时想到的方法。
查看Delphi中TGUID的定义可以看到TGUID实际上是一个结构。对于结构的比较来说最方便的就是内存直接比较了。
TGUID = packed record
D1: LongWord;
D2: Word;
D3: Word;
D4: array[0..7] of Byte;
end;
2、SysUtils.IsEqualGUID(const guid1, guid2: TGUID)
经人提醒后发现在SysUtils单元已经有了一个这样专门比较GUID是否相等的函数。查看SysUtils的源码可以看到,在Windows下直接调用ole32.dll的函数IsEqualGUID,在Linux下将GUID转换成整型数组然后比较数组中的每个元素。效果和上面的CompareMem一样。
{$IFDEF MSWINDOWS}
function IsEqualGUID; external 'ole32.dll' name 'IsEqualGUID';
{$ENDIF MSWINDOWS}
{$IFDEF LINUX}
function IsEqualGUID(const guid1, guid2: TGUID): Boolean;
var
a, b: PIntegerArray;
begin
a := PIntegerArray(@guid1);
b := PIntegerArray(@guid2);
Result := (a^[0] = b^[0]) and (a^[1] = b^[1]) and (a^[2] = b^[2]) and (a^[3] = b^[3]);
end;
{$ENDIF LINUX}
当然,我们可以一次比较TGUID中的字段D1、D2、D3、D4,但这种方法显然就没有转成数组后比较那么简洁了。
上面提到的两种方法都可以用,并且在效率上也差不多。不过出于通用性的考虑,建议用Delphi封装的函数SysUtils.IsEqualGUID更好。
1、CompareMem(@guid1, @guid2, SizeOf(TGUID))
最开始时想到的方法。
查看Delphi中TGUID的定义可以看到TGUID实际上是一个结构。对于结构的比较来说最方便的就是内存直接比较了。
TGUID = packed record
D1: LongWord;
D2: Word;
D3: Word;
D4: array[0..7] of Byte;
end;
2、SysUtils.IsEqualGUID(const guid1, guid2: TGUID)
经人提醒后发现在SysUtils单元已经有了一个这样专门比较GUID是否相等的函数。查看SysUtils的源码可以看到,在Windows下直接调用ole32.dll的函数IsEqualGUID,在Linux下将GUID转换成整型数组然后比较数组中的每个元素。效果和上面的CompareMem一样。
{$IFDEF MSWINDOWS}
function IsEqualGUID; external 'ole32.dll' name 'IsEqualGUID';
{$ENDIF MSWINDOWS}
{$IFDEF LINUX}
function IsEqualGUID(const guid1, guid2: TGUID): Boolean;
var
a, b: PIntegerArray;
begin
a := PIntegerArray(@guid1);
b := PIntegerArray(@guid2);
Result := (a^[0] = b^[0]) and (a^[1] = b^[1]) and (a^[2] = b^[2]) and (a^[3] = b^[3]);
end;
{$ENDIF LINUX}
当然,我们可以一次比较TGUID中的字段D1、D2、D3、D4,但这种方法显然就没有转成数组后比较那么简洁了。
上面提到的两种方法都可以用,并且在效率上也差不多。不过出于通用性的考虑,建议用Delphi封装的函数SysUtils.IsEqualGUID更好。
最开始时想到的方法。
查看Delphi中TGUID的定义可以看到TGUID实际上是一个结构。对于结构的比较来说最方便的就是内存直接比较了。
TGUID = packed record
D1: LongWord;
D2: Word;
D3: Word;
D4: array[0..7] of Byte;
end;
2、SysUtils.IsEqualGUID(const guid1, guid2: TGUID)
经人提醒后发现在SysUtils单元已经有了一个这样专门比较GUID是否相等的函数。查看SysUtils的源码可以看到,在Windows下直接调用ole32.dll的函数IsEqualGUID,在Linux下将GUID转换成整型数组然后比较数组中的每个元素。效果和上面的CompareMem一样。
{$IFDEF MSWINDOWS}
function IsEqualGUID; external 'ole32.dll' name 'IsEqualGUID';
{$ENDIF MSWINDOWS}
{$IFDEF LINUX}
function IsEqualGUID(const guid1, guid2: TGUID): Boolean;
var
a, b: PIntegerArray;
begin
a := PIntegerArray(@guid1);
b := PIntegerArray(@guid2);
Result := (a^[0] = b^[0]) and (a^[1] = b^[1]) and (a^[2] = b^[2]) and (a^[3] = b^[3]);
end;
{$ENDIF LINUX}
当然,我们可以一次比较TGUID中的字段D1、D2、D3、D4,但这种方法显然就没有转成数组后比较那么简洁了。
上面提到的两种方法都可以用,并且在效率上也差不多。不过出于通用性的考虑,建议用Delphi封装的函数SysUtils.IsEqualGUID更好。
1、CompareMem(@guid1, @guid2, SizeOf(TGUID))
最开始时想到的方法。
查看Delphi中TGUID的定义可以看到TGUID实际上是一个结构。对于结构的比较来说最方便的就是内存直接比较了。
TGUID = packed record
D1: LongWord;
D2: Word;
D3: Word;
D4: array[0..7] of Byte;
end;
2、SysUtils.IsEqualGUID(const guid1, guid2: TGUID)
经人提醒后发现在SysUtils单元已经有了一个这样专门比较GUID是否相等的函数。查看SysUtils的源码可以看到,在Windows下直接调用ole32.dll的函数IsEqualGUID,在Linux下将GUID转换成整型数组然后比较数组中的每个元素。效果和上面的CompareMem一样。
{$IFDEF MSWINDOWS}
function IsEqualGUID; external 'ole32.dll' name 'IsEqualGUID';
{$ENDIF MSWINDOWS}
{$IFDEF LINUX}
function IsEqualGUID(const guid1, guid2: TGUID): Boolean;
var
a, b: PIntegerArray;
begin
a := PIntegerArray(@guid1);
b := PIntegerArray(@guid2);
Result := (a^[0] = b^[0]) and (a^[1] = b^[1]) and (a^[2] = b^[2]) and (a^[3] = b^[3]);
end;
{$ENDIF LINUX}
当然,我们可以一次比较TGUID中的字段D1、D2、D3、D4,但这种方法显然就没有转成数组后比较那么简洁了。
上面提到的两种方法都可以用,并且在效率上也差不多。不过出于通用性的考虑,建议用Delphi封装的函数SysUtils.IsEqualGUID更好。
相关文章推荐
- Delphi中比较GUID是否相等
- Delphi中比较GUID是否相等
- Delphi中比较GUID是否相等
- Delphi中比较GUID是否相等
- Delphi中比较GUID是否相等
- Delphi中比较GUID是否相等
- Delphi中比较GUID是否相等
- delphi 如何比较两个二维数组是否相等
- 比较GUID是否相等
- 编程比较两棵二叉树是否相等
- Javascript比较两个数组是否相等(存在重复元素)
- [汇编] 比较2个字符串是否相等
- c# 比较两个string数组(string[])每一个值是否相等
- c\c++中比较两个字符串或string对象是否相等
- 两个float数的比较大小以及浮点数是否和0相等
- 假设字符串类似这样的aba和aab,abc和bca就相等,现在随便给你二组字符串,请编程比较他们看是否相等
- 比较两个字符串是否相等
- 另一种思路比较2个日期是否相等的方式
- C#中??和?分别是什么意思? 在ASP.NET开发中一些单词的标准缩写 C#SESSION丢失问题的解决办法 在C#中INTERFACE与ABSTRACT CLASS的区别 SQL命令语句小技巧 JQUERY判断CHECKBOX是否选中三种方法 JS中!=、==、!==、===的用法和区别 在对象比较中,对象相等和对象一致分别指的是什么?
- 比较两个对象是否相等