Connection Check Email Anbieter

[Natcree]

Also als erstes solltes du dir eine Databank anlegen oder mit ner Tstringlistarbeiten um dort deine Email Konten zu hinterlegen Du Brauchst den Posteingangsserver, den Ausgangs Server die jeweilige Email Addresse , Das Passwort und Deinen Angezeigten Namen.

Diese am besten in eine Datei oder Datenbank abspeichern bei der du dann bei benutzung darauf zu greifen kannst. Haste schon mit streams gearbeitet?

Per Tstringlist Daten Speichern

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
var
st:tstringlist;
begin
st:=tstringlist.Create;
st.Add(edit1.text);  // Postausgangsserver
st.add(edit2.Text);  // Hier Email Addresse oder Benutzername
st.add(edit3.text);  // Hier Passwort  für dein Account
st.SaveToFile('email.cfg');  // oder email.txt....
st.free;
end;

Und Holen der Daten aus der Datei

Delphi-Quellcode:

procedure TForm1.Button2Click(Sender: TObject);
var
st:tstringlist;
begin
st:=tstringlist.Create;
st.LoadFromFile('email.cfg');
edit4.Text:=st[0];
edit5.Text:=st[1];
edit6.Text:=st[2];
st.free;
end;