Ergebnis 1 bis 5 von 5
  1. #1
    Anfänger Avatar von Dnic
    Registriert seit
    19.02.2010
    Beiträge
    5

    Standard IdMessage-Problem

    Moin Moin,
    Ich hab zur Übung mal versucht mir eine App zu basteln, mit der ich E-Mails versenden kann.
    Das Connecten zum SMTP-Server klappt soweit, allerdings will er die Mail einfach nicht senden

    Code:
    procedure TForm1.Button1Click(Sender: TObject);
    var mail : Tidmessage;
        i: Integer;
    begin
     try
        mail := IDmessage1.Create;
        idsmtp1.connect;
    
        with mail do begin
          body.assign (memo1.lines);
          From.text := xxx@gmail.com';
          replyto.emailAddresses := 'xxx@gmail.com';
          recipients.emailaddresses := edit1.text;
          Subject := edit2.text;
          Priority := mpnormal;
          date := now;
        end;
    
        form1.Color := clred; // Zur Kontrolle bis Hierher geht alles gut 
        idsmtp1.Send(mail);
        idsmtp1.Disconnect(true);
        Showmessage ('Senden erfolgreich!');
      except
       Showmessage ('FAIL!')
    
     end;
    end;
    Nach circa 5 Minuten kommt dann die Message-Box mit dem "Fail!" :-/

    Schon mal danke für eure Hilfe

  2. #2

    Registriert seit
    17.06.2009
    Beiträge
    559

    Standard

    Lass' dir bei einer Exception mal die zugehörige Fehlermeldung anzeigen und poste diese hier.
    Code:
    try
      [...]
    except
      on e:exception do showmessage(e.message);
    end;
    Da der Fehler erst nach 5 Minuten auftritt, tippe ich auf ein Timeout.
    Hast du denn einen funktionierenden SMTP-Server eingetragen?

    Btw: Du erzeugst ein Speicherleck, da du das Objekt mail nicht wieder freigibst.
    Geändert von inout (03.08.2010 um 22:10 Uhr)

  3. #3
    Anfänger Avatar von Dnic
    Registriert seit
    19.02.2010
    Beiträge
    5

    Standard

    SMTP ist smtp.gmail.com

    Das connecten funktioniert ja soweit.
    Authentifizierung, TLS, Port usw. ist alles im Objektinspektor eingetragen.
    Fehlermeldung kommt gleich...

    Edit: Irgendwie spuckt er keine Fehlermeldung mehr aus.. kommt ach keine Exeption, aber die Mail senden tut er auch nicht...
    Edit2: Er hat was ausgespuckt: Connection Closed Gracefully.
    Geändert von Dnic (03.08.2010 um 22:00 Uhr)

  4. #4

    Registriert seit
    17.06.2009
    Beiträge
    559

    Standard

    Hast du die aktuellste Indy-Version (10.5.x glaub ich)?
    Funktioniert es nur mit gmail nicht oder auch nicht mit anderen Anbietern?
    Hier noch etwas zu lesen.

  5. #5
    Anfänger Avatar von Dnic
    Registriert seit
    19.02.2010
    Beiträge
    5

    Standard

    Ich werde es morgen mal mit WEB.de ausprobieren.
    Danke für deine Hilfe, ich mach aber für heute ach mal fertig und setze mich morgen nochmal dran ;-)
    Zwecks Indy-Version weiß ich gerade gar nicht genau, benutze aber Delphi 2010.

Stichworte

Berechtigungen

  • Neue Themen erstellen: Nein
  • Themen beantworten: Nein
  • Anhänge hochladen: Nein
  • Beiträge bearbeiten: Nein
  •