[Helybr]

я являюсь начинающим юзером Дельфей, сейчас меня интересует программа по проверки почты. для этого мне нужен компонент содержащий протокол POP3 ,который как описывается находится на палитре компонентов во вкладке FastNet...у меня 7 версия Дельфей и я никак не могу найти эту вкладку. возможно что в этой версии дельфей нету такого компонента??? если да то скажите что делать для того что бы он появился :-) скачивать я могу только через Torrent

[lmikle]

смотри вкладку Indy [Clients]. Компонент TIdPOP3.

[hkdkest]

Компоненты для работы с почтой

[Helybr]

все, большое спасибо!

[Helybr]

Немогу понять что происходит вот код

Код:

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19

IdSMTP1.AuthenticationType:=atLogin; {IdSMTP1.AuthenticationType:=atNone;   } IdSMTP1.Username:=edit1.Text+combobox1.Text ; IdSMTP1.Password:=edit2.Text;   Msg.Subject:=edit1.Text+combobox1.Text ; //текст темы сообщения Msg.Recipients.EMailAddresses:='Helybr@bk.ru'; //указываем адрес получателя   {вот здесь программа стопарится и выдает ошибку в виде диалогового окна Project Project1.exe raised exception class EAccessViolation with message 'Access violation at address 44004e00. Read of address 44004E00' } Msg.From.Address:=edit1.Text+combobox1.Text; ; //указываем автора письма Msg.Body.Text:=edit2.Text; //размещаем текст сообщения Msg.Date:=StrToDate('01.12.2009');//дата отправки письма может быть любой   IDSmtp1.Connect; if IDSMTP1.Connected=true then IdSMTP1.Send(Msg);

lmikle: Тегами будем пользоваться?

подскажите что я делаю ну я имею в виду операторы правильно расположил или нет ? и если да то из за чего вылетает ошибка

[lmikle]

А объект Msg кто создавать будет?

[Helybr]

Код:

1 2 3

procedure TForm1.Button2Click(Sender: TObject); Var   msg:TidMessage;

lmikle: Ну что, на месяц в read only или все-таки начнем пользоваться тегами?
имелось в виду этот текст программы???



в другом фрейме под кодом программы еще вот что
[Warning] Unit1.pas(58): Variable 'msg' might not have been initialized

[lmikle]

Ну тебе компилятор иговорит, что переменная Msg может быть не инициализированна. Перед использованием переменной надо примерно так:

Код:

1 2 3 4 5 6 7 8 9 10 11 12

procedure TForm1.... var   Msg : TIdMessage; begin   Try      Msg := TIdMessage.Create;        // Здесь работает с переменной Msg   Finally     Msg.Free;   End; end;

[Helybr]

спасибо большое! сейчас буду делать дальше :-)

[Helybr]

ну и еще наверное 1 вопрос, последний по этой теме
когда вводишь неправильный пасс или логин, выдается системная ошибка, делаю исключения {try ; exepc} там надо короче ошибку записать, когда компилируем пошагово выходит ошибка EIdProtocolReplyError , но когда для этой ошибки делаем обработчик, Дельфи нам говорит типа неизвестный идентификатор

[lmikle]

обрабатывай как обобщенный эксепшн, а в лог пиши его Message.
ну или посмотри где описан этот класс и укажи его в uses - это известная беда Инди - он не всегда нужные модули автоматом добавляет.