Remove os zeros a frente de um valor

Compartilhe :function CPUSpeed: Double; const DelayTime = 500; // divide o tempo em ms var TimerHi, TimerLo: DWORD; PriorityClass, Priority: Integer; begin PriorityClass := GetPriorityClass(GetCurrentProcess); Priority := GetThreadPriority(GetCurrentThread); SetPriorityClass(GetCurrentProcess, REALTIME_PRIORITY_CLASS); SetThreadPriority(GetCurrentThread, THREAD_PRIORITY_TIME_CRITICAL); Sleep(10); asm dw 310Fh // rdtsc mov TimerLo, eax mov TimerHi, edx end; Sleep(DelayTime); asm dw 310Fh // rdtsc sub eax, TimerLo sbb…

Compartilhe :Se você precisa formatar números ou strings adicionando zeros à esquerda para atingir um tamanho fixo, pode utilizar a função StrZero. Função para Adicionar Zeros Abaixo está a implementação da função otimizada: Como Funciona? Exemplo de Uso Benefícios da Função