при попытке отправке писем пишет ошибку Данная операция не может быть выполнена, не установлено соединение IMAP.    

Сыпется на строке
Попытка        
            Почта.Послать(Письмо);    
        Исключение        
            ТекстОшибки    = "Ошибка при отправке письма :"+ОписаниеОшибки();
            ЗаписьЖурналаРегистрации(ТекстОшибки, УровеньЖурналаРегистрации.Ошибка);
            Возврат;
При попытке проверить в почтовом ящике нажать проверить подключение, проверка работает, что может быть за проблема, порты закрыты или как? соединение почты не защищенное

Может, и порты. Может, сервер имап не умеет.
Всё, что угодно, может.

(1) у меня вообще в настройках КА1.1 прописанны настройки smpt    и pop имап не прописывал, вот чего то не совсем пойму почему имап выдает, это как то зависит от настройки самого почтового ящика?

"это как то зависит от настройки самого почтового ящика?"

Это как-то (тм) зависит от того, что у тебя в коде раньше понаписано

(3) У меня настройки берутся с стандартного справочника УчетныеЗаписиЭлектроннойПочты, там в настройках есть поп и смпт, вот не пойму причем здесь имап