Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2005.10.16;
Скачать: CL | DM;

Вниз

Работа с почтой через Simple MAPI   Найти похожие ветки 

 
AlexWlad   (2005-06-22 21:17) [0]

Доброго времени дня всем.

При написании программы столкнулся с проблемой:
доступно только первое вложение (аттачмент).

Для доступа к вложению (первому) — 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 — не массив.


 
Ученик   (2005-06-22 23:22) [1]

В Jedi Code Library есть модуль для работы c Mapi

http://sourceforge.net/project/showfiles.php?group_id=47514

для доступа к другнм файлам можно использовать
Inc(MapiFileDesc)  // MapiFileDesc := Message.lpFiles;


 
AlexWlad ©   (2005-06-23 18:51) [2]

Спасибо.



Страницы: 1 вся ветка

Текущий архив: 2005.10.16;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.032 c
1-1127800740
ShotGun
2005-09-27 09:59
2005.10.16
Как деархивировать zip file?


2-1126981545
Melok
2005-09-17 22:25
2005.10.16
Расчёт разницы между двумя датами


11-1108015146
Blure
2005-02-10 08:59
2005.10.16
Не прорисовываются иконки в TKolTreeView


1-1127802387
Jolik
2005-09-27 10:26
2005.10.16
Нашел в сети апдейт на Delphi7 - а он гад...


2-1126974999
нарка
2005-09-17 20:36
2005.10.16
досрочный выход из for-цикла