sMark_gzrq:String;变量定义 ClipBoard.Clear;
    //ShowMessage(PChar(sMark_gzrq));显示正常
   
    ClipBoard.SetTextBuf(PChar(sMark_gzrq));
    WordDoc.ActiveWindow.Selection.Paste;//sMark_gzrq值含有中文的话,粘到word文档后变为乱码以上问题有的机器会出现,有点不会,如何解决?