Text eines Memos überprüfen

[Zyancali]

hi @ all!

if möchte mit dem Code

if Memo1.Lines <> '' then {...} else {...} prüfen ob das Memo etwas enthält,
jetzt ist da nur das problem das die Lines Property vom Typ TStrings ist,
ich mit dieser Bedingung aber auf String prüfe was ja zu einer Debuggerfehlermeldung führt.

Wie kann/muss ich diese Bedingung umschreiben das ich (ohne Fehler) prüfen kann ob das Meno etwas enthält ?

Danke für jede Hilfe im Vorraus !

[Christian Seehase]

Moin Zynankali,

warum prüfst Du nicht einfach Memo1.Lines.Count?

[Pr0g]

TStrings ist eine Liste mit mehreren Strings. Du kannst also entweder per Index auf eine Zeile des Memos zugreifen, bspw. die erste mit
Memo1.Lines[0] oder du nutzt die Text Eigenschaft des Memos für den gesammten Text, also alle Zeilen auf einmal:
Memo1.Text MfG Pr0g

[Zyancali]

@ Christian Seehase

Ehrlich gesagt wäre das doch ein bisschen umständlich oder ?

@ Pr0g

Hey, das funktioniert sogar ( was hätte ich wohl anderes erwartet )
Danke !

[Pr0g]

Obs wirklich umständlicher ist mit Count würde ich nicht, so viel tut sich da auch nicht vom Code her, nur die Geschwindigkeit bei Count sollte höher liegen:

Delphi-Quellcode:

//mit Count
if Memo1.Lines.Count = 0 then

//mit Text
if Memo1.Text = '' then

[Christian Seehase]

Moin Pr0g,

Zitat von Pr0g:

... nur die Geschwindigkeit bei Count sollte höher liegen:

solange das Memo leer ist dürfte sich das nicht viel nehmen, aber meistens ist es keine gute Idee direkt die Eigenschaft Text zu verwenden.

[Zyancali]

@ Christain Seehase

Ähm, und warum nicht ?

[Christian Seehase]

Moin Zyancali,

weil diese bei jedem Zugriff aus den Zeilen zusammengesetzt wird, was reichlich auf die Geschwindigkeit drückt.