| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Работа с почтой через Simple MAPI [D5, Win2k]
AlexWlad © (2005-06-22 21:17:00)Доброго времени дня всем.
При написании программы столкнулся с проблемой:
доступно только первое вложение (аттачмент).
Для доступа к вложению (первому) — pmm^.lpFiles^.lpszFileName, где pmm : PMapiMessage;
MAPI.pas
type
PMapiMessage = ^TMapiMessage;
{$EXTERNALSYM MapiMessage}
MapiMessage = packed record
ulReserved: Cardinal; { Reserved for future use (M.B. 0) }
lpszSubject: LPSTR; { Message Subject }
lpszNoteText: LPSTR; { Message Text }
lpszMessageType: LPSTR; { Message Class }
lpszDateReceived: LPSTR; { in YYYY/MM/DD HH:MM format }
lpszConversationID: LPSTR; { conversation thread ID }
flFlags: FLAGS; { unread,return receipt }
lpOriginator: PMapiRecipDesc; { Originator descriptor }
nRecipCount: Cardinal; { Number of recipients }
lpRecips: PMapiRecipDesc; { Recipient descriptors }
nFileCount: Cardinal; { # of file attachments }
lpFiles: PMapiFileDesc; { Attachment descriptors }
end;
TMapiMessage = MapiMessage;
Объясните, пожалуйста, как добраться до 2-го и т.д. вложений, т.к. lpFiles — не массив.
AlexWlad (2005-06-23 18:51:00) [1]Спасибо.
Ученик (2005-06-22 23:22:00) [2]В Jedi Code Library есть модуль для работы c Mapi
http://sourceforge.net/project/showfiles.php?group_id=47514
для доступа к другнм файлам можно использовать
Inc(MapiFileDesc) // MapiFileDesc := Message.lpFiles;
| |
