Delphi-Quellcode:
if (FindComponent(CNAME+intToStr(i)) as TPanel).caption = '' then
(FindComponent(CNAME+intToStr(i)) as TPanel).caption := CAP;
Das funktioniert zwar, allerdings ist der zweimalige Aufruf von FindComponent unnötig, nicht sonderlich elegant und wenig effektiv.