Procedimento sem parâmetro

Boa noite, já faz um tempo que estava programando em Delphi e lembro que aprendi muito aqui, estou com uma dúvida que acho boba mas que sinceramente não consigo me lembrar como resolver.

estou criando um procedimento para algumas condições

procedure Desabilita();
begin

 frmcad_cli.edt_nome.ReadOnly:=true;
 frmcad_cli.edt_tel.ReadOnly:=true;
 frmcad_cli. edt_cel.ReadOnly:=true;
 frmcad_cli.edt_mail.ReadOnly:=true;
 frmcad_cli.edt_num.ReadOnly:=true;
 frmcad_cli.edt_cidade.ReadOnly:=true;
 frmcad_cli.edt_comp.ReadOnly:=true;
 frmcad_cli.edt_bairro.ReadOnly:=true;
 frmcad_cli.edt_rua.ReadOnly:=true;

 frmcad_cli.btn_new.Enabled:=true;
 frmcad_cli.btn_first.Enabled:=false;
 frmcad_cli.btn_prior.Enabled:=false;
 frmcad_cli.btn_next.Enabled:=true;
 frmcad_cli.btn_last.Enabled:=true;
 frmcad_cli.btn_edit.Enabled:=true;
 frmcad_cli.btn_cancel.Enabled:=true;
 frmcad_cli.btn_post.enabled:=false;
 frmcad_cli.btn_del.enabled:=true;
end;

mas quando tento chama-lo dentro de um botão está me retornando uma mensagem de erro: Undeclared Identifier

Desabilita

procedure Tfrmcad_cli.btn_firstClick(Sender: TObject);
begin

dm.tbclientes.first;
Desabilita();
end;

Minha dúvida é: Tem uma forma de usar procedimentos sem parâmetros?

Desde já agradeço a atenção.