Hallo zusammen
Habe folgende Ausgangslage:
Variablen in aufzählender Form:
pp_KontoInhaberZ1
pp_KontoInhaberZ2
bis
pp_KontoInhaberZ7
Variable pp_KontoInhaber ist vom Typ TppField
Text wird so ausgelesen: pp_KontoInhaberZ1.AsString
Ich möchte nun alle Variablen von 1-7 in eine Memobox einlesen und mit #10 in eine neue Zeile legen.
Hier der ungefähre Code an dem ich jetzt bastle...
Delphi-Quellcode:
procedure Trpt_eVVPrint.MemoKunde3Print(Sender: TObject);
var
i : integer;
begin
MemoKunde3.Text := pp_KontoInhaberZ1.AsString + #10;
for I := 2 to 7 do
begin
if TppField(FindComponent('pp_KontoInhaberZ' + intToStr(i)).AsString) <> '' then // hier stimmt auch was nicht...??
begin
// hier einfüllen aber wie...
end;
end;
end;
Ich fühle mich mit dem FindComponent noch nicht so zurecht....
Wer kann mit mit dem richtigen Syntax helfen?
Vielen Dank.