delphi record中的case

weixin_34362991

于 2018-07-02 10:20:00 发布

阅读量720

点赞数

原文链接：https://my.oschina.net/u/1777508/blog/1838625

版权

为什么80%的码农都做不了架构师？>>>

其实就是代表分了几种情况，都可以表示，也相当于c里面的union

  _SYSTEM_INFO = record
    case Integer of
      0: (
        dwOemId: DWORD);
      1: (
        wProcessorArchitecture: Word;
        wReserved: Word;
        dwPageSize: DWORD;
        lpMinimumApplicationAddress: Pointer;
        lpMaximumApplicationAddress: Pointer;
        dwActiveProcessorMask: DWORD_PTR;
        dwNumberOfProcessors: DWORD;
        dwProcessorType: DWORD;
        dwAllocationGranularity: DWORD;
        wProcessorLevel: Word;
        wProcessorRevision: Word);
  end;

转载于:https://my.oschina.net/u/1777508/blog/1838625