GetComputerName后面的两个参数怎么定义呀？

Question

如题

Answer 1

p:pchar;
getmem(p, 100);
getcomputername(p, 100);
...
freemem(p);

Answer 2

那么getcomputername的返回值是什么？

Answer 3

GetComputerName(lpBuffer,nSize)
取得这台计算机的名称返回值 
TRUE（非零）表示成功，否则返回零参数说明:
lpBuffer String，随同计算机名载入的字串缓冲区 
nSize Long，缓冲区的长度。这个变量随同返回计算机名的实际长度载入 

Answer 4

是这么用嘛？
var
  p: pChar;
begin
  getmem(p, 100);
  if getcomputername(p, 101) then
    edt_servername.Text := p;
  freemem(p);end;