RE:Funcion (API para obtener nombre de la PC)
En una ventana normal agregas un StatiTex (control) y en el evento open de la ventana agregas este código dependiendo del S.O que tengas instalado en tu pc
/////Nombre del equipo de red - Win XP
string is_equipo
RegistryGet ("HKEY_LOCAL_MACHINE\SYSTEM\ControlSet001\Services\Eventlog", &
"ComputerName",RegString!,is_equipo)
st_6.text=STRING(is_equipo)
/////Nombre del equipo de red - Win 2000
string is_equipo2
RegistryGet ("HKEY_LOCAL_MACHINE\SYSTEM\ControlSet001\Control\ComputerName\ComputerName", &
"ComputerName",RegString!,is_equipo2)
st_6.text=STRING(is_equipo2)
Saludos desde Perú.......