소스)
IdFTP1->Host = ServerName;
IdFTP1->Port = StrToInt(Port);
IdFTP1->Username = User;
IdFTP1->Password = Pass;
IdFTP1->IOHandler->DefStringEncoding =  TEncoding::GetEncoding(949);//한글파일 전송오류 해결

IdFTP1->Connect();
if (IdFTP1->Connected())
{
    IdFTP1->ChangeDir( "/bookmark" );
    ShowMessage("FTP 접속성공!!");
}
else
{
    ShowMessage("FTP 접속실패!!");
}

컴파일은 이상없이 진행됩니다. 하지만 실행하면 오류가 발생합니다.
위 소스에서 한글파일 전송오류 해결 라인이 오류 발생합니다.
오류 내역은 이미지 첨부했습니다.

많은 분들의 조언 부탁드립니다.
감사합니다.