pasar como parámetro nombre de un componente

[gabrielkc]

Si necesitaras enviar el nombre de un componente y luego manipularlo tendrías que hacer:

Código Delphi [-]
function moverf(nomfich:string;casifich:integer;AOwner:TComponent):integer;
var Comp:TComponent;
begin
 Comp:=AOwner.FindComponent(nomfich); 
 Comp.Left:=coord[casifich*2-1];
 Comp.top:=coord[casifich*2];
end;
 
moverf('ficha2',23,ficha2.Owner);

Lo anterior puede ser util usandolo en un bucle digamos