Hallo Wissende,
ich kann mich leider nicht mehr so recht an die Sprache erinnern, weiss aber, dass ich schon mal ne Programmiersprache benutzt habe, in der es eine fertige Funktion ala ComponentByName gab.
Ich habe mich mal daran versucht und möchte eigentlich nur wissen, ob das so in Ordnung ist:
Delphi-Quellcode:
function ComponentByName(str_Name:String):TControl;
var
i:integer;
begin
Result:=nil;
with form2 do
for i:= 0 to ComponentCount-1 do
begin
if Components[i].Name = str_Name then
begin
Result := (Components[i] as TControl);
break;
end;
end;
end;