Einzelnen Beitrag anzeigen

Natcree

Registriert seit: 5. Mär 2013
502 Beiträge
 
Delphi 7 Enterprise
 
#5

AW: Connection Check Email Anbieter

  Alt 1. Apr 2013, 21:16
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;

Geändert von Natcree ( 1. Apr 2013 um 21:28 Uhr)
  Mit Zitat antworten Zitat