Gracias a los dos!!
Me sirvieron para entender un poquito mas el tema de funciones y procedimientos
lo solucione con una función y me anduvo, pero quiero que me digan si realmente si esta bien echo.
La declare asi
Código Delphi
[-]
function botones(accbot:boolean):boolean;
la función así
Código Delphi
[-]
function TFormIva.botones(accbot:boolean):boolean;
begin
btNuevo.Enabled:=accbot;
btmodificar.Enabled:=accbot;
bteliminar.Enabled:=accbot;
end;
y lo llamo asi
Código Delphi
[-]
botones(true);
botones(false);
Gracias de nuevo.