Mailversand aus einem Delphi Programm

[idefix2]

Wie gesagt, der Vergleichswert ist das, was der Thunderbird für die gleiche Nachricht braucht. Und der codiert den Anhang auch base64, braucht zum Senden aber nur einen Bruchteil der Zeit (da geht es nicht um 33%, sondern der ist gut 10 mal schneller).
Zum Testen schreibe ich den kompletten Datentransfer in einem Logfile mit, das werde ich jetzt probeweise herausnehmen - aber ich kann mir nur schwer vorstellen, dass das die Bremse ist.

[BUG]

Die verwendete base64-Funktion ist mit den ganzen String-Konkatenation (und damit Kopien) der Horror.
Probiere mal eine optimierte Variante hier aus dem Forum, das könnte schon eine Menge bringen.

Was mir ansonsten auffällt, ist das die Datei erst komplett in den Speicher geladen wird, dann nach base64 codiert wird und erst danach komplett gesendet wird. Das ließe sich vermutlich parallelisieren. Aber vorher solltest du dir auf jeden Fall erst einmals base64 angucken.

Lass dir mal die Zeiten für die unterschiedliche Phasen(Lesen/Kodieren/Senden) anzeigen, dann siehst du eventuell wo das meiste herauszuholen ist