Versão do Windows
Esta dica foi enviada pelo usuário João Paulo que está participando do concurso UPLoader Master e tem como objetivo retornar a versão do Windows em que seu sistema está rodando.
uses SysUtils;
case Win32Platform of
VER_PLATFORM_WIN32_WINDOWS: ShowMessage ('Windows 9x');
VER_PLATFORM_WIN32_NT: ShowMessage ('Windows NT');
end;
Confira uma imagem do exemplo utilizando está dica.
