Ошибка [Error] Unit1.pas(40): Undeclared identifier: Connected

← →
asd © (2006-05-09 20:05) [0]

Вот алгоритм отправки письма на мыло:
procedure TForm1.Button1Click(Sender: TObject);
begin
IdMessage1.Subject := "tema";
IdMessage1.Recipients.EMailAddresses := "adres@list.ru";
IdMessage1.From.Name := "myself";
IdMessage1.Body.Text := "test";
IdSMTP1.AuthenticationType := atLogin;
IdSMTP1.Host := "smtp.list.ru";
IdSMTP1.UserId := "adres@list.ru";
IdSMTP1.Password := "пароль на свой ящик";
IdSMTP1.Connect;
If IdSMTP.Connected
then
begin
IdSMTP.Send(IdMessage1);
IdSMTP.Disconnect
end
end;
Пишет мне ошибку [Error] Unit1.pas(40): Undeclared identifier: "Connected"

← →
KilkennyCat © (2006-05-09 20:11) [1]

> If IdSMTP1.Connected
> then

← →
asd © (2006-05-09 20:22) [2]

Это я понял, а как правильно надо

← →
alex-drob © (2006-05-09 20:32) [3]

1 добавить

← →
palva © (2006-05-09 20:34) [4]

> а как правильно надо
IdSMTP1

← →
asd © (2006-05-09 20:54) [5]

Не понял

← →
asd © (2006-05-09 21:10) [6]

А я понял. Но теперь фигня в другом: при отправке пишет ошибку

Ошибка Socket # 10060 Connection timed out

Не может связаться с сервером для отправки. Сервер не отвечает или нет связи.

А что можно сделать? Может знаете, как можно отправить письмо на мыло?

Ошибка [Error] Unit1.pas(40): Undeclared identifier: Connected Найти похожие ветки