Indy 설치(Delphi, BCB 공통)

Computer/Delphi 2006. 9. 2. 11:22
Indy 설치 및 사용에 관한 포스트로 시간이 날 때마다 업데이트 할 예정이다.

(1). Install Indy For C+ Builder
1. BCB Library & Incude Path 설정
  ㄱ. Tools->Environment Options->Library Path에 아래의 두 경로를 추가한다.
   a . Indy Source 디렉토리
   b. 컴파일된 dcu와 hpp 헤더 디렉토리

  ㄴ. Project->Options->Library Path에는 컴파일된 dcu와 hpp 헤더 경로추가한다.  
  ㄷ. Project->Options->Include Path에는 hpp 헤더 경로를 추가한다.

(2). Indy 관련된 포스트
1.BCB에 설치된 Indy가 이상하게 동작 할때...(http://kr.blog.yahoo.com/guyoun/83.html)

2.C++ Builder 6에 Indy 10 설치 하기(http://kr.blog.yahoo.com/guyoun/82.html)

'Computer > Delphi' 카테고리의 다른 글

델파이에서 Lua 사용을 위한 메모  (0) 2009.07.20
IRequest, TWebRequest 이용한 파라미터 접근  (0) 2005.07.10
TDateTime 사용하기  (0) 2005.07.10
URL에서 도메인 분리하기  (0) 2005.07.10
Visual Basic에서 만든 dll 호출하기  (0) 2005.07.10
유니코드 변환 코드  (0) 2003.12.17
DLL 호출 관련 정리(임시)  (0) 2003.12.14
테이블에 트랜잭션과 파라미터 이용해서 인서트  (0) 2003.11.16
TColor 값을 HTML color 로 변경하는 코드  (0) 2003.05.14
HTML에 문자 추가하기  (0) 2003.05.09
Posted by Gu Youn
,

IRequest, TWebRequest 이용한 파라미터 접근

Computer/Delphi 2005. 7. 10. 00:38

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 사용을 위한 메모  (0) 2009.07.20
Indy 설치(Delphi, BCB 공통)  (0) 2006.09.02
TDateTime 사용하기  (0) 2005.07.10
URL에서 도메인 분리하기  (0) 2005.07.10
Visual Basic에서 만든 dll 호출하기  (0) 2005.07.10
유니코드 변환 코드  (0) 2003.12.17
DLL 호출 관련 정리(임시)  (0) 2003.12.14
테이블에 트랜잭션과 파라미터 이용해서 인서트  (0) 2003.11.16
TColor 값을 HTML color 로 변경하는 코드  (0) 2003.05.14
HTML에 문자 추가하기  (0) 2003.05.09
Posted by Gu Youn
,

TDateTime 사용하기

Computer/Delphi 2005. 7. 10. 00:37

1. Wed,11-Dec-2002 04:31:50 GMT 형식의 시간 문자열 만들기

2. 소스
uses sysutils;

Function GetFormatedDate:String;
var
  expireDate : TDateTime;
  format : TFormatSettings;
  day : integer;
begin
format.ShortDayNames[1] := 'Sun';
format.ShortDayNames[2] := 'Mon';
format.ShortDayNames[3] := 'Tue';
format.ShortDayNames[4] := 'Wed';
format.ShortDayNames[5] := 'Thu';
format.ShortDayNames[6] := 'Fri';
format.ShortDayNames[7] := 'Sat';

format.LongMonthNames[1] := 'Jan';
format.LongMonthNames[2] := 'Feb';
format.LongMonthNames[3] := 'Mar';
format.LongMonthNames[4] := 'Apr';
format.LongMonthNames[5] := 'May';
format.LongMonthNames[6] := 'Jun';
format.LongMonthNames[7] := 'Jul';
format.LongMonthNames[8] := 'Aug';
format.LongMonthNames[9] := 'Sep';
format.LongMonthNames[10] := 'Oct';
format.LongMonthNames[11] := 'Nov';
format.LongMonthNames[12] := 'Dec';

format.TimeSeparator := ':';

expireDate := Now-10;
day := DayOfWeek(expireDate);
Result := format.ShortDayNames[day]  + FormatDateTime(', dd-mmmm-yyyy hh:mm:ss', expireDate, format) + ' GMT';
end;

'Computer > Delphi' 카테고리의 다른 글

델파이에서 Lua 사용을 위한 메모  (0) 2009.07.20
Indy 설치(Delphi, BCB 공통)  (0) 2006.09.02
IRequest, TWebRequest 이용한 파라미터 접근  (0) 2005.07.10
URL에서 도메인 분리하기  (0) 2005.07.10
Visual Basic에서 만든 dll 호출하기  (0) 2005.07.10
유니코드 변환 코드  (0) 2003.12.17
DLL 호출 관련 정리(임시)  (0) 2003.12.14
테이블에 트랜잭션과 파라미터 이용해서 인서트  (0) 2003.11.16
TColor 값을 HTML color 로 변경하는 코드  (0) 2003.05.14
HTML에 문자 추가하기  (0) 2003.05.09
Posted by Gu Youn
,

유니코드 변환 코드

Computer/Delphi 2003. 12. 17. 18:02
1. String -> WideChar[] 변환

개념 : MultiByteToWideChar API를 이용한다.

소스 :
    var
        data : String;
        someunicode : array of widechar;
        len : integer;
    begin
        data := '안녕하세요.';
        len := StrLen(PChar(data));
        MultiByteToWideChar(CP_ACP, 0, PChar(data), -1, @someunicode[0], len);
    end;


2. String <-> WIdeString
개념 : 델파이에서는 자동 형변환 되므로 신경 쓸 필요 없음

소스 :
델코 민성기 님 작성
http://www.delphikorea.com/board/zboard/view.php?id=qa&page=1&sn1=&divpage=1&sn=off&ss=on&sc=on&keyword=유니코드&select_arrange=headnum&desc=asc&no=20996

var

WStr : WideString;

SStr : String;



TempStr1, TempStr2 : String;

i : Integer;

begin

WStr := '얼러리꼴러리!';
SStr := WStr;
//이렇게 해도 결과 같음
//SStr :='얼레리꼴러리!';
//Wstr := WIdeString(SStr);


for i:= 1 to Length(WStr) do
begin
TempStr1 := TempStr1 + '$' + IntToHex(Ord(WStr[i]), 2);
if i <> Length(WStr) then TempStr1 := TempStr1 + ', ';
end;

for i:= 1 to Length(SStr) do
begin
TempStr2 := TempStr2 + '$' + IntToHex(Ord(SStr[i]), 2);
if i <> Length(SStr) then TempStr2 := TempStr2 + ', ';
end;

ShowMessage(
Format(
'유니코드 "%s", 길이 %d'#13'%s'
+#13#13+
'일반문자 "%s", 길이 %d'#13'%s',
  [WStr, Length(WStr), TempStr1, SStr, Length(SStr), TempStr2]
)
);

end;

'Computer > Delphi' 카테고리의 다른 글

Indy 설치(Delphi, BCB 공통)  (0) 2006.09.02
IRequest, TWebRequest 이용한 파라미터 접근  (0) 2005.07.10
TDateTime 사용하기  (0) 2005.07.10
URL에서 도메인 분리하기  (0) 2005.07.10
Visual Basic에서 만든 dll 호출하기  (0) 2005.07.10
DLL 호출 관련 정리(임시)  (0) 2003.12.14
테이블에 트랜잭션과 파라미터 이용해서 인서트  (0) 2003.11.16
TColor 값을 HTML color 로 변경하는 코드  (0) 2003.05.14
HTML에 문자 추가하기  (0) 2003.05.09
그래픽 카드가 RGB or BGR 지원 하는지 체크하기  (0) 2003.04.28
Posted by Gu Youn
,

티스토리툴바