ساختن Microsoft Outlool task

[ghgh-moghadam]

سلام دوستان. من می خواهم در یک برنامه کاربردی در دلفی یک task یا note در Microsoft outlook خود برای نشان داده شدن در یک زمان خاص در Microsoft outlook بسازم. خواهشمندم راهنمایی کنید. حتی الامکان با استفاده از امکانات و کامپوننت های نصب شده در خود دلفی 7 یا 2005. ممنون.

[vesal]

(include ComObj, ActiveX in uses):

var ovOutlook: OleVariant;
ovItem: OleVariant;
begin

ovOutlook:=CreateOleObject('Outlook.Application');
try
ovItem:=ovOutlook.CreateItem(3);
try
ovItem.Recipients.Add('foo@bar.net');
ovItem.Subject:='Prepare Agenda For Meeting';
ovItem.DueDate:='7/22/2006';
ovItem.Assign;
ovItem.Send;
finally
ovItem:=Unassigned;
end;
finally
ovOutlook.Quit;
ovOutlook:=Unassigned;
end;

end;