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

Вниз

Как правильно получить доступ к св-ву GetProp?   Найти похожие ветки 

 
grigory ©   (2004-12-01 15:43) [0]

Здравсвуйте!Не могу никак првильно выйти на св-во GetProp!
Пишу так:
var
 contactfolder:mapifolder;
 contactit: _ContactItem;
 mapimessage:Imessage;
begin
 ContactIt:= _ContactItem(ContactFolder.Items.Item(1));
 MapiMessage:=ContactIt.MAPIOBJECT as Imessage;
 MapiMessage.GetProps(Props,0,CValues,PropV);
 .............

или второй вариант:
begin
 contactfolder:=_Application.GetNamespace("mapi").GetDefaultfolder   (olfoldercontact);
 ContactIt:=contactfolder.Items.Item(1);
 MapiMessage:=ContactIt.MAPIOBJECT as Imessage;
 MapiMessage.GetProps(Props,0,CValues,PropV);
но ничего не получается...
помогите пожалуйста!


 
Chlavik ©   (2004-12-02 12:59) [1]

Ты читал какие парметры метода getprops и как их использовать ??? Всё правильно, только вот я думал что ты разберёшся с вызвовом GetProps еще раз говорю GetProps + F1 (WInApi)

Вот моя функция для получения Mapi свойства


uses MapiX, MapiTags, MapiDefs...

type PPropValue = ^T__UPV;

function MapiGetProp(Item:IMAPIProp; Prop:DWORD; var Value:PPropValue):DWORD;
var PropV:PSPropValue;
    Props:TSPropTagArray;
    CValues:DWORD;
begin
Props.aulPropTag[0]:=Prop;
Props.cValues:=1;
//
Result:=Item.GetProps(@Props,0,CValues,PropV);
if (Result = S_OK) then
  Value:=@PropV^.Value
else
 begin
  Value:=nil;
  if Result = MAPI_W_ERRORS_RETURNED then MapiFreeBuffer(PropV);
 end;
end;


 
grigory ©   (2004-12-02 23:50) [2]

да у меня не в getprop проблема..
contactfolder:=_Application.GetNamespace("mapi").GetDefaultfolder   (olfoldercontact) - почему это НЕ РАБОТАЕТ?? Я больше не знаю что делать!


 
grigory ©   (2004-12-03 00:41) [3]

а если не трудно, можешь мне дать исходники своей программы? Хочется на примере посмотреть..пожалуйста!


 
Chlavik ©   (2004-12-05 20:20) [4]

Я опечатался olFolderContactS  (Uses OutlookXP) - в Outlook Alt + F11 + там Help (и там в VB Help)



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

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

Наверх




Память: 0.47 MB
Время: 0.039 c
3-1122892579
Киря
2005-08-01 14:36
2005.09.11
Можно ли сделать подтаблицы в DbGridEh и как?


10-1101741608
Romano
2004-11-29 18:20
2005.09.11
Передача структур (record) в методы COM-объектов


3-1122629751
Сергей Н.
2005-07-29 13:35
2005.09.11
Type mismatch for field


14-1124218935
Defunct
2005-08-16 23:02
2005.09.11
"www.delphimaster.ru" и "delphimaster.ru"


14-1123908241
Гость1
2005-08-13 08:44
2005.09.11
pdf редактирование