> Odusevio sam se sledecim primerom : Calendar vizard, mali programcic koji kreira kalendar- kada zavrsi kreiranje otvori recimo Corel i pocne po
> njemu da pise i iscrtava kalendar koji je kreirao. Kapiram ja da se radi o nekog automatizaciji ali kako.
Ne poznajem taj program pa ne mogu zasigurno tvrditi ali pretpostavljam da upravljanje Colelom radi putem OLEa. Evo jednog kratog primera za Outlook.
Code:
uses
comobj;
procedure TForm1.Button1Click(Sender: TObject);
const
olMailItem = 0;
var
Outlook: OLEVariant;
MailItem: Variant;
begin
try
Outlook := GetActiveOleObject('Outlook.Application');
except
Outlook := CreateOleObject('Outlook.Application');
end;
MailItem := Outlook.CreateItem(olMailItem);
MailItem.Recipients.Add('
[email protected]');
MailItem.Subject := 'Proba';
MailItem.Body := 'Test';
MailItem.Attachments.Add('C:\Autoexec.bat');
MailItem.Send;
Outlook := Unassigned;
end;