отправка электронного письма на E-mail

[TaYgA]

Всем доброго времени суток. Столкнулся с задачей. Нужно чтоб при нажатии на кнопку на мой E-mail отправлялось письмо с сообщением введённом в Memo. В интернете нашёл код, но реалезовать его не получилось Вот код, разъясните пожалуйсто:

SmtpClient client = new SmtpClient("smtp.mail.com", 2525);
                client.Credentials = new NetworkCredential("login", "пароль"); \\ Логин и пароль вводится своей почты?
                client.EnableSsl = true;
//Оформление сообщения
                MailMessage mes = new MailMessage();
                mes.From = new MailAddress(login@gmail.com);
                mes.To.Add(new MailAddress(login@mail.ru));
                mes.Subject = "Тема";
                mes.Body = "Сообщение";
                client.Send(mes);

Компелятор ругается на SmtpClient ([Error] CodeMail.pas(35): Undeclared identifier: 'SmtpClient'). Как её объявить?

[fbus]

этот код если мне не изменяет память работает только на семерке (delphi7)

[TaYgA]

Такой у меня и стоит, а почему тогда он может не работать?!

[TaYgA]

Подскажите пожалуйсто в чём ошибка?!?!

  IdSMTP.Host:='smtp.mail.ru';
  IdSMTP.Port:=25;
  IdSMTP.Username:='tay_ga';
  IdSMTP.Password:='pass';
  IdMessage.Body.Text:=mMessage.Text;
  IdMessage.From.Text:=edGrantee.Text;
  IdMessage.Recipients.EMailAddresses:='tay_ga@mail.ru';
  IdMessage.Subject:=edSubject.Text;
  IdSMTP.Connect();
  if IdSMTP.Connected=true then
    IdSMTP.Send(IdMessage);
  IdSMTP.Disconnect

Всё делал по видеоурок, разница лишь в том, что отправляю письмо на mail. (http://delphiexpert.ru/view_lesson.php?id=46). Программа запускается, но при нажатии "отправить " выкидывает ошибку и указывает на строку

IdSMTP.Disconnect

В точке с запитой проблемы нет, по уроку пишется без неё, да и с ней тоже не работает (проверял).