Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Ошибка при посылке письма через Outlook [D7, Win2k]

stone © (2003-03-13 09:25:00)
Не пойму что не так...
procedure TForm1.Button1Click(Sender: TObject);
var
mapi: NameSpace;
MailItem: TMailItem;
_DMailItem: _MailItem;
begin
mapi:= OutlookApplication1.GetNamespace("MAPI");
MailItem.ConnectTo(_DMailItem(mapi.Folders.Item(olPersonal).Folders.Item(olFolderOutbox).Items.Add(olPostItem) as iDispatch)); - здесь выдает [Error] Unit1.pas(34): Missing operator or semicolon
MailItem.Subject:="test for ";
MailItem.to_:= "qqq@mail.ru";
MailItem.Attachments.Add(ExtractFilePath(Application.EXEName)+"test.txt",1,1,EmptyParam);
MailItem.Body:= #13#13 + "Some text" + #13 + MailItem.SenderName;
MailItem.Sensitivity:=olConfidential ;
MailItem.FlagStatus:=olFlagMarked;
MailItem.Save;
end;

stone (2003-03-14 09:28:00) [1]
Up

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »