Todos os exemplos deste episódio podem ser baixados neste link: http://cc.embarcadero.com/item/30665
Alguns pontos da linguagem de programação Delphi são sempre menosprezados, um deles é o uso de diretivas de compilação, muito poucos usuários conhecem a fundo as diretivas de compilação é as utilizam no dia-a-dia.
Agora com o advento da introdução a programação multiplataforma no Rad Studio e Delphi, as diretivas tem voltado a ser foco, visto que em alguns casos, mesmo que a linguagem abstraia ao programador as facetas da programação multiplataforma, alguns artifícios ainda se fazem necessário para desenvolvimento em mais de um ambiente ou sistema operacional, veja um exemplo o desenvolvimento de software para iOS e Android utilizando SMS, não existe uma abstração para o envio do SMS que seja comum as duas plataformas, então se faz necessário a utilização de diretivas de compilação para adaptar o código compilado a uma outra plataforma.
Voltando ao foco do artigo, a diretiva MESSAGE e uma dessas diretivas que são menosprezadas pela maioria dos usuários, ela é particularmente útil em projetos ainda em desenvolvimento, onde parte do código ainda não foi implementado, podendo ser utilizada para sinalizar partes do código que ainda necessitam de uma atenção um pouco maior, veja um exemplo simples:
Continue lendo…
Ficar chamando o método Randomize muitas vezes faz seus números aleatórios ficarem cada vez menos aleatórios e colocar o método em uma seção “initialization” não é uma boa prática, então o interessante e criar um procedimento para testar e gerar números aleatórios somente quando necessário.
procedure RandomizeIfNeeded(); begin if RandSeed = 0 then Randomize(); end;