Aviso ao compilar ...

Question

Ol� amigos,Algu�m sabe por que o compilador gera este aviso na linha indicada e se h� algum problema com o c�digo abaixo ?[Hint] unDM.pas(54): Value assigned to �C� never usedParte do c�digo:var  C: T...

Marcosrocha · Answer

O compilador acha que sua inicializa��o pode nunca ser utilizada, ou seja, C foi criada mas talvez n�o ser� usada.
Tente mover o C := oForm.FindComponent para dentro do try. � s� isso... Dependendo da posi��o da inicializa��o da vari�vel e do seu c�digo, o Delphi estima que o valor associado a ela pode n�o ser usado, o que causaria desperd�cio de mem�ria.

Massuda · Answer

O compilador est� avisando voc� que o valor nil que est� sendo atribu�do � vari�vel C nunca � utilizado. Isso pode ser um erro de sua parte ou n�o.

Se estiver compilando com otimiza��o de c�digo ligada, com certeza essa linha ser� eliminada do c�digo final.

Francisco.riva1 · Answer

Ol� Marcos, MassudaJ� tentei v�rias coisas (com rela��o a posi��o de criar a vari�vel C e atribuir Nil a ela) nada funcionou e parece estar tudo certo!Voc�s conseguem ver alguma coisa errada nesta rotina ?Vejam a rotina inteira:var  C: TComponent;begin  C := oForm.FindComponent(Item);  try    if (C <> nil) then      begin        // Configura itens do menu        if C is TMenuItem then          begin            if Permissao = �S� then              TMenuItem(C).Enabled := True            else              TMenuItem(C).Enabled := False;          end        else          // Configura outros objetos          begin            if Permissao = �S� then              TMostraProp(C).Enabled := True            else              TMostraProp(C).Enabled := False;          end;      end;  finally    C := nil;  end;...

Massuda · Answer

N�o tem nada de errado. O compilador gera dois tipos de mensagens: erros e avisos. Erros s�o situa��es que impedem a gera��o de c�digo. Avisos s�o situa��es que o compilador considera estranhas.

No seu caso, o aviso � gerado porque voc� atribui um valor � vari�vel C mas depois disso n�o utiliza mais essa vari�vel (que � o seu caso) ou atribui um novo valor � vari�vel. O compilador avisa pois isso pode ser um erro (voc� esqueceu de continuar o c�digo ou a atribui��o est� no lugar errado).

Para �resolver� o aviso, basta retirar a linha que atribui nil � C, j� que ela � desnecess�ria.

Rodc · Answer

FindComponent retorna um ponteiro para o componete. C � um ponteiro para o componente que FindComponente retornou. Voc� n�o precisa fazer �C := nil� porque ele � s� um ponteiro e assim que sair da fun��o vai ser retirado da mem�ria, assim como voc� cria uma vari�vel String e n�o precisa atribuir nil � ela antes de encerrar o c�digo.
Agora, se voc� estivesse usando C := TComponent.Create(); a� sim voc� teria de usar FreeAndNil() para remover o componente que voc� criou.

Francisco.riva1 · Answer

Mais do que explicado !Obrigado a todos pela aten��o.Abra�os,Francisco....

F�rum Aviso ao compilar ... #353743