Emailversand und Lesen aus ini in Memo

[Beginner2013]

Guten Morgen,

ich bin ein Delphi-Neuling. Habe mich schon bisschen eingelesen und komme soweit gut klar.
Zwei Fragen kann ich mir leider nicht selbst beantworten und hoffe daher auf Hilfe:

1. Kann mir bitte jemand erklären wie ich mit Delphi Emails über bspw. ok.de senden kann?
Was hat es mit den Dll und SSL-Handler auf sich usw.

2. Wie kann ich Daten welche ich in aus einer Memo in eine ini (über mehrere Zeilen) schreibe, in eine Memo wieder einlesen.
Aktuell gelingt es mir nur die erste Zeile mittels ini.ReadString() einzulesen. Wenn ich es mit ini.ReadSection() versuche klappt das bei mir nicht. Gibt es alternativen?

Vielen Dank vorab.

[arnof]

Zur Ini Datei, wenn Du Sie nur in einem Memo haben willst, dann lese Sie doch direkt ein:

Memo1.Lines.Loadfromfile('C:....ini');


Mailsversenden, da gibt es wie immer x Möglichkeiten:

die einfachste SHELLEXECUTE(PCHAR('MAILTO:testtest.de.......

[Beginner2013]

Danke für die Antwort.
Was muss ich bei der Verwendung von "SHELLEXECUTE(PCHAR('MAILTO:testtest.de....... " beachten, was wäre wo einzustellen?

Bzgl. Memo einlesen:
Mit LoadFromFile() geht es auch nicht, da dieser Befehl ja die komplette ini einliest. Ich benötige aber nur einen Teil der ini, da ich vorher verschiedene Memos in eine ini schreibe (untereinander mit verschiedenen Überschriften).

[baumina]

Ohne es versucht zu haben, denke ich könnte das gehen:

Delphi-Quellcode:

ini.ReadSection('sectionname', Memo.lines)

Voraussetzung dabei ist, dass der sectionname in der ini so drin steht:

Code:

[sectionname]

[Beginner2013]

Delphi-Quellcode:

Memo2.Text :=  (ini.ReadSection('Special Agreements', Memo2.Lines));

Wenn ich das mache, hatte das vorab auch schon versucht, kommt:

[DCC Error] MainMenu.pas(1560): E2010 Incompatible types: 'TMemo' and 'procedure, untyped pointer or untyped parameter'

[Sir Rufo]

Zitat:

Zitat von Beginner2013 (Beitrag 1216147)

Delphi-Quellcode:

Memo2.Text :=  (ini.ReadSection('Special Agreements', Memo2.Lines));

Wenn ich das mache, hatte das vorab auch schon versucht, kommt:

[DCC Error] MainMenu.pas(1560): E2010 Incompatible types: 'TMemo' and 'procedure, untyped pointer or untyped parameter'

Ein Blick in die Dokumentation reicht dafür ;) TIniFile.ReadSection
(das ist eine

Delphi-Quellcode:

procedure

und da wird nichts zurückgeliefert, wie bei einer

Delphi-Quellcode:

function

und damit kann der nicht existierende Rückgabewert auch nirgends zugewiesen werden ;))

[baumina]

Lass das "Memo2.Text :=" weg. Einfach nur

Delphi-Quellcode:

ini.ReadSection('Special Agreements', Memo2.Lines);

[Sir Rufo]

Zitat:

Zitat von baumina (Beitrag 1216153)

Lass das "Memo2.Text :=" weg. Einfach nur

Delphi-Quellcode:

ini.ReadSection('Special Agreements', Memo2.Lines);

Ich denke nicht, dass er damit glücklich wird ...
Ini-Datei:

Code:

[Special Agreements]
Zeile1=Hallo
Zeile2=Welt

Im Memo steht dann

Code:

Zeile1
Zeile2

;)

[Beginner2013]

Hab das versucht, klappt aber leider auch nicht :((

[baumina]

Kannst Du "klappt nicht" etwas detaillierter beschreiben?

[Beginner2013]

Sorry....er schreibt dann wirklich nur Zeile 1 in die Memo.

[baumina]

Kannst du mal den Inhalt der Ini-Datei und was du davon in der Memo sehen willst hier posten?

[Beginner2013]

Ich schreibe mittels

Delphi-Quellcode:

    ini.WriteString('Special Agreements', 'Special Agreements', Memo2.text);

alles was sich in Memo2 befindet in die ini.

Code:

ini:
[Special Agreements]
Special Agreements=1
2
3
4

Egal wie ich nun einlese es steht nach dem Einlesen immer nur die 1 in der Memo. Ich möchte aber 1 bis 4 einlesen.

[baumina]

Also wenn in deiner ini-Datei nichts anderes drinstehen soll als diese Textzeilen aus dem Memo, würde ich dir vorschlagen, dass du einfach nur eine Textdatei schreibst und wieder liest:

Delphi-Quellcode:

Memo2.Lines.SaveToFile('C:\xxx.yyy');
Memo2.Lines.LoadFromFile('C:\xxx.yyy');

[Beginner2013]

Doch sorry, da stehen noch andere Sachen drin, das war nur ein Ausschnitt. Will nicht die ganze ini-Datei posten.

[baumina]

OK, dann würde ich es Dir so vorschlagen:

Delphi-Quellcode:

//speichern
ini.writestring('section', 'memo', memo1.lines.delimitedText);

//laden
memo1.lines.delimitedText := ini.Readstring('section', 'memo', '');

EDIT: Den memo1.Lines.Delimiter musst vorher setzen.

[Beginner2013]

Yeeeeeeeeeeeees :) Danke es geht :).

Hat jemand noch ne Antwort bzgl. Frage 2?

[Sir Rufo]

Zitat:

Zitat von Beginner2013 (Beitrag 1216170)

Yeeeeeeeeeeeees :) Danke es geht :).

Hat jemand noch ne Antwort bzgl. Frage 2?

Ich dachte das wäre die Antwort auf Frage 2?

Zitat:

Zitat von Beginner2013 (Beitrag 1216135)

2. Wie kann ich Daten welche ich in aus einer Memo in eine ini (über mehrere Zeilen) schreibe, in eine Memo wieder einlesen.
Aktuell gelingt es mir nur die erste Zeile mittels ini.ReadString() einzulesen. Wenn ich es mit ini.ReadSection() versuche klappt das bei mir nicht. Gibt es alternativen?

[Beginner2013]

Habe mich vertippt. Meinte natürlich zu Frage 1 bzgl. Emailversand :D