Habe mein Problem gelöst.
Delphi-Quellcode:
//Calculate Size
MS := TMemoryStream.Create;
msgSend.SaveToStream(MS);
Es war das SaveToStream. Das ist grottenlangsam.
Habe jetzt SaveToFile benutzt und das ist im Gegensatz zu
SaveToStream sehr viel schneller. Habe für das Eintüten eines
130 MB Anhangs, mit Speicherung zur Größenermittlung und kopieren des
Anhangs in ein Backupverzeichnis, keine 3 Minuten auf meinem
Testrechner (PIII 1,3GHz; 384 MB
RAM) gebraucht.
Das Thema hat sich also hiermit erledigt.
Trotzdem danke...