if ResponseEntityHeader.ContentType = '' then ResponseEntityHeader.ContentType := 'text/html';
if ResponseEntityHeader.EntityBody = '' then ResponseEntityHeader.EntityBody :=
'<HTML>'+
'<TITLE>'+s+'</TITLE>'+
'<BODY><H1>'+ErrorMsg+'</H1></BODY>'+
'</HTML>';
ResponseEntityHeader.EntityLength := Length(ResponseEntityHeader.EntityBody);
Ответов: 99
Рейтинг: 4
|
|||
andrestudio, просмотрев srvmain.pas на строчках 1608-1614, я увидел вот это:
|
|||
карма: 0 |
|