답변 감사합니다. 그런데 아래코드를 uses 아래 붙여 넣으면 되는건가요?
붙여넣었더니.. 무수한 에러가 더;....
워낙 초보인지라.. 자세한 답변 부탁드리겠습니다.
civilian 님이 쓰신 글 :
: function URLEncode(const S: string; const InQueryString: Boolean): string;
: var
: Idx: Integer; // loops thru characters in string
: begin
: Result := '';
: for Idx := 1 to Length(S) do
: begin
: case S[Idx] of
: 'A'..'Z', 'a'..'z', '0'..'9', '-', '_', '.':
: Result := Result + S[Idx];
: ' ':
: if InQueryString then
: Result := Result + '+'
: else
: Result := Result + '%20';
: else
: Result := Result + '%' + SysUtils.IntToHex(Ord(S[Idx]), 2);
: end;
: end;
: end;
:
:
:
: NIIC 님이 쓰신 글 :
: : 소스중
: : Data.WriteString(URLEncode('data=' + Trim(Edit1.Text)));
: : ShowMessage(PCHar(Out.DataString));
: : 쪽에서
: : 아래의 메세지가 뜨는데요
: :
: : [Error] Unit1.pas(47): Undeclared identifier: 'URLEncode'
: : [Error] Unit1.pas(55): Undeclared identifier: 'DataString'
: :
: : USES절은 아래와 같고 델파이 5.0입니다.
: :
: : uses
: : Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
: : StdCtrls, IdBaseComponent, IdComponent, IdTCPConnection, IdTCPClient,
: : IdHTTP, idGlobal;
: :
: : 머리아프지만 델파이가 ㅋ
|