--------------------

    IdHp1: TIdHTTP;
    IdSs1: TIdSSLIOHandlerSocketOpenSSL;
컴포넌트 놓으세요
IdSs1 는 SSL 인경우 지정

델파이7은 익스플로러라 인코딩 해주시면됩니다.

      MsNPost := UTF8Encode(TkApi + 'KEY=' + TkKey + '&NO=89999&YYYY=' + MsYear +                              '&TYPE=' + MsTy);
      MemoRtn.Lines.Text := UTF8Decode(IdHp1.Post(MsNPost, Memo.Lines));

이런식 하시면 됩니다.

json, xml 은 그냥 변수에 넣을 약속된 형태 일뿐이고 나머지 방식은 동일합니다.

TStringStream.Create('');

Param := '{"idno":"' + s_Id + '"}';

SsParam.WriteString(UTF8Encode(Param));

   IdHTTP1.Request.CustomHeaders.Values['Title'] := title;

IdHTTP1.Post(Url, SsParam, SsRetrn);

Ss_Retrn 리턴값입니다.

 

 

 

 

 

>> 1. 개발/실행 플랫폼

>> (1) OS :windows10

>> (2) 개발툴 :d7

>> (3) 사용 Database :

>> 2. 개발 중인 프로그램

>> 3. 질문 내용

 

• delphi로 http/1.1을 사용해서 개발을 해본적이 없어서 개념잡기가 어렵네요

• post방식이고

•  header와body조합의 json형 데이타로 된 예시를 도움 부탁드립니다.