웹브로커에서 자자 스크립트를 사용 할때 아래와 같은 방법으로 하면 됩니다.
procedure TWebModule1.WebModule1DefaultHandlerAction(Sender: TObject;
Request: TWebRequest; Response: TWebResponse; var Handled: Boolean);
var iStr: string;
begin
// Response.Content := HTPpEncode( '<input type="button" onClick="alert(''Hello World'')" Value="Hello World"/>');
iStr:= '<input type="button" onClick="alert('+ QuotedStr('Hello World')+')" Value="Hello World"/>';
response.content := HTMLEncode( iStr ) + '<br>' + iStr;
end;
HtmlEncode 는 HTML 형식을 문장으로 그래도 보여 줍니다.
ftp://po.istu.ru/public/docs/other/_New/Books/Lang/Delphi/Delphi%20Developer's%20Guide/Ebooks/d6dg/chapter23.pdf
procedure TWebModule1.WebModule1DefaultHandlerAction(Sender: TObject;
Request: TWebRequest; Response: TWebResponse; var Handled: Boolean);
var iStr: string;
begin
// Response.Content := HTPpEncode( '<input type="button" onClick="alert(''Hello World'')" Value="Hello World"/>');
iStr:= '<input type="button" onClick="alert('+ QuotedStr('Hello World')+')" Value="Hello World"/>';
response.content := HTMLEncode( iStr ) + '<br>' + iStr;
end;
HtmlEncode 는 HTML 형식을 문장으로 그래도 보여 줍니다.
ftp://po.istu.ru/public/docs/other/_New/Books/Lang/Delphi/Delphi%20Developer's%20Guide/Ebooks/d6dg/chapter23.pdf
댓글 없음:
댓글 쓰기