DICAS

Visite a biblioteca de dicas da comunidade.

Saiba mais

ARTIGOS

Abordagens detalhadas sobre assuntos diversos.

Saiba mais

INICIANTES

Aprenda a programar de um modo simples e fácil.

Saiba mais

DOWNLOADS

Acesse os materiais exclusivos aos membros.

Saiba mais
voltar

PARA QUEM GOSTA DE DELPHI

Como alterar valor de uma constante

Há alguns casos em específico que precisaríamos alterar
um valor de uma contante.

Há possibilidades, mesmo se a constante não for típada
veja o código a seguir:

1
2
3
4
procedure ChangeConst(const Constant; var Value; Size: Integer);
begin
  move((@Value)^, (@Constant)^, Size);
end;
1
2
3
4
5
6
7
const
  Constante A = 'Valor da constante';
 
procedure Teste;
begin
  ChangeConst('xxx', A, sizeOf( Value ))
end;

Enviada por Ivan Cesar.

Facebook Comments Box
  • InfusTec
  • 3.869 views
  • 0 comentários
  • 21 de maio de 2016

Está gostando do conteúdo? Considere pagar um cafezinho para nossa equipe!

Deixe um comentário

Ir ao topo

© 2024 Infus Soluções em Tecnologia - Todos os Direitos Reservados