Get the computer name of user

 

Compatibilities: Required Xtras: Buddy API

This item has not yet been rated

Use this behaviour to get the computername of your viewer and let it be placed into a field.

property pTextComp, UserField on beginsprite me   set name = pTextComp&&baComputerName( )   put name into member UserField end beginsprite me on getPropertyDescriptionList me   p_list = [:]   addProp p_list, #pTextComp, [#format:#string,#default:"Computer name is:",#comment:"The line that is placed before the computer name"]   addProp p_list, #UserField, [#format:#member,#default:0,#comment:"Select the member field to put the Computername into"]   return p_list end