Usar o ´with´ com uma variavel?

Delphi

14/02/2006

Procedimento:

procedure Botoes(Botao,Formulario:String);
begin
if Botao = ´ALterar´ then
begin
with Formulario do <-- Erro
begin
btbtnGravar.Enabled := True;
btbtnNovo.Enabled := False;
btbtnAlterar.Enabled := False;
btbtnCancelar.Enabled := True;
btbtnExcluir.Enabled := False;
btbtnSair.Enabled := False;
btbtnPrimeiro.Enabled := False;
btbtnAnterior.Enabled := False;
btbtnProximo.Enabled := False;
btbtnUltimo.Enabled := False;
end;
end;
end;

Erro:
Record, object or class type required

Duvida:
Alguem sabe como usar o ´with´ com uma variavel?

Obrigado pela atenção.


Ullrich

Ullrich

Curtidas 0

Respostas

Massuda

Massuda

14/02/2006

Dentro da sua procedure, Formulario é uma string... with não se aplica a strings, apenas a records e objetos.

No seu caso, você pode simplesmente passar o form (não o nome do form) como parâmetro para sua procedure.


GOSTEI 0
Aroldo Zanela

Aroldo Zanela

14/02/2006

Colega,

A reposta que procura está na informação que você possui.

Erro: Record, object or class type required



GOSTEI 0
POSTAR