Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Сети";
Текущий архив: 2005.10.16;
Скачать: [xml.tar.bz2];

Вниз

Работа с почтой через 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;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.45 MB
Время: 0.037 c
1-1127354970
DmiSb
2005-09-22 06:09
2005.10.16
Каким образом можно отобразить псевдографику ?


1-1127814627
BaxTMaH
2005-09-27 13:50
2005.10.16
Клавиша Backspace


14-1127805936
pazitrton_brain
2005-09-27 11:25
2005.10.16
Петиция.


2-1126169729
ГрэйМ
2005-09-08 12:55
2005.10.16
Реестр XP...


2-1126158331
worldmen
2005-09-08 09:45
2005.10.16
FastReport. Delphi 7. Передача переменных.





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский