用Delphi写CGI程序,怎样返回图象?(100分)

  • 主题发起人 主题发起人 rsw
  • 开始时间 开始时间
R

rsw

Unregistered / Unconfirmed
GUEST, unregistred user!
htmldoc:=<img src="c:/bar.gif">';
Response.Content := HtmlDoc;
为什么不行?
 
S := TMemoryStream.Create;
S.LoadFromFile('test.jpg');
S.Position := 0;
Response.ContentType := 'image/jpeg';
Response.ContentStream := S;
Response.SendResponse;
 
我用cytown的方法可以输出图象了,但是不能输出文本了,该怎么做呢?
 
Response.ContentType := 'image/jpeg';
//输出JPEG图象;
Response.ContentType := 'image/gif';
//输出gif图象;
Response.ContentType := 'html/text';
//输出文本;
 
接受答案了.
 

Similar threads

D
回复
0
查看
2K
DelphiTeacher的专栏
D
D
回复
0
查看
1K
DelphiTeacher的专栏
D
D
回复
0
查看
2K
DelphiTeacher的专栏
D
D
回复
0
查看
829
DelphiTeacher的专栏
D
后退
顶部