TNMFTP y TNMSMTP para DELPHI 7

[yoyo12]

Hola a todos.
Tengo un problema estoy trabajando con Delphi 7, pero la aplicacion con la que estoy trabajando fue creada con delphi 6, el problema esta con 2 objetos TNMFTP y TNMSMTP, quisiera saber si existen para Delphi 7, gracias

[viaraSOFT.com]

yo estoy con el mismo problema... cualquier ayuda es bienvenida!

[viaraSOFT.com]

http://www.faqts.com/knowledge_base/view.phtml/aid/26658

I use the Indy controls that comes with Delphi 7, IpSmtpClient.

Sample:

procedure TfrmMain.btnTestClick(Sender: TObject);
var Body: TStringList;
MimePart : TIpMimeEntity;
begin
SMTPPostOutID:= 0;
Body:= TStringList.Create;
Body.Text:= 'This is a test from CDE Postman';
IpSmtpClient.Domain:= SMTPDomain;
IpSmtpClient.DefaultPort:= SMTPPort;
IpSmtpClient.Message.NewMessage;
IpSmtpClient.Message.From:= 'hein@cdesoftware.co.za';
IpSmtpClient.Message.Sender:= 'hein@cdesoftware.co.za';
IpSmtpClient.Message.MailTo.Add('hein@cdesoftware.co.za');
IpSmtpClient.Message.Subject:= 'This is a test from IPro';

MimePart:= IpSmtpClient.Message.GetBodyHtml(True);
MimePart.EncodeBodyStrings(Body, '');
IpSmtpClient.Message.ContentType:= 'multipart';
IpSmtpClient.Message.ContentSubtype:= 'mixed';

IpSmtpClient.SendMail(SMTPServer,true);
LogMessage('Test message sent');
Body.Free;
end;



Parece que funciona correctamente pero tengo problemas para encontrar la libreria o la clase que contiene el tipo "TIpMimeEntity"...