Procedimento sem parâmetro

[sergio190986 0]

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.

[kadu_17 3]

você coloko la no form?

 

tipo sabe onde fika um monte de procedure escrito uma em baixo da otra??

intao você tem q coloka la tb o nome do procedimento

 

e man pega uma referencia tipo um livro e tals inquanto você programa eh + facil pra qm ta começando

 

flww

 

sorry pelo geito q escrevi

[cfesta 0]

O que pode estar acontecendo é que você está tentando executar um procedimento que não foi declarado.

 

Para resolver insira:

procedure Desabilita;

na seção private ou public, dependendo do escopo que você quer dar.

[bdexterholland 0]

Existem soluções para diversos contextos, mas a principal acredito que seja esta:

Esta procedure está no mesmo arquivo ou em um arquivo separado? Se estiver no mesmo arquivo, você precisará colocar o nome da Unit que contém a procedure dentro da declaração Uses da unit que irá chamar o método.

 

O problema pode ser de escopo que será resolvido como postado acima pelos colegas...