Hallo,
Delphi-Quellcode:
if (Findcomponent('pp_KontoInhaberZ' + intToStr(i)) as TppField).AsString <> '' then
begin
MemoKunde3.Text := MemoKunde3.Text + (Findcomponent('pp_KontoInhaberZ' + intToStr(i)) as TppField).AsString + #10;
end;
Du rufst FindComponent jetzt 2mal auf.
Weiter oben war der Tip mit der lokalen Variable.
Das Memo hat übrigens ein
Lines.Add
Das erspart dir das #10 (was eigentlich #13#10 ein müsste).
Heiko