SMTP Mail, TidMessage im Thread

**haentschman**

Danke Jungs...

Ihr dürft hauen...

Zitat:

Sind die Events verdrahtet? Bedenkst du, daß die im Thread-Kontext aufgerufen werden? Machen die was mit dem Self-Parameter?

Ja sind sie. Im Handler wird nur die "Message" zusammengesetzt und dann wird Synchronize(SyncOnLog). Self hat in diesem Falle nur statistische Wirkung. Paßt schon.

zusammenfalten · markieren

Delphi-Quellcode:

			procedure TWorkerPollingServer.DoOnMail(Sender: TObject; Recipient, Subject: string);

begin

  FMsgLog:= CreateLogMessage(msNormal);

  try

    FMsgLog.DeviceID:= 0; //Server

    FMsgLog.MessageState:= msNormal;

    FMsgLog.LogTime:= Now;

    FMsgLog.LogText:= conTextMailInformation + 'versendet (' + conTextServer + ')';

    Synchronize(SyncOnLog);

  finally

    FMsgLog.Free;

  end;

end;

Zitat:

!man zerstört besser IMMER in umgedrehter Reihenfolg zur Erstellung!

...tja, das sind die Quellen der TidMessage der Indy´s. Da bin ich unschuldig.

Schuldig im Sinne der Anklage! Den Mailer (TdMail) im constructor des Threads erstellt und nicht im Kontext vom Execute.

Das kann nicht funktionieren. Ich reiche Urlaub ein. Wer lädt mich ein?....

Komisch das man erst immer darüber schreiben muß bis einem so etwas auffällt.

SMTP Mail, TidMessage im Thread

AW: SMTP Mail, TidMessage im Thread

Forumregeln