Programm arbeitet nicht richtig unter Win7

[Aemon]

Hallo Leute,

ich soll ein Programm erstellen das mit Hilfe von easyMAPI von Rapware Version 6.2.1.4 bestimmte E-Mails aus Outlook liest und mir den Mail Body zurückgibt.

Und nun zu meinem Problem das Programm funktioniert super unter XP unter Win7 jedoch macht es keinen Mux es kommt nicht mal eine Fehlermeldung bei der ich ansetzen kann. Getestet habe ich bis jetzt nur ob es an der UAC liegen könnte, da ich das aber in allen varianten durchgegangen bin kann ich das wahrscheinlich ausschließen.

Ich hoffe das jemand von euch mir helfen kann, bin noch relativ unerfahren was Delphi angeht.

mfg
Aemon

P.s.: Tut mir leid wegen dem Titel mir ist auf die schnelle nichts besseres eingefallen.

[cookie22]

Der Hersteller hat doch ein eigenes Forum, frag doch mal da oder such mal.

http://www.rapware.nl/forum/

[p80286]

Zitat von Aemon:

unter Win7 jedoch macht es keinen Mux es kommt nicht mal eine Fehlermeldung bei der ich ansetzen kann.

Und wenn Du mit [F7/F8] dadurch stepst, was funktioniert dann nicht?

Gruß
K-H

[Aemon]

Das Programm sollte sich direkt nach dem start verbinden und alle in der Inbox befindlichen Mails in einer ListView ausgeben. Wenn ich das Programm unter Win7 aufrufe startet es ganz normal und verbindet sich auch aber das ListView bleibt leer. Wenn ich das Programm durch den Debugger jage passiert nichts auffälliges alles wird wie unter XP aufgerufen ohne das etwas übersprungen wird.

[DeddyH]

D.h. es arbeitet eigentlich korrekt, man sieht nur nix? Da wäre der Code zum Befüllen der ListView evtl. interessant.

[Aemon]

Delphi-Quellcode:

procedure RebuildMessageList;
var
  Start: TDateTime;
  cnt: Integer;
begin
  Screen.Cursor := crHourGlass;
  Start := now;
  cnt := 0;
  lvMessages.Items.BeginUpdate;
  try
    lvMessages.OnCompare := nil;
    lvMessages.Items.Clear;

    FContentTable.First;
    while not FContentTable.EOF do
    begin
      Inc(cnt);
      AddItem(FContentTable);
      FContentTable.Next;
    end;

    FSortIndex := -7;
    lvMessages.OnCompare := lvMessagesCompare;
    lvMessages.SortType := stData;
  finally
    lvMessages.Items.EndUpdate;
    Screen.Cursor := crDefault;
    StatusBar.Panels[1].Text := Format('%d items read in %f sec.',[cnt, Trunc((now-Start)*24*3600*100) / 100]);
  end;
end;

[DeddyH]

Und Du bist sicher, dass FContentTable auch Daten enthält? Erscheint der Text in der StatusBar? Wie sieht AddItem aus?

[Uwe Raabe]

Zitat von DeddyH:

Und Du bist sicher, dass FContentTable auch Daten enthält? Erscheint der Text in der StatusBar? Wie sieht AddItem aus?

Und wie ist der Wert von cnt?

[Aemon]

Ich kann leider nur unter XP den Debuger laufen lassen weil ich auf win7 keine IDE habe. Was aber nicht wirklich was bringt da das Programm unter XP ja funktioniert.

Ob es zu Problemen kommen könnte weil mein Programm eine 32-bit variante ist und ich damit auf ein 64-bit Outlook zugreifen will?

[Morphie]

Zitat von Aemon:

Ob es zu Problemen kommen könnte weil mein Programm eine 32-bit variante ist und ich damit auf ein 64-bit Outlook zugreifen will?

Ja, genau das wird es sein, das "Problem" haben wir hier auch...
Es gibt aber meiner Meinung nach keinen Grund, auf Office / Outlook x64 zu setzen.