Aus Memo1 Einzelne Zeilen auslesen

[Plague]

Hallo,

ich möchte einzelne Zeilen aus einer Memo-Komponente auslesen und in einzelne Label oder Listbox Objekte einfügen. Weiß jemand wie das geht und kann mir weiterhelfen?

Ich möchte beispielsweise die Adresse in dieser Form auslesen:
Name (aus Memo) --> Label1
Straße (aus Memo) --> Label2
PLZ/Stadt (aus Memo) --> Label3

Auslistung (aus Memo) --> Listbox1

Danke
Thomas

[fcg]

wenn ich dich richtig verstanden habe:

Code:

 label1.caption := memo1.text[0]; //greift auf die erste zeile des memo's zu...

usw.

fcg

[Plague]

Erstmal danke...

Aber nun hab ich das Problem, dass nicht die komplette Zeile sondern nur der erste Buchstaben in das Label übertragen wird...

Was stimmt da nicht?

MfG
Thomas

[Alexander]

Ist auch logisch, da er auf das erste Zeichen des Strings Text zugreift...
Probier das mal das hier:

Delphi-Quellcode:

label1.caption := memo1.lines[0];

[Plague]

Hallo, nach langem habe ich mal wieder eine Frage zu diesem Thema...

Wie kann ich eine Zeile so auslesen, dass die ersten 5 Zeichen ignoriert werden. Genauer meine ich, dass ich in einer Memo-Komponente, in der 6. Zeile eine Infomation stehen habe, die wie folgt aussieht:

Name: Max Mustermann ==> Auslesen möchte ich nun nur das Max Mustermann...

... So, dass ich das in einem Label stehen habe.

Weiß da jemand weiter?

MfG
Thomas

:xmas: Allen im Forum schöne Weihnachten und einen guten Rutsch ins neue Jahr

[Plague]

Kann mir da wirklich niemand helfen?
So schwer kann das ja nicht sein. Gibt es nicht irgendwie ein Befehl für die Länge einer Zeile? Daraus brauche ich dann ja einfach nur die Zeichen ab dem 6. Zeichen...

[Dagon]

Willst du nun die 6. Zeiel eines Memos auslesen, oder das 6. Zeichen einer beliebigen Memozeile?

[Plague]

Ich möchte das 6. Zeichen einer beliebigen Memozeile auslesen!

[Nightshade]

Delphi-Quellcode:

label1.caption := copy(memo1.lines[0],6,length(memo1.lines[0]-5);

Oder halt mal in der OH unter "copy" nachsehen


------------------

Nightshade

[Christian Seehase]

Moin Nightshade,

wenn sichergestellt ist, dass die Zeilen mindestens 6 Zeichen enthalten geht das auch ohne Copy:

Zitat:

label1.caption := memo1.lines[0][6];

Das funktioniert so, da die Lines ja selber Strings sind, deren einzelne Zeichen über den Index angesprochen werden können, wie bei jedem anderen String auch.

[Robert_G]

Moin :hi: ,

@Christian - gibt dir BlaBla[6] nicht nur das 6. Zeichen des Strings?

Plaque wollte aber den String ab dem 6. Zeichen.
Nightshade's Lösung müsste eigentlich funktionieren.

[Mirilin]

:hi:

Er ist sich da selber nicht so einig :

Zitat:

Daraus brauche ich dann ja einfach nur die Zeichen ab dem 6. Zeichen...

Zitat:

Ich möchte das 6. Zeichen einer beliebigen Memozeile auslesen!

Zitat:

Name: Max Mustermann ==> Auslesen möchte ich nun nur das Max Mustermann..

wäre der Ansatz mit copy der richtige



mfg Tobias

[Plague]

Hallo,

also ich habe mich wohl ein bisschen undeutlich ausgedrückt.
Wie schon von einigen richtigen erkannt, möchte ich ab dem 6. Zeichen in einer Zeile auslesen können (also nicht nur das 6. Zeichen)...
Danke für eure Mühe!

MfG
Thomas

[Plague]

Hallo Nightshade,

ich habe eben mal den folgenden Code den Du mir gegeben hast ausprobiert. Aber der funktioniert irgendwie nicht. Delphi gibt folgenden Fehler aus: [Fehler] Unit1.pas(115): Inkompatible Typen: 'String' und 'Integer'

Code:

label1.caption := copy(memo1.lines[0],6,length(memo1.lines[0]-5);

Was könnte das bedeuten? Weil Variablen sehe ich in dieser Zeile nicht...

MfG
Thomas

[Mirilin]

:hi:

Delphi-Quellcode:

Label1.caption := copy(memo1.lines[0],6,length(memo1.lines[0])-5);

die Klammer war falsch geschlossen.

mfg Tobias

[alcaeus]

:warn: Hmm, nur der vollständigkeit halber, ich brauche nicht eine Variable um einen Fehler wegen unkompatibler Typen zu bekommen:

Delphi-Quellcode:

procedure Temp(Text: String);
begin
...
end;

Der Aufruf

Delphi-Quellcode:

Length(5);

erzeugt nämlich auch einen sehr schönen Fehler... nur um darauf hinzuweisen