关于OleVariant内存管理问题？

var
  OleMsg: OleVariant;
begin
  inherited;  OleMsg := VarArrayCreate([0, 0], varVariant);
  OleMsg[0] := '执行成功';
  SendMessage(Application.MainForm.Handle, WM_NDMONEY_SHOW_HELP, 0, Integer(@OleMsg));
end;上面这段代码目的是将字符串发送给主窗口，会有问题吗？如果没有问题，那么也可以用其他简单的方法吗？
如果改为PostMessage会有问题吗？