Hallo,
als ich diesen Thread gelsen habe, ist mir aufgefallen, das ich auch in meinem Code einige Passagen mit "FindComponent" kürzen kann. Daher stelle ich meine Frage mal in diesen Thread.
Bei folgenden Code habe ich Probleme, kann das daran liegen, das die Edits auf einer anderen Form liegen?
Delphi-Quellcode:
rellabel1.Caption := progconfig.relname1.Text;
rellabel2.Caption := progconfig.relname2.Text;
rellabel3.Caption := progconfig.relname3.Text;
rellabel4.Caption := progconfig.relname4.Text;
rellabel5.Caption := progconfig.relname5.Text;
rellabel6.Caption := progconfig.relname6.Text;
rellabel7.Caption := progconfig.relname7.Text;
rellabel8.Caption := progconfig.relname8.Text;
Gekürzt habe ich das dann so. Der Compiler meckert auch nicht rum, aber die Labels erhalten leider keine Caption:
Delphi-Quellcode:
for i := 1 to 8 do
Tlabel(FindComponent('rellabel'+IntToStr(i))).Caption := TEdit(FindComponent('progconfig.relname'+IntToStr(i))).Text;
Mfg Salomon