@Sir_Rufo: Okay, habe mir gedacht das er darauf hinauswill. Merke ich mir für die Zukunft...
@jaenicke: Ja stimmt... Habe ich irgendwie dran vorbei gedacht... Und danke für den Tipp mit dem "IsDebuggerPresent"
Noch eine Anmerkung: Eben beim experimentieren ist mir folgendes aufgefallen (man betrachte die for-Schleife welche für das Senden verantwortlich ist):
Delphi-Quellcode:
for i := 0 to High(Jobs) do
begin
{ ... }
if EventCount > 0 then
begin
Log(False, 'All Events: ' + IntToStr(Length(Events))); // Geht!
SendMail(i);
end;
end;
Und hier die "andere" Version;
Delphi-Quellcode:
for i := 0 to High(Jobs) do
begin
{ ... }
if EventCount > 0 then
begin
Log(False, IntToStr(Length(Events))); // GEHT NICHT!!!
SendMail(i);
end;
end;
Ich debug mich da jetzt durch und dann bin ich mal gespannt, was da genau passiert
Denn der Code von oben hat mich nur nochmehr verwirrt
