Problem mit NetSessionEnum

[hitzi]

Delphi-Quellcode:

var EntriesRead, TotalAvail: DWORD;
  Buf: Pointer;
  TempBuf:PSessionInfo502;
  i:integer;
begin
 NetSessionEnum('', nil, nil, 502,
    Buf, MAX_PREFERRED_LENGTH, EntriesRead, TotalAvail, nil);
 TempBuf:=Buf;
 for i:=1 to EntriesRead do begin
  re1.Lines.Add(TempBuf^.sesi502_cname); //Ausgabe in einen Richedit
  re1.Lines.Add(TempBuf^.sesi502_username); //Ausgabe in einen Richedit
  Inc(TempBuf);
 end;
 NetApiBufferFree(Buf);
end;

Warum wird nur der 1. Buchstabe des Computernamens (cname) und auch nur der 1. Buchstabe des Usernamen (username) angezeigt?

MfG Hitzi