Einzelnen Beitrag anzeigen

Delfiano

Registriert seit: 13. Jul 2020
59 Beiträge
 
#7

AW: Komponente suchen und Caption ändern ?

  Alt 1. Jan 2021, 16:19
Gut gebrüllt, Löwe. Dann mach's doch besser.

Ich hab mich nur an der Vorgabe orientiert und
den/die entsprechenden Fehler behoben.

Aber ich will mal nicht so sein:
Delphi-Quellcode:
procedure TForm1.btn1Click(Sender: TObject);
var
 CNAME, CAP: string;
 p: TPanel;
 i: Integer;
begin
  CNAME := 'pnl';
  CAP := 'LAST CHECK' ;
  for i := 1 to 4 do
  begin
    p:= (FindComponent(CNAME+intToStr(i)) as TPanel);
    if p.caption = 'then p.caption := CAP ;
  end;
end;

Geändert von Delfiano ( 1. Jan 2021 um 16:47 Uhr)
  Mit Zitat antworten Zitat