 |
BorlandTalk.com Borland discussion newsgroups
|
| View previous topic :: View next topic |
| Author |
Message |
Ulf Sturegren Guest
|
Posted: Fri Aug 19, 2005 3:02 pm Post subject: TOutlookApplication in Delphi 2005 |
|
|
Hi,
I've been using TOutlookApplication and TMailItems in Delphi 5 and has now
migrated to Delphi 2005.
Everything works fine - except sending mails from Delphi app via
Outlook2003.
I did something like this;
var
Mi: _DMailItem;
x : olevariant;
p : integer;
begin
OutlookApplication1.Connect;
MI:=OutlookApplication1.CreateItem(olMailItem) as _DMailItem;
MI.Recipients.Add(aMailadress);
MI.Subject:=aSubject;
MI.Body:=ABody;
if AAttachmentFil<>'' then
MI.Attachments.Add(AAttachmentFil,olByValue,1,AAttachmentBen);
MI.Send;
end;
Any Ideas of how to do it in D2005 (cannot find any documentation on
TOutlookApplication)
regards,
Uffe Sturegren
|
|
| Back to top |
|
 |
Dmitry Streblechenko Guest
|
Posted: Fri Aug 19, 2005 5:04 pm Post subject: Re: TOutlookApplication in Delphi 2005 |
|
|
What is the exact problem? The fact that you get a security prompt when
MailItem.Send is called or that the message stays until you click
"Send/Receive" in Outlook?
Dmitry Streblechenko (MVP)
http://www.dimastr.com/
OutlookSpy - Outlook, CDO
and MAPI Developer Tool
"Ulf Sturegren" <ulf.sturegren (AT) langleytravel (DOT) com> wrote
| Quote: | Hi,
I've been using TOutlookApplication and TMailItems in Delphi 5 and has now
migrated to Delphi 2005.
Everything works fine - except sending mails from Delphi app via
Outlook2003.
I did something like this;
var
Mi: _DMailItem;
x : olevariant;
p : integer;
begin
OutlookApplication1.Connect;
MI:=OutlookApplication1.CreateItem(olMailItem) as _DMailItem;
MI.Recipients.Add(aMailadress);
MI.Subject:=aSubject;
MI.Body:=ABody;
if AAttachmentFil<>'' then
MI.Attachments.Add(AAttachmentFil,olByValue,1,AAttachmentBen);
MI.Send;
end;
Any Ideas of how to do it in D2005 (cannot find any documentation on
TOutlookApplication)
regards,
Uffe Sturegren
|
|
|
| Back to top |
|
 |
Ulf Sturegren Guest
|
Posted: Wed Aug 24, 2005 10:28 am Post subject: Re: TOutlookApplication in Delphi 2005 |
|
|
Hi,
No, that was not the problem !
But do You know how to get rid of it ?
Regards,
Uffe Sturegren
"Dmitry Streblechenko" <dmitry (AT) dimastr (DOT) com> skrev i meddelandet
news:43061121$1 (AT) newsgroups (DOT) borland.com...
| Quote: | What is the exact problem? The fact that you get a security prompt when
MailItem.Send is called or that the message stays until you click
"Send/Receive" in Outlook?
Dmitry Streblechenko (MVP)
http://www.dimastr.com/
OutlookSpy - Outlook, CDO
and MAPI Developer Tool
"Ulf Sturegren" <ulf.sturegren (AT) langleytravel (DOT) com> wrote in message
news:4305f4a7$1 (AT) newsgroups (DOT) borland.com...
Hi,
I've been using TOutlookApplication and TMailItems in Delphi 5 and has
now migrated to Delphi 2005.
Everything works fine - except sending mails from Delphi app via
Outlook2003.
I did something like this;
var
Mi: _DMailItem;
x : olevariant;
p : integer;
begin
OutlookApplication1.Connect;
MI:=OutlookApplication1.CreateItem(olMailItem) as _DMailItem;
MI.Recipients.Add(aMailadress);
MI.Subject:=aSubject;
MI.Body:=ABody;
if AAttachmentFil<>'' then
MI.Attachments.Add(AAttachmentFil,olByValue,1,AAttachmentBen);
MI.Send;
end;
Any Ideas of how to do it in D2005 (cannot find any documentation on
TOutlookApplication)
regards,
Uffe Sturegren
|
|
|
| Back to top |
|
 |
Dmitry Streblechenko Guest
|
Posted: Wed Aug 24, 2005 7:13 pm Post subject: Re: TOutlookApplication in Delphi 2005 |
|
|
Get rid of what problem?
Dmitry Streblechenko (MVP)
http://www.dimastr.com/
OutlookSpy - Outlook, CDO
and MAPI Developer Tool
"Ulf Sturegren" <ulf.sturegren (AT) langleytravel (DOT) com> wrote
| Quote: | Hi,
No, that was not the problem !
But do You know how to get rid of it ?
Regards,
Uffe Sturegren
"Dmitry Streblechenko" <dmitry (AT) dimastr (DOT) com> skrev i meddelandet
news:43061121$1 (AT) newsgroups (DOT) borland.com...
What is the exact problem? The fact that you get a security prompt when
MailItem.Send is called or that the message stays until you click
"Send/Receive" in Outlook?
Dmitry Streblechenko (MVP)
http://www.dimastr.com/
OutlookSpy - Outlook, CDO
and MAPI Developer Tool
"Ulf Sturegren" <ulf.sturegren (AT) langleytravel (DOT) com> wrote in message
news:4305f4a7$1 (AT) newsgroups (DOT) borland.com...
Hi,
I've been using TOutlookApplication and TMailItems in Delphi 5 and has
now migrated to Delphi 2005.
Everything works fine - except sending mails from Delphi app via
Outlook2003.
I did something like this;
var
Mi: _DMailItem;
x : olevariant;
p : integer;
begin
OutlookApplication1.Connect;
MI:=OutlookApplication1.CreateItem(olMailItem) as _DMailItem;
MI.Recipients.Add(aMailadress);
MI.Subject:=aSubject;
MI.Body:=ABody;
if AAttachmentFil<>'' then
MI.Attachments.Add(AAttachmentFil,olByValue,1,AAttachmentBen);
MI.Send;
end;
Any Ideas of how to do it in D2005 (cannot find any documentation on
TOutlookApplication)
regards,
Uffe Sturegren
|
|
|
| Back to top |
|
 |
Oliver Townshend Guest
|
Posted: Thu Aug 25, 2005 12:28 pm Post subject: Re: TOutlookApplication in Delphi 2005 |
|
|
| Quote: | No, that was not the problem !
But do You know how to get rid of it ?
|
Yes he does, he wrote Redemption (check out his web site).
Other alternative are to reconfigure your exchange server to disallow it,
which kind of ruins the point having security (although most viruses that
want to can get around it), or to use extended mapi libraries.
Oliver Townshend
|
|
| Back to top |
|
 |
|
|
You cannot post new topics in this forum You cannot reply to topics in this forum You cannot edit your posts in this forum You cannot delete your posts in this forum You cannot vote in polls in this forum
|
|