Código Delphi [-] ShowMessage(GetEnvironmentVariable('COMPUTERNAME'));
ShowMessage(GetEnvironmentVariable('COMPUTERNAME'));