送分了，大家快来拿。

Question

请教一下
ES_SetOutputFile(m_hEncoder,pansichar('E:\test.wmv');可以正常运行。
但
str:='E:\test.wmv';
ES_SetOutputFile(m_hEncoder,pansichar(str);
就不对了呢。

Answer 1

ES_SetOutputFile 函数原型/声明是怎样？

Answer 2

FUNCIMPORT int __stdcall ES_SetOutputFile(HANDLE hEncoder, char* szFileName);

Answer 3

ES_SetOutputFile(m_hEncoder,pansichar(str);比较ES_SetOutputFile(m_hEncoder,pansichar(str));

Answer 4

然后改成delphi
function ES_SetOutputFile(hEncoder:THandle;szFileName:Pchar):integer;

Answer 5

然后改成delphi
function ES_SetOutputFile(hEncoder:THandle;szFileName:Pansichar):integer

Answer 6

ES_SetOutputFile(m_hEncoder,pchar(str); 这样试试，强制转换
另外，具体出错提示是什么啊？

Answer 7

按理是没问题,要不试试 str: ansistring;

Answer 8

关键是楼主用的哪个版本的Delphi，如果是2009、2010以后的版本，String默认是UnicodeString

Answer 9

楼主使用的是哪个版本的Delphi。

Answer 10

估计是delphi2010的字符串类型兼容问题。试试str: ansistring;吧。

Answer 11

str:='E:\test.wmv';
ES_SetOutputFile(m_hEncoder,pchar(str));

Answer 12

str:='E:\test.wmv';
ES_SetOutputFile(m_hEncoder,pchar(str));
function ES_SetOutputFile(hEncoder:THandle;szFileName:Pchar):integer;stdcall;

Answer 13

Delphi版本常识。其实，将string转换成PChar类型进行读写之后需要进行类型转换的。
例子：
procedure SampleProcedure;
var
  AStr: string;
begin
  SetLength(AStr, 100);
  CallAPI(XX, PChar(AStr), Length(AStr));
  AStr := PChar(AStr);
  ....
end;
这个在Macro的pascal精要中强调过的。

Answer 14

str:='E:\test.wmv';
ES_SetOutputFile(m_hEncoder,pchar(str));
感觉这个是对的