[ printer @ 23.06.2006. 22:56 ] @
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. Da li neko moze malo blizw da objasni na koji nacin to funkcionise i eventualnoi kako bi se to moglo uradiit u Delphiju recimo. Hvala u napred.
[ savkic @ 24.06.2006. 00:14 ] @
> 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;
[ printer @ 25.06.2006. 20:53 ] @
Ovo bi moglo biti to mada nisam uspeo da implementiram ova kod o Delphi 6 (verovatno nesto nisam dobro uradio).
[ savkic @ 26.06.2006. 19:25 ] @
> Ovo bi moglo biti to mada nisam uspeo da implementiram ova kod o Delphi 6 (verovatno nesto nisam dobro uradio).

Koju poruku dobiješ? Da li ti je instaliran Outlook.