with IdFTP1 do
  begin
    Username := me_user_id2.Text;
    host := me_Host2.Text;
    password := me_password2.text;
    if upperCase(cb_passive.TExt) = 'TRUE' then
      passive := true
    else if upperCase(cb_passive.TExt) = 'FALSE' then
      passive := false;
    RecvBufferSize := StrtoIntDef(me_receivebuffer2.Text, 32768);
    SendBufferSize := StrtoIntDef(me_receivebuffer2.Text, 32768);
    if UpperCase(cb_transfertype2.Text) = 'FTBINARY' then
      transferType := ftBinary
    else if UpperCase(cb_transfertype2.Text) = 'FTASCII' then
      transferType := ftASCII;
  end;

이렇게 passive 모드를 셋팅한후

    IdFTP1.Connected;
    for iLoop := 0 to FileListBox1.Count-1 do
    begin
      IdFTP1.Put(FileListBox1.Directory+'/'+FileListBox1.Items[iLoop], FileListBox1.Items[iLoop], true);
    end;
    IdFTP1.Disconnect;
파일일 put 하려고하는데 Not Connected 라는 에러 메시지가 나옵니다. 알ftp로 passive 모드를 true 로 하면 잘 붙거든요 델파이엣 passive 모드인경우 방식이 다른건지요?
고수님들 부탁드립니다.