Delphi/꿀팁
우체국 API로 주소 검색하기
procedure SearchAddress(AAddress: string); function UrlEncode(ASrc: string): string; var I: Integer; sTemp: AnsiString; begin Result := ''; sTemp := AnsiString(ASrc); for I := 1 to Length(sTemp) do begin if not (sTemp[I] in ['A'..'Z', 'a'..'z', '0'..'9']) then begin if sTemp[I] = ' ' then Result := Result + '+' //공백은 %20 대신 +로 변환 else Result := Result + '%' + IntToHex(Ord(sTemp[I]), 2); end else..