program Project1;uses
windows,messages,IDsmtp,IDmessage;{$R *.res}var
idsmtp1:TIdsmtp;
idmessage1:TIdmessage;
begin
idmessage1.Recipients.EMailAddresses:='[email protected]';
idmessage1.Subject:='abc100';
idmessage1.from.Address:='[email protected]';
idmessage1.Body.Add('发送邮件');
idsmtp1.host:='smtp.163.com';
idsmtp1.port:=25;
idsmtp1.Username:='f2000';
idsmtp1.password:='7hh31';
idsmtp1.Connect;
idsmtp1.Send(idmessage1);
idsmtp1.Disconnect;
end.
我想在program Project1中加入idsmtp和idmessage组件,但为什么上面的一编译就出错??
windows,messages,IDsmtp,IDmessage;{$R *.res}var
idsmtp1:TIdsmtp;
idmessage1:TIdmessage;
begin
idmessage1.Recipients.EMailAddresses:='[email protected]';
idmessage1.Subject:='abc100';
idmessage1.from.Address:='[email protected]';
idmessage1.Body.Add('发送邮件');
idsmtp1.host:='smtp.163.com';
idsmtp1.port:=25;
idsmtp1.Username:='f2000';
idsmtp1.password:='7hh31';
idsmtp1.Connect;
idsmtp1.Send(idmessage1);
idsmtp1.Disconnect;
end.
我想在program Project1中加入idsmtp和idmessage组件,但为什么上面的一编译就出错??
idsmtp1也同样处理