我正在使用ISAPI 返回一个图片，但调试不过不了，哪位帮忙看看，错误在哪里？3x

Question

我正在使用ISAPI 返回一个图片，但调试不过不了，哪位帮忙看看，错误在哪里？3x
var
jpg:TJpegImage;
S:TMemoryStream;
begin
jpg:=TJpegImage.Create;
try
jpg.LoadFromFile(ExtractFilePath(Application.EXEName)+'countimg\1.jpg');
S:=TMemoryStream.Create;
try
jpg.SaveToStream(S);
S.Position:= 0;
Response.ContentType :='image/jpeg';
Response.ContentStream :=S;
Response.SendResponse;
finally
S.Free;
end;
finally
jpg.Free;
end;

Answer 1

两点：
1 ExtractFilePath(Application.EXEName) 你是取不出东西来的
2 s不需要free,在response.sendresponse的时候s就被free掉了。