Anystring in Delphi

[florida]

[CODE
var I: Integer;
anystring: String;
begin
for I := 0 to Memo1.Lines.Count do
begin
if Memo1.Lines.Strings[I] = 'text=' + anystring then
begin
Label1.Caption := anystring;
end;
end;][/CODE]

Wie kann ich dies zum Laufen bekommen?

[Christian Marquardt]

Compilieren und Linken

[Peter Schmelzer]

Oder so:

if pos('text=' + anystring, Memo1.Lines.text) <> 0 then
Label1.Caption := Anystring;

Was willst Du denn eigentlich erreichen?

[Bernhard Geyer]

for I := 0 to Memo1.Lines.Count do

Wenn schon dann nur bis Memo1.Lines.Count-1 (Null-Basierter Index).

Aber die Frage ist (wie schon von Peter gestellt) : Was willst du eigentlich erreichen?