BCB 操作WORD 多出个空格,该怎么处理
BCB 操作WORD 多出个空格
Str=Fmain->Fmain_name->Caption+"试验报告";
vSelect.OleProcedure("GoTo",-1,0,0,"a_1");
vSelect.OleProcedure("TypeText",Str);
ProgressBar->Position=1;
不知道为什么导出word后，总是多个空格，“测试仪试验报告 ”。在线等，急求。。。。。。。。。。
------解决方案--------------------
你的Str是什么类型,如果是AnsiString 试试
Str=Fmain->Fmain_name->Caption+"试验报告";
vSelect.OleProcedure("GoTo",-1,0,0,"a_1");
vSelect.OleProcedure("TypeText",Str);
ProgressBar->Position=1;
不知道为什么导出word后，总是多个空格，“测试仪试验报告 ”。在线等，急求。。。。。。。。。。
------解决方案--------------------
你的Str是什么类型,如果是AnsiString 试试
- C/C++ code
vSelect.OleProcedure("TypeText",Str.c_str() );