怎么把 olevariant 强制转化为一个自定义的类结构

如何把 olevariant 强制转化为一个自定义的类结构？

诚心请教一个问题：
如题，假设有一个类为cert（数字证书），而调用函数返回证书集合certs中的某个cert返回的是一个olevariant类型，如何把这个olevariant转换为cert类型呢，而vb最简单，set cert=certs（1）就可以了，Delphi下如何实现呢？如何处理olevariant呢？

谢谢！！

------解决方案--------------------
假设这个结构体定义如下，并且变量FData中保存了TCert类型的数据：

Delphi(Pascal) code

TCert = record
  EncodingType: DWORD;
  CertLen: DWORD;
  Cert: array[0..2047] of Char;
end;

var
  FData: OleVariant;

------解决方案--------------------
关于证书的访问，delphi中的CrypToGraphy单元有定义证书的访问接口...