Código Delphi [-] procedure HazAlgo(Imagen: TImage); begin { Aquí accedes a las propiedades de Imagen } end;
procedure HazAlgo(Imagen: TImage); begin { Aquí accedes a las propiedades de Imagen } end;