Hola, no te preocupes, lo importante es que ya sabes y lee la
guía de estilo para que no suceda...
En cuanto a la duda y siguiendo el camino que tomaste, lo que sucede es que N es el número que ingresas, vCantidad es el número que debes mostrar, así:
Código Delphi
[-]function cantidad_de_divisores(n:Integer): Integer;
var
vNumero, vI, vCantidad: Integer;
begin
vCantidad := 0;
vNumero := StrToInt(Edit1.Text);
for vI := 1 to vNumero do
if (vNumero mod vI) = 0 then
vCantidad := vCantidad + 1;
Result := vCantidad;
end;
Código Delphi
[-]procedure TForm1.BitBtn1Click(Sender: TObject);
var
n:Integer;
codigo:Integer;
begin
val(Edit1.Text,n,codigo);
Form1.Edit2.Text := FloatToStr(cantidad_de_divisores(n));
end;
Saludos.