这是什么错误

[gqtyddd]

s1 := ExtractFileDir(ParamStr(0))+'\autorun.inf';
编译有错误
哪里写错了

[dinoalex]

char(39)

var
s: string;
begin
s:= 'asdf'+char(39)+'\autorun.int';
showmessage(s)
end;

[dinoalex]

看错了,理解错了,以为你想要'单引号,呵呵

其实你是从网页上找的代码吧, ' 并不是PASCAL代码, 而是网页里的单引号,

所以你的 s1 := ExtractFileDir(ParamStr(0))+'\autorun.inf'; 真正的代码是

s1 := ExtractFileDir(ParamStr(0))+'\autorun.inf';

[gqtyddd]

谢了