1. Request처리
IRequest는 QueryString와 Form으로 처리.
TWebRequest는 QueryFields와 ContentFields로 처리.
2. 소스
TRequestType = (ireq,webreq);
var
FIRequest : IRequest;
FWebRequest : TWebRequest;
FRequestType : TRequestType;
Function GetParameter(paramName : String): String;
begin
if FRequestType = ireq then
begin
Result := String(FIRequest.QueryString.Item[paramName]);
if Result = '' then
Result := String(FIRequest.Form.Item[paramName]);
end
else if FRequestType = webreq then
begin
Result := FWebRequest.QueryFields.Values[paramName];
if Result = '' then
Result := FWebRequest.ContentFields.Values[paramName];
end;
end;
'Computer > Delphi' 카테고리의 다른 글
| 델파이에서 Lua 사용을 위한 메모 (6) | 2009.07.20 |
|---|---|
| Indy 설치(Delphi, BCB 공통) (15) | 2006.09.02 |
| TDateTime 사용하기 (4) | 2005.07.10 |
| URL에서 도메인 분리하기 (6) | 2005.07.10 |
| Visual Basic에서 만든 dll 호출하기 (14) | 2005.07.10 |
| 유니코드 변환 코드 (5) | 2003.12.17 |
| DLL 호출 관련 정리(임시) (16) | 2003.12.14 |
| 테이블에 트랜잭션과 파라미터 이용해서 인서트 (2) | 2003.11.16 |
| TColor 값을 HTML color 로 변경하는 코드 (2) | 2003.05.14 |
| HTML에 문자 추가하기 (154) | 2003.05.09 |
