SaveDefinitions
DynamicModule
f[x_] := x + 1; DynamicModule[{x}, {Slider[Dynamic[x]], Dynamic[f[x]]}, SaveDefinitions -> True]