Smile 笑容

如何(怎样、怎么)把TRect类型转换成 OleVariant 类型的答案

邱家楗(QQ:165498014)提供答案:

var
  R: TRect;
  V: OleVariant;
begin
  R.Left := 1;
  R.Top := 2;
  R.Right := 3;

V := ^R;

环境: Win32, Borland Delphi