Passar Form como parâmetro

Delphi

23/06/2006

:roll:

Olá... saudações. Favor dar um Help no seguinte:
Preciso criar uma rotina para desativar alguns controles (button´s; Gravar, Cancelar, etc)
em vários Forms. Como se faz para passar o Form como parâmetro???
Exemplo:
frmPrincipal.btnGravar.Enable := False;
frmCliente.btnGravar.Enable := False;
No caso, o parâmetro seria o frmPrincipal, frmCliente
Abraços,
Pedro


Pqs

Pqs

Curtidas 0

Respostas

Aasn

Aasn

23/06/2006

Caro colega,
tente assim...

procedure Limpar(const Formulario: TForm);
begin
with Formulario do
     begin
       ...
     end;
end;



[]´s
AASN


GOSTEI 0
Pqs

Pqs

23/06/2006

Grato pela atenção; mas não deu certo. Já encontrei a solução no site
www.elivaldo.com.br
Abraços.


GOSTEI 0
Aasn

Aasn

23/06/2006

Caro colega,

Talvez minha dica não tenha ficado clara, pois eu a utilizo em meus sistemas e funciona perfeitamente!
Mas que bom que vc encontrou o que precisava.
Boa sorte.

[]´s
AASN


GOSTEI 0
POSTAR