Alterando o nome de volume (label) de um disco

Inclua na seção uses: Windows

{ Da unidade C: }

SetVolumeLabel('c:', 'NovoLabel');

{ Da unidade atual: }

SetVolumeLabel(nil, 'NovoLabel');