Problema con cambiar el nombre de Equipo
Hola ,
para cambiar el nombre de PC he utilizado lo siguiente : pero no funcionó y me da este error : Slack overflow estoy utilizando delphi xe8 y parec que no acepta Windows.SetComputerName y tuve que quitar Windows y escribir la así !!!:-| Necesito saber porqué no funcinó, o si hay otro código mejor .:confused: Muchas gracias. |
Hola Delphi01,
eres Administrador de la computadora, el programa que ejecutas tiene derechos de admin? Prueba a ejecutar tu aplicacion como admin. |
Otra opción (siempre muy socorrida) es recurrir a WMI.
La clase Win32_ComputerSystem, nos permite obtener esa información del equipo. https://msdn.microsoft.com/en-us/lib...(v=vs.85).aspx Y además entre los métodos que posee hay uno llamado Rename: https://msdn.microsoft.com/en-us/lib...(v=vs.85).aspx Utilizando un código como este puedes obtener el npombre actual del equipo:
Y usando uno como este puedes cambiar el actual nombre, por uno nuevo:
Pon un formulario con un par de edits y añade ese código: Una vez que lo cambies, puedes ver el resultado en la ventana de sistema: Debes añadir al uses:
El ejemplo completo lo he subido al ftp. |
Muchas gracias Neftali:)eres muy amable te agradezco mucho tu explicación tan detallada, me funcionó lo de SetComputerName pero tenia que poner Windows en uses , algo que no lo capto muy bien todavía :confused: ,
para llamar la : Cita:
|
La franja horaria es GMT +2. Ahora son las 22:10:45. |
Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi