如何在Delphi中从Interface类型数据初始化一个TGUID的const数组

发布时间：2020-12-15 04:19:19 所属栏目：大数据来源：网络整理

导读：我想初始化一个像这样的数组 – Const MyArray : Array[0..0] Of TGUID = (IInterface); 但它导致 – [DCC Error] Test.pas(10): E2010 Incompatible types: 'TGUID' and 'string' 那么为了看看会发生什么我试过这个 – Const MyArray : Array[0..0] Of Stri

我想初始化一个像这样的数组 –

Const MyArray : Array[0..0] Of TGUID = (IInterface);

但它导致 –

[DCC Error] Test.pas(10): E2010 Incompatible types: 'TGUID' and 'string'

那么为了看看会发生什么我试过这个 –

Const MyArray : Array[0..0] Of String = (IInterface);

结果就是这个！

[DCC Error] Test.pas(10): E2010 Incompatible types: 'string' and 'TGUID'

多么奇怪！当然,IInterface是一个或另一个,但似乎顽固地转变为错误的类型.

解决方法

您可以从接口声明中提取GUID并将它们声明为(字符串)常量.然后,您可以在接口声明和数组常量声明中使用这些常量.编译器接受有效的GUID字符串,其中包含TGUID.无效的字符串导致E2204“不正确的GUID语法”编译错误.

const
  MyGuid1 = '{99BDAB12-B1B6-41B0-9BF1-2C1DB3D8EC70}';
  MyGuid2 = '{8C7CD303-8D81-469B-99ED-E1F163E9036F}';

type
  IMyInterface1 = interface
    [MyGuid1]
  end;

  IMyInterface2 = interface
    [MyGuid2]
  end;

const
  MyArray: array[0..1] of TGUID = (MyGuid1,MyGuid2);

（编辑：李大同）

【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容!