AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Sprachen und Entwicklungsumgebungen Object-Pascal / Delphi-Language Delphi Problem mit D2007 bei Terminübergabe an Outlook
Thema durchsuchen
Ansicht
Themen-Optionen

Problem mit D2007 bei Terminübergabe an Outlook

Ein Thema von RSF · begonnen am 5. Jun 2008 · letzter Beitrag vom 24. Jun 2008
Antwort Antwort
RSF

Registriert seit: 13. Mär 2008
155 Beiträge
 
Delphi 10.2 Tokyo Professional
 
#1

Problem mit D2007 bei Terminübergabe an Outlook

  Alt 5. Jun 2008, 14:32
Ich muss alte Projekte von Delphi 7 auf Delphi2007 anpassen.
in einen Projektabschnitt zur Terminübergabe an Outlook habe ich ein Problem.
Unter Delphi2007 kennt er in USES die Bezeichnung „OutlookXP“ nicht.
Fehlermeldung: [Pascal Fataler Fehler] Unit1.pas(7): F1026 Datei nicht gefunden: 'OutlookXP.dcu'
(Unter Delphi 7 funktioniert es aber.)
Muss ich in Delphi2007 noch etwas einbinden oder ist nur der Code zu ändern.

Delphi-Quellcode:
unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls, Buttons, ComCtrls,ComObj, OutlookXP, Mask;

type
  TForm1 = class(TForm)
    BitBtnCalender: TBitBtn;
    DateTimePicker1: TDateTimePicker;
    EditSubject: TEdit;
    EditLocation: TEdit;
    MemoBody: TMemo;
    Zeit: TMaskEdit;
    Label1: TLabel;
    Label2: TLabel;
    Label3: TLabel;
    Label4: TLabel;
    Label5: TLabel;
    Dauer: TEdit;
    Label6: TLabel;
    Label7: TLabel;
    procedure BitBtnCalenderClick(Sender: TObject);
  private
    { Private-Deklarationen }
  public
    { Public-Deklarationen }
  end;

var
  Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.BitBtnCalenderClick(Sender: TObject);
 var
  aOutlook : Variant;
  aMAPI : Variant;
  aFolder : Variant;
  aCalendar : Variant;
begin
   Screen.Cursor := crHourglass;
   aOutlook := CreateOleObject('Outlook.Application');
  try
    aMAPI := aOutlook.GetNameSpace('MAPI');
    aFolder := aMAPI.GetDefaultFolder(olFolderCalendar);
    aCalendar := aMAPI.GetDefaultFolder(olFolderCalendar).Items.Add;
    aCalendar.Start := StrToTime(Zeit.Text) + Int(DateTimePicker1.Date);
    aCalendar.Duration := StrToInt(Dauer.Text);
    aCalendar.Subject := EditSubject.Text;
    aCalendar.ReminderMinutesBeforeStart := 30;
    aCalendar.ReminderPlaySound := True;
    aCalendar.ReminderSet := True;
    aCalendar.Location := EditLocation.Text;
    aCalendar.Body := MemoBody.Text;
    aCalendar.Save;
  finally
    aOutlook := Unassigned;
    Screen.Cursor := crDefault;
  end;

end;

end.
Ronald
  Mit Zitat antworten Zitat
Muetze1
(Gast)

n/a Beiträge
 
#2

Re: Problem mit D2007 bei Terminübergabe an Outlook

  Alt 5. Jun 2008, 14:40
Bei der Installation von RAD2007 wurde nachgefragt, welche Office Anbindung verwendet werden soll. Somit kann sich der Uses-Name auch entsprechend ändern. Kann es sein, dass er dadurch die Unit nicht mehr kennt?
  Mit Zitat antworten Zitat
mkinzler
(Moderator)

Registriert seit: 9. Dez 2005
Ort: Heilbronn
39.861 Beiträge
 
Delphi 11 Alexandria
 
#3

Re: Problem mit D2007 bei Terminübergabe an Outlook

  Alt 5. Jun 2008, 14:42
Kann man aber auch später noch umstellen
Markus Kinzler
  Mit Zitat antworten Zitat
RSF

Registriert seit: 13. Mär 2008
155 Beiträge
 
Delphi 10.2 Tokyo Professional
 
#4

Re: Problem mit D2007 bei Terminübergabe an Outlook

  Alt 24. Jun 2008, 22:05
Also ich habe das Problem selbst gefunden.
Aus irgendwelchen Gründen waren in Delphi die Bibliotekspfade und Suchpfade fehlerhaft und unvollständig.
Danke für alle gegebenen Hinweise.
Ronald
  Mit Zitat antworten Zitat
Antwort Antwort


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 21:53 Uhr.
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz