소켓에러는 아래와 같이 처리하였습니다. 헌데 FTP 에러는 어떻게 해야 해당 메세지를 한글로 띄울 수 있는지 알려주세요..
procedure TfmChatClr.ServerSocketClientError(Sender: TObject;
Socket: TCustomWinSocket; ErrorEvent: TErrorEvent; var ErrorCode: Integer);
var
msg : String;
begin
GIFWarning.Visible := True;
case ErrorCode of
10004: //The operation is canceled.
msg := '명령이 취소되었습니다.(10004)'; //한글 메세지 부여
.
.
.
0:
begin
Msg := 'Connect 성공';
end;
end;
Showmessage( msg ); //메세지 출력
Socket.Close;
ErrorCode := 0;
end;
답을 알려주세요..급합니다.. 꾸벅~
> 소켓에러는 아래와 같이 처리하였습니다. 헌데 FTP 에러는 어떻게 해야 해당 메세지를 한글로 띄울 수 있는지 알려주세요..
>
> procedure TfmChatClr.ServerSocketClientError(Sender: TObject;
> Socket: TCustomWinSocket; ErrorEvent: TErrorEvent; var ErrorCode: Integer);
> var
> msg : String;
> begin
> GIFWarning.Visible := True;
> case ErrorCode of
> 10004: //The operation is canceled.
> msg := '명령이 취소되었습니다.(10004)'; //한글 메세지 부여
> .
> .
> .
> 0:
> begin
> Msg := 'Connect 성공';
> end;
> end;
> Showmessage( msg ); //메세지 출력
>
> Socket.Close;
> ErrorCode := 0;
> end;
>
> 답을 알려주세요..급합니다.. 꾸벅~
--------------------
안녕하세요..
어케 답을 해야 할지는 몰겠지만.. 소켓 에러 처리하는 것처럼
똑같이 처리하면 되지 않을까여..
FTP도 소켓 프로그램(?)이니 별반 차이 엄찌 않을까여..
혹시나 해서.. FTP 컴포넌트를 사용하신다믄 어디에든 OnError
비스므리한게 있을 것이구.(엄쓰면 안 되잖아여..^^")
직접 만드셨다믄 에러처리는 하셨을테구여..
답이 아닌가여.^^"
즐푸하세요..